Jak zrobić, żeby przy zamykaniu programu przy określonych okolicznościach program się nie zamknął? Chodzi o to, że program przy zamykaniu pyta sie, czy zapisać plik, czy anulować(zostawić program uruchomiony).
0
0
Mozesz napisac w CloseQuery na Formie:
CanClose := false;
w tedy program sie nie zamknie. Jezeli bedziesz chciał zamknac program, bedziesz musiał wykorzystac
Application.Terminate;
, np:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if Saved = true then
begin
Application.Terminate;
end else
begin
CanClose := false;
end;
end;
w gobalnych var:
Saved: boolean;
// co to za debilny warunek:
Saved = true
??? - ŁF
0
przecież to można zrobić w jednej linijce:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose := Saved;
end;
:>
Misio: masz to wszystko w helpie, object inspektorze i w przykładach - więc po co zaśmiecasz forum?