高校问答mg元祖gto和3.0哪版好:delphi中如何让form2对form1进行操作？
来源：百度文库 编辑：高校问答 时间：2024/05/12 18:20:36
在form2中，增加了uses unit2;
在form2中，增加了uses unit1;
form2中有一个memo1,一个button,当点击button时，memo1第一行的内容会增加到form1的listbox1中，我是用这个命令：
procedure TForm2.Button1Click(Sender: TObject);
begin
form1.ListBox1.AddItem:=form2.Memo1.Lines.Strings[0];
form2.Close;
end;
但是调式出错说no enough actual parameter,请问是为什么啊？
谢谢高手!
在form2中，增加了uses unit1;
form2中有一个memo1,一个button,当点击button时，memo1第一行的内容会增加到form1的listbox1中，我是用这个命令：
procedure TForm2.Button1Click(Sender: TObject);
begin
form1.ListBox1.AddItem:=form2.Memo1.Lines.Strings[0];
form2.Close;
end;
但是调式出错说no enough actual parameter,请问是为什么啊？
谢谢高手!
假设当前活动窗体为Form2
在 Form2的 button 的Click事件中这样写就可以了:
form1.ListBox1.Items.Add(Memo1.Lines[0]);
form1.ShowModal;