易截截图软件、单文件、免安装、纯绿色、仅160KB

DELPHI窗体互相调用出错

大家好,有一难题不知道怎么解决。
要求form1点击按钮可以到form2,form2点击按钮又可以回到form1。
try
if not Assigned(form2) then
begin
  form2 := Tform2.Create(nil);
  end;
  form2.ShowModal;
  finally
    if Assigned(form2) then
      FreeAndNil(form2);
end;
这样写代码调第二次的时候就会提示窗体已存在

try
if not Assigned(form2) then
begin
  form2 := Tform2.Create(nil);
end;
Close;
finally
end;
这样写多调几次没问题,但是中间再打开其它窗口的话就无法回到form2了

try
if not Assigned(form2) then
begin
  form2 := Tform2.Create(nil);
end;
except
  FreeAndNil(form2);
  form2 := Tform2.Create(nil);
这样写的话就没办法让form2显示自己想要显示的内容

大家有没有遇到这种情况?难道delphi真的不能像网站那样各个页面可以随便返回吗?
菜菜鸟还请大家多多指点


相关问答:

Delphi 像亡国的南宋,试问这语言还有前途吗?

Delphi 像亡国的南宋,试问这语言还有前途吗?
Win32开发不如C#;
面像对像开发不如JAVA;
系统开发不如VC++6.0;
能用性不如VB6.0;
不支持Web开发。。。
出个Delphi 2010免费一年会有人用吗? ......

Delphi 使用shockwaveflash控件的问题

我写了个小程序,上面添加了一个shockwaveflash控件,然后在movie里写入swf文件的路径,然后执行没有问题。
当我把这个程序转移到另一台电脑执行时, shockwaveflash 控件显示空白。也就是没有加载那个swf文件。 ......

Delphi中数据库查询的疑惑

昨晚在Delphi数据库查询中遇到了一个疑惑。代码如下:
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
  XY : string;
begin
  XY := comboboxxy.Items[comboboxx ......

如何在delphi里用代码实现创建VPN连接?

我的代码如下,怎么总提示连不成功:
type
  GUID = record //申明调用RAS(创建VPN连接用)函数所需结构体
  Data1: integer;
  Data2: Shortint;
  Data3: Shortint;
  ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号