Temen2 delphi_id, gmana sih menghadle klik kanan close di taskbar...??? Asumsinya gini.... jika form utama di taskbar di close maka akan muncul form keluar...?? dan di form keluar ada dua button OK dan CANCEL.... jika OK, maka akan dicek password dan user name dan form utama diutup... Jika CANCEL maka form password aja yang ditutup dan form utama tetep... Source saya begini, mungkin ada yang bisa bantuin...... yang ga bisa cuma button CANCEL-nya... -------------------------------------------------------------------- Form utama : procedure TFutama.FormClose(Sender: TObject; var Action: TCloseAction); begin fkeluar.ShowModal; end; ------------------------------------------------------------------- Form keluar : function TFkeluar.cekadmin(user,pwd:string):boolean; begin result:=false; if tbadmin.Locate('nama_administrator',user,[lopartialkey])then begin if((user=tbadmin.FieldByName('nama_administrator').AsString)and (pwd=tbadmin.FieldByName('password_administrator').AsString))then result:=true else result:=false; if result=false then begin messagedlg('Password yang anda masukan salah...!!!!', mtInformation, [MBok], 0); edpass.SetFocus; end; end else begin messagedlg('Nama yang anda masukan salah...!!!!', mtInformation, [MBok], 0); ednama.SetFocus; end; end; procedure TFkeluar.btkeluarClick(Sender: TObject); begin if cekadmin(ednama.Text,edpass.Text)=true then begin modalresult:=mrok; end; end; procedure TFkeluar.btcancelClick(Sender: TObject); begin fkeluar.ModalResult:=mrcancel; futama.Enabled:=true; end; -------------------------------------------------------------------- Buat temen2 trima kasih sebelumnya, n mohon bantuannya untuk button CANCEL nya

g jelas deh mksudnya....

Gini lo mas n3o_cybertech, jika form 1 di close maka form 2 muncul, nah di form ke 2 memasukan password dan username untuk bisa menutup form ke 1....... itu udah bisa... masalah saya di cancel nya, jika tidak jadi menutup form 1 maka form ke 2 aja yang di tutup.... Tolong mas teliti Source di form keluar....

maksudnya supaya klo ditekan cancel di fKeluar,fUtama g ikut close khan?klo gitu, mungkin bisa gini :

Form utama :
procedure TFutama.FormClose(Sender: TObject; var Action: TCloseAction);
begin
fkeluar.ShowModal;
if fKeluar.ModalResult = mrCancel then
 Action := caNone;
end; 

gitu kalee y???

Ya ntu maksudnya mas n3o_cybertech....!!!!! Thank's bngt mas n3o_cybertech ntar q coba dulu,,,,,,.......