[Admin's Notes] Bung Irman, mohon hapus bagian message yang tidak perlu, termasuk 
footer otomatis dari YahooGroups atau mail provider lainnya..

Hello s_faturrahman,

Monday, November 17, 2003, 8:54:53 AM, you wrote:

s> action biar aja tetap ditulis caFree pada even onfromclose;
s> sedangkan kalo button diklik onclick kamu tulis close

s> procure tform1.button1click(sender:TObject)
s> begin
s>   close;
s> end;

s> lalu yang menyebabkan errornya dimana ?

begini masalah awalnya
saya punya form induk misalnya namanya form1 dan form childnya form2
lalu aku buka/create form child di code unit form1 induk sbb :

procedure TForm1.Button1Click(Sender: TObject);
var
 anak: TForm2;
begin
anak:=TForm2.create(Self);
end;

nah..form anak sudah tercipta, yaitu form2 tadi
sekarang aku mo tutup form anak tadi dan biasanya pake cara event Onclose
begini :

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
action:=cafree;
end;

dan berhasil, window anak (form2) tadi hilang tidak ada tampilan
visualnya dan tidak di minimize windownya;
sekarang aku pengen menutup/atau menghilangkan form anak tsb (form2)
dari form induk tapi tidak menggunakan cara  diatas tapi dengan button
click lalu diisikan codenya , nah pake cara di atas

procedure TForm2.Button1Click(Sender: TObject);
begin
close; // cara yang mas sarankan
form2.close; // cara saya ==> error
end;

aku bingung aku pake form1.close; nah di situ error nya..
sekarang dengan cara yang mas sarankan sudah bisa, wahhh
terima kasihh yaaa bantuannya...mas faturrahman


------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark
Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada.
http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/i7folB/TM
---------------------------------------------------------------------~->

Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED] 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/ 


Kirim email ke