ايران ويج

چرا این کد که تو هلپ دلفیه ارور زیر رو میده

کد: 
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);

begin

 if MessageDlg('Close the form?', mtConfirmation,

 [mbOk, mbCancel], 0) = mrCancel then

 CanClose := False;

end;

کد: 
[Error] Unit1.pas(130): Undeclared identifier: 'FormCloseQuery'

[Error] Unit1.pas(130): ';' expected but '(' found

[Error] Unit1.pas(130): ';' expected but ')' found

[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

این کد مشکل خاصی نداره ولی میتونی از کد زیر هم استفاده کنی

کد: 
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);

begin

if MessageDlg('Close the form?', mtConfirmation,[mbOk, mbCancel], 0) =mrCancel then

application.Run;

end;

ممنون از راهنماییتون
اشتباه از من بود.باید روی onclosequery دابل کرک میکردم بعد کد توش می نوشتم.

سلام
چرا وقتی از کد اول استفاده میکنیم جلوی خاموش شدن سیستم رو میگیره وچیکار باید بکنیم تا این طوری نشه؟
ممنون.
(اگه سورس onoffpcdate3 رو دانلود کرده باشید همچین اشکالی داره)

mohamad5228

lord_viper

mohamad5228

mohamad5228