![]() |
Clomosy Resmi Forum Sitesidir. Amacımız kullanıcılarımıza, iş ortaklarımıza, danışmanlara, yazılımcılara programlarımız hakkında destek ve bilgi vermektir. |
buton |
Yanıt Yaz ![]() |
Yazar | |
Binladin ![]() Yeni Üye ![]() Kayıt Tarihi: 10 Haziran 2024 Durum: Aktif Değil Puanlar: 10 |
![]() ![]() ![]() ![]() ![]() Gönderim Zamanı: 11 Haziran 2024 Saat 20:24 |
butona eklediğim icon resmini nasıl sol tarafa yaslayabilirim.
ytbBtn = MyForm.AddNewProButton(VSB,'ytbBtn','YouTube'); clComponent.SetupComponent(ytbBtn,'{"Align" : "MostTop","Height":'+IntToStr((SearchPnl.Height/2)/6)+',"Width":'+IntToStr(SearchPnl.Width)+',"RoundWidth":10,"RoundHeight":10,"BackGroundColor":"#C06C84","TextColor":"FFFFFF","TextSize":20,"TextBold":"yes","TextVerticalAlign":"center","TextHorizontalAlign":"center","MarginTop":350}'); MyForm.SetImage(ytbBtn,'https://cdn-icons-png.flaticon.com/512/160/160205.png'); MyForm.AddNewEvent(ytbBtn,tbeOnClick,'YouTube'); ![]() |
|
![]() |
|
Atiker01 ![]() Forum Yöneticisi ![]() ![]() Kayıt Tarihi: 26 Temmuz 2023 Durum: Aktif Değil Puanlar: 94 |
![]() ![]() ![]() ![]() ![]() |
Merhaba,
Aşağıdaki şekilde uygulayabilirsin. var MyForm : TclForm; Panel1 : TclProPanel; Img1 : TclImage; Btn1 : TclProButton; { MyForm = TclForm.Create(Self); Panel1=MyForm.AddNewProPanel(MyForm,'Panel1'); Panel1.Align = AlCenter; Panel1.Height = 50; Panel1.Width = 200; Panel1.clProSettings.BorderColor = clAlphaColor.clHexToColor('#8d445a'); Panel1.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#C06C84'); Panel1.clProSettings.BorderWidth = 1; Panel1.clProSettings.RoundHeight = 20; Panel1.clProSettings.RoundWidth = 20; Panel1.clProSettings.IsRound = True; Panel1.clProSettings.IsFill = True; Panel1.clProSettings.IsTransparent = False; Panel1.SetclProSettings(Panel1.clProSettings); Img1= MyForm.AddNewImage(Panel1,'Img1'); Img1.Align = alLeft; Img1.Width = Panel1.Width / 3; MyForm.setImage(Img1,'https://cdn-icons-png.flaticon.com/512/160/160205.png'); Btn1= MyForm.AddNewProButton(Panel1,'Btn1','Youtube'); Btn1.Align = alClient; MyForm.AddNewEvent(Btn1,tbeOnClick,'ShowMessage(''Youtube'')'); MyForm.Run; } İyi çalışmalar.
|
|
![]() |
Yanıt Yaz ![]() |
|
Tweet |
Forum Atla | Forum İzinleri ![]() Kapalı Foruma Yeni Konu Gönderme Kapalı Forumdaki Konulara Cevap Yazma Kapalı Forumda Cevapları Silme Kapalı Forumdaki Cevapları Düzenleme Kapalı Forumda Anket Açma Kapalı Forumda Anketlerde Oy Kullanma |