120 B
None
0 👍
0 👎
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin Action:=caNone; end; // Coded by Appo //
Comments