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
怎样获取网页部分内容（代码），并且显示出来！
（只是网页里面的一部分内容并不是全部）
没弄懂！
类似websever的功能？
估计是利用ie的接口。。。。。。。。
是类似websever的功能 ......
接收到的文本内容是ucs2编码格式，请问怎样转换成中文
按我的理解，UCS-2是字符集，具体的编码有UTF-8，UTF-16 (LE/BE)等。
如果你用Delphi 2009及以上版本，可以看看TEncoding类。
btw. 你说的转换成中文是啥意� ......
procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 个字节的长整形指针
begin
P:=PLongint(A);// 取的 A 的 ......
返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......
我的程序中有一段更新某一条记录的语句：
var
id:=integer;
begin
id:=strtoint(edit1.text);//edit1.text的值已经取得;
...
...
...
adoQuery1.sql.add('update 计划清单表 set 计划日 ......
