if (reserv_show=1) then
Form_WHReserv.showmodal
else
with TForm_WHReserv.Create(self) do
try
BEGIN
reserv_show:=1;
...
ShowModal;
if modalresult=mrok then
begin
...
end;
finally
close;
end;
Здесь я специально закрываю форму close а не free.
Но при Form_WHReserv.show всеравно выкидывает ошибку.
В чем мой косяк? Или чего-то не догоняю...
|