dügmeye tıklanmıyor


   bu koda dügmeye tıklanmıyor


var
myform:TCLform;
panel1,panel2:TCLPanel;
image1:TCLImage;
ugiris,sislem,fgor:TClProButton;
 void girisgit
{
  //Clomosy.RunUnit('giris');
  ShowMessage('sdsdsdsd');
} 

{
  myform=TCLform.Create(self);
   myform.clSetWindowState(fwsMaximized);
   myform.LytTopBar.Visible = False;//True
  myform.SetFormBGImage('https://resmim.net/cdn/2025/04/24/N6cJzo.jpg');
  panel2=myform.AddNewPanel(myform,'panel2');
  panel2.Align=alTop;
  ugiris=myform.AddNewProButton(panel2,'ugiris', 'Ürün Girişi');
  sislem=myform.AddNewProButton(panel2,'sislem', 'Satış İşlemi');
  fgor=myform.AddNewProButton(panel2,'fgor', 'Fiyat Gör');
  
  ugiris.Margins.right = 1200; 
 
  fgor.Margins.right = 700; 

  
    sislem.Height = 60;
    sislem.Margins.right = 950; 
   sislem.Width = 100;
   sislem.clProSettings.FontColor = clAlphaColor.clhextocolor('#000000');
  sislem.clProSettings.FontSize = 13;
  sislem.clProSettings.PictureSource = 'https://resmim.net/cdn/2025/04/24/N6qatH.png';
  
  sislem.SetclProSettings(sislem.clProSettings);
  
   
   fgor.Height = 60;
   fgor.Width = 100;

   
  panel1=myform.AddNewPanel(MyForm,'panel1');
  image1=myform.AddNewImage(Panel1,'image1');
  //Panel1.Align = alLeft;
  Panel2.height=myform.clheight/10;
  Panel1.height=myform.clheight/120;
   
  
  image1.width=1700;
  image1.height=300;
  

  ugiris.Height = 60;
   ugiris.Width = 100;
   ugiris.clProSettings.FontColor = clAlphaColor.clhextocolor('#000000');
  ugiris.clProSettings.FontSize = 13;
  ugiris.clProSettings.PictureSource = 'https://resmim.net/cdn/2025/04/24/N6qZcW.png';
  
  ugiris.SetclProSettings(ugiris.clProSettings);
  
 
   MyForm.AddNewEvent(ugiris,tbeOnClick,'girisgit');
  
 
  myform.Run;
}

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
BAAM11 Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 24 Nisan 2025 Durum: Aktif Değil Puanlar: 2	Mesaj Seçenekleri Yanıt Yaz Alıntı BAAM11 Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: dügmeye tıklanmıyor Gönderim Zamanı: 24 Nisan 2025 Saat 11:31
	bu koda dügmeye tıklanmıyor var myform:TCLform; panel1,panel2:TCLPanel; image1:TCLImage; ugiris,sislem,fgor:TClProButton; void girisgit { //Clomosy.RunUnit('giris'); ShowMessage('sdsdsdsd'); } { myform=TCLform.Create(self); myform.clSetWindowState(fwsMaximized); myform.LytTopBar.Visible = False;//True myform.SetFormBGImage('https://resmim.net/cdn/2025/04/24/N6cJzo.jpg'); panel2=myform.AddNewPanel(myform,'panel2'); panel2.Align=alTop; ugiris=myform.AddNewProButton(panel2,'ugiris', 'Ürün Girişi'); sislem=myform.AddNewProButton(panel2,'sislem', 'Satış İşlemi'); fgor=myform.AddNewProButton(panel2,'fgor', 'Fiyat Gör'); ugiris.Margins.right = 1200; fgor.Margins.right = 700; sislem.Height = 60; sislem.Margins.right = 950; sislem.Width = 100; sislem.clProSettings.FontColor = clAlphaColor.clhextocolor('#000000'); sislem.clProSettings.FontSize = 13; sislem.clProSettings.PictureSource = 'https://resmim.net/cdn/2025/04/24/N6qatH.png'; sislem.SetclProSettings(sislem.clProSettings); fgor.Height = 60; fgor.Width = 100; panel1=myform.AddNewPanel(MyForm,'panel1'); image1=myform.AddNewImage(Panel1,'image1'); //Panel1.Align = alLeft; Panel2.height=myform.clheight/10; Panel1.height=myform.clheight/120; image1.width=1700; image1.height=300; ugiris.Height = 60; ugiris.Width = 100; ugiris.clProSettings.FontColor = clAlphaColor.clhextocolor('#000000'); ugiris.clProSettings.FontSize = 13; ugiris.clProSettings.PictureSource = 'https://resmim.net/cdn/2025/04/24/N6qZcW.png'; ugiris.SetclProSettings(ugiris.clProSettings); MyForm.AddNewEvent(ugiris,tbeOnClick,'girisgit'); myform.Run; }

Emr.Erkmn Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Moderatör Kayıt Tarihi: 28 Şubat 2025 Durum: Aktif Değil Puanlar: 9	Mesaj Seçenekleri Yanıt Yaz Alıntı Emr.Erkmn Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 25 Nisan 2025 Saat 12:01
	Kodunu incelediğim de üst üste panel gelmesinden dolayı butona erişmiyorsun. Kodun düzenli halini atıyorum o şekilde devam edebilirsin. var myform:TCLform; panel1,panel2:TCLPanel; image1:TCLImage; ugiris,sislem,fgor:TClProButton; void girisgit { //Clomosy.RunUnit('giris'); ShowMessage('sdsdsdsd'); } { myform=TCLform.Create(self); myform.clSetWindowState(fwsMaximized); myform.LytTopBar.Visible = False;//True myform.SetFormBGImage('https://resmim.net/cdn/2025/04/24/N6cJzo.jpg'); panel2=myform.AddNewPanel(myform,'panel2'); panel2.Align=alTop; Panel2.height=myform.clheight/10; ugiris=myform.AddNewProButton(panel2,'ugiris', 'Ürün Girişi'); ugiris.Margins.right = 1200; ugiris.Height = 60; ugiris.Width = 100; ugiris.clProSettings.FontColor = clAlphaColor.clhextocolor('#000000'); ugiris.clProSettings.FontSize = 13; ugiris.clProSettings.PictureSource = 'https://resmim.net/cdn/2025/04/24/N6qZcW.png'; ugiris.SetclProSettings(ugiris.clProSettings); MyForm.AddNewEvent(ugiris,tbeOnClick,'girisgit'); sislem=myform.AddNewProButton(panel2,'sislem', 'Satış İşlemi'); sislem.Height = 60; sislem.Margins.right = 950; sislem.Width = 100; sislem.clProSettings.FontColor = clAlphaColor.clhextocolor('#000000'); sislem.clProSettings.FontSize = 13; sislem.clProSettings.PictureSource = 'https://resmim.net/cdn/2025/04/24/N6qatH.png'; sislem.SetclProSettings(sislem.clProSettings); fgor=myform.AddNewProButton(panel2,'fgor', 'Fiyat Gör'); fgor.Margins.right = 700; fgor.Height = 60; fgor.Width = 100; /* panel1=myform.AddNewPanel(MyForm,'panel1'); image1=myform.AddNewImage(Panel1,'image1'); //Panel1.Align = alLeft; image1.width=1700; image1.height=300; */ myform.Run; } bu şekilde kod çalışır durumda böyle devam edebilirsin