close نشدن برنامه(دلفی)

[jamjid]

می خواستم ببینم که میشه کاری کرد که برنامه با alt+f4 و task manager بسته نشود
راهنماییم کنید

 

[western]

فکر کنم اگه تو رویداد FormClose در فرم اصلی برنامه بنویسی Action := canone; مشکلت حل بشه
مثل این

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := canone;
end;

موفق باشید - محمد