窗体A有一个按钮Button1,B窗体有一事件TfrmCMain.Open。要怎么样才能使按下A窗体的按钮而执行B窗体的事件呢?procedure TForm1.Button1Click(Sender: TObject);
begin
      TfrmCMain.Open;//这是我使用的代码,提示[错误]  Undeclared identifier: 'TfrmCMain'
end;                 //[致命错误]  Could not compile used unit 'Unit1.pas'procedure TfrmCMain.Open;
   var
     a:string;
begin
   a:='hhhbbbccc'
end;

解决方案 »

  1.   

    uses
    B窗体单元;
    procedure TForm1.Button1Click(Sender: TObject); 
    begin 
       frmCMain.Open;//这里不要直接使用窗体类,而应使用窗体实例,所以改成了在B窗体单元声明了的frmCMain
    end;
    试试吧,这样就好了 
      

  2.   

    上面的问题我弄好了,现在又出现新问题了,答完就送分了!
    type
      AA= ^BB;//这里的^代表什?有什么作用?
      B= record
        CC: string[50];
        DD: Integer;
      end;
    var
      GG: AA;当我使用
    var
    HH: GG;
    begin
       HH.CC:='测试' ;//这里都没问题
       HH.DD:=7000' ;//为什么这里出错了呢?[错误]  Incompatible types: 'Integer' and 'String'
    end;
    这帖有两个问题,希望帮忙解答,我初学DELPHI很多不懂,分不多,以后有分了,全部送上!
      

  3.   

    上面的 B= record 应该为bb=record 
      

  4.   

    你的程序第一个问题:上面的B= record 应改为BB= record
    第二个是: 
    HH.DD:=7000 ' ;//为什么这里出错了呢?[错误]  Incompatible types:  'Integer ' and  'String ' 
    7000不能加引号,因为HH.DD为整形,所以所赋值也改须为整型