button click

[pazartesi1]

form1 üzerinden form 2 deki bir butona nasıl click gönderebilirim

[mucar]

Kod: Tümünü seç

procedure TForm1.Button1Click(Sender: TObject);
begin
form2.Button1Click(self);
end;

bu şekilde gönderebilirsiniz.

[pazartesi1]

maalesef çalışmıyor
tabi ben kodu formcreate yazdım

[mucar]

FormCreate'te de denedim yine de çalışıyor. Sizde hata mı veriyor?

[pazartesi1]

evet

[vesper]

form1 ve form2 nin oluşturulma sırası 1.form2 ve 2.form1 ise çalışması lazım. Birde form1 uses form2 diye tanımlıdır sanırım.

[mucar]

Hata nedir

[pazartesi1]

1nci form password burayı gecerseniz 2 form a oda password
2 yide gecerseniz 3 form a

sorun su
her sey duzgun fakat tum pass ler dogru ise form 3 birinci seferde calısıyor
ikinci calıstırmada form 2 yi yok edemedim basit bir hata var ama ne ¿

[menderes]

form1 üzerinden form 2 deki bir butona nasıl click gönderebilirim

Auto available form ise ; yani program açılışında yükleniyorsa,

Kod: Tümünü seç

Form2.BitBtn1.OnClick(nil);// ben nil kullanıyorum

form2 diyelim (available forms olsun) form2 yi uses e yazdık tabi...

Kod: Tümünü seç

Application.createform(TForm2, Form2);
Form2.BitBtn1.OnClick(nil);
Form2.Show; //veya ShowModal;

kolay gelsin....