关于delphi问题的,主窗体与从窗体问题

2024-11-28 02:15:34
推荐回答(3个)
回答1:

激活子窗体有很多方法,,你这种方法很少用,,给你几个例子。。

创建子窗体:

Form2.Show;//创建form2时,form1可用

Form2.ShowModal;//创建form2时,form1不可用

动态创建子窗体:这样可以在使用子窗体的时候才给子窗体分配内存,不使用的时候释放内存。

procedure TForm1.Btn2Click(Sender: TObject);
var
form2:tform2;
begin
form2:=tform2.Create(nil);
try
form2.ShowModal;
finally
form2.Free;
end;
end;
//form2必须在运行时已经创建了,而且已经引用了form2单元!

你代码的错误时:Form1.Destroy;

而不是你写的 Form1.Destory

你把o r 写反了!

回答2:

确认一下Unit1中是否引用了Unit3(如果你的Form3对应的是此单位)。
确认一下Form3的名称是否正确(Unit3)中的定义,类型是否为TForm3。

顺便说下,这种引用的方式不理想。通常只有两个系统间无连接时,才会启用新系统并释放本系统(即图中窗体)。另外,FREE方法可能更适合。

需要的话,把整个程序发来,帮你看看。

回答3:

你的分号是不是错误了?感觉和前几个分号不大一样!或者直接写成Hide好了。