执行到单元
try
from2:= Tfrom2.Create(application);
from2.recno := recNo;
from2.ShowPreview := ShowPreview;
from2.FormShow(application);
finally
freeandnil(from2);
end;
执行这句时from2:= Tfrom2.Create(application);
出现 将字符串转换为 uniqueidentiftier 出错
try
from2:= Tfrom2.Create(application);
from2.recno := recNo;
from2.ShowPreview := ShowPreview;
from2.FormShow(application);
finally
freeandnil(from2);
end;
执行这句时from2:= Tfrom2.Create(application);
出现 将字符串转换为 uniqueidentiftier 出错
我把整个form重新建了一个一样的就可以.不知道是怎么回事有点怀疑delphi的问题了..
希望下次不要出现..谢谢大家