Kod içinde Buton.click neden çalışmaz ?

[underwater]

Arkadaşlar merhaba;

Kod içerisinde butona tıklatıyorum şu şekilde ;

Kod: Tümünü seç

BitBtn1.Click;

ancak programı çalıştırdığımda delphi bu kodu okuyor fakat tepki vermiyor.
Butona manuel tıkladığımda ise kod çalışıyor.

Neden böyle birşey oluyor anlayamadım.

Kod: Tümünü seç

BitBtn1Click(cxGrid2);

şeklinde de denedim işe yaramıyor.

Yardımınızı rica ediyorum.

[xozcanx]

Merhaba BitBtn1.Click; dediğiniz form farklı bir form olabilir mi acaba örnek Form2 üzerindeki bif Function yada Procedure içinde yazılı ise ve siz bunu form1 üzerinden çağırıyorsanız tepki alamıyor olabilirsiniz. birde ait olduğu formu belirterek deneyin

Kod: Tümünü seç

FormX.BitBtn1.Click;

İyi Çalışmalar.

[underwater]

onu da denedim şimdi siz söyleyince. Aynı form zaten.
Maalesef olmuyor.

[xozcanx]

Buton içeriğini bilmediğim için şöyle bir yorum daha yapabilirim.
Eğer Buton içeriği bir değişkene bağlı olarak işliyorsa ve Bitbtn1.Click demeden önce atama işlemi gerçekleşmediyse sebebi buda olabilir.

Kod: Tümünü seç

Procedure TFormX.Bitbtn1Click(Sender: TObject);
Begin
 if Edit1.text='...' Then
   Begin
     .............
   End;
End;

CxGrid üzerinde işlem yapıyorsun sanırım, Grid atamaları gerçekleşmediği için de yapabilir.
analiz etmekte sıkıntı yaşadığınız noktalarda, sıkıntı yaşadığınız bölümdeki kodlarınızın arasına mesaj pencereleri ekleyin. hangi satırdan sonra problem yaşıyorsunuz rahatlıkla görebilirsiniz.

[freeman35]

"Kod içerisinde butona tıklatıyorum" bu yanlış bir ifade, "tıklama" mouse ile yapılan bir eylem. (tercüme türkçeyle bu kadar oluyor)
BitBtn1.Click; bir procedure çalıştırılıyor. Bunun çalışmadığına nasıl eminsin? debug ettin mi? adı "click" diye mousela click lenmiş gibi davranmasını neden bekliyorsun? o procedure içinde kontrollerin olup olmadığını nerden biliyorsun? mesela .enable=False sa ? gibi
BitBtn1Click(cxGrid2); bu "tip -> Type" işlerine özen gösterin, sender 'genelde' event i tetikleyen class ı temsil eder ki, çalışmayı isteyen class bilinsin.
en pratik sorun çözme yöntemi, debug. ayrıca standart bir button koyup oda denenebilir.

[fesiharslan]

Merhaba;
Farklı bir çözüm yolu önereyim.
Çalıştırmak istediğiniz buton Click olayında yer alan tüm kodları yeni bir Procedure oluşturarak buraya taşıyın.
Daha sonra hem button Click olayında hemde bu olayı çalıştırmak istediğiniz herhangi bir kod satırında bu Procedure'ü çalıştırın.

[pasa_yasar]

button1.onclick(sender);

değilmiydi o olay

[selimr]

button1click(self);

[m_yaprakci]

Selimr nin defigi gibi button1click(self);
Ya da bu kodu form.oncreate'de calistiriyorsan onactivate ye tasiman mantikli olur.
Ornek
Var ilkacilis:int;
Begin
if ilkacalis<>1 then
Begin
Bitbtn1.click;
ilkacilis:=1;
End;
End;

Gibi