aber der rückgabewert von showmodal ist ja eine integer zahl, und nicht msok, mrcancel usw.
dann müsste man es etwa so machen:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
case form2.ShowModal of
1://...
2://...
3://...
//...
end;
end;
gruee
urbanbruhin