Sayfayı Yazdır | Pencereyi Kapat

ProEdit nesnesinin FontSize' ı artmıyor

Nereden Yazdırıldığı: Clomosy | Forum
Kategori: Genel Programlama
Forum Adı: Clomosy ile değişken kullanımı
Forum Tanımlaması: TRObject dili ile değişken tanımlaması ve ekranda gösterme
URL: https://forum.clomosy.com.tr/forum_posts.asp?TID=1259
Tarih: 03 Şubat 2026 Saat 18:15
Program Versiyonu: Web Wiz Forums 12.07 - https://www.webwizforums.com


Konu: ProEdit nesnesinin FontSize' ı artmıyor
Mesajı Yazan: kaanl0
Konu: ProEdit nesnesinin FontSize' ı artmıyor
Mesaj Tarihi: 03 Şubat 2026 Saat 14:24
 Proeditin fontsize ı artttırmama rağmen değişiklik olmuyor. Nerede hata yapıyorum.

var
MainForm:TCLForm;
ScaledLayout:tclscaledlayout;
LogoImage:TClProImage;
ServerConnectionLbl:TClProLabel;
IpAdressEdt,PortEdt:TclProEdit;
 
void ScaledLayoutVD
{
  ScaledLayout = MainForm.AddNewScaledLayout(MainForm,'ScaledLayout');
  ScaledLayout.Align = alClient;
  ScaledLayout.OriginalHeight = 700;
  ScaledLayout.OriginalWidth = 350; 
}
void LogoImageVD
{
  LogoImage = MainForm.AddNewProImage(ScaledLayout,'LogoImage');
  LogoImage.Align = alCenter;
  LogoImage.Height = 550;
  LogoImage.Width = 275;
  LogoImage.Margins.bottom = 700;
  LogoImage.clProSettings.PictureSource = ' https://resmim.net/cdn/2026/02/03/wu3Oe1.png" rel="nofollow - https://resmim.net/cdn/2026/02/03/wu3Oe1.png ';
  LogoImage.clProSettings.PictureAutoFit = True;
  LogoImage.SetclProSettings(LogoImage.clProSettings);
}
 
void ServerConnectionVD
{
  ServerConnectionLbl = mainform.AddNewProLabel(ScaledLayout, 'ServerConnectionLbl','SUNUCU BAĞLANTISI');
  ServerConnectionLbl.Align = alCenter;
  ServerConnectionLbl.Width = 170;
  ServerConnectionLbl.Height = 30;
  ServerConnectionLbl.Margins.right = 145;
  ServerConnectionLbl.margins.bottom = 550;
  ServerConnectionLbl.clProSettings.FontColor = clAlphaColor.clHexToColor('#829AB1');
  ServerConnectionLbl.clProSettings.FontSize = 16;
  //ServerConnectionLbl.clProSettings.backgroundcolor=clAlphaColor.clHexToColor('#0f2dc2');
  ServerConnectionLbl.clProSettings.FontVertAlign = palcenter;
  ServerConnectionLbl.clProSettings.FontHorzAlign = palleading;
  ServerConnectionLbl.clProSettings.TextSettings.Font.Style = [fsBold];
  ServerConnectionLbl.SetclProSettings(ServerConnectionLbl.clProSettings);
  
  IpAdressEdt = mainform.AddNewProEdit(ScaledLayout,'IpAdressEdt','Ip Adresi');
  IpAdressEdt.Align = alCenter;
  IpAdressEdt.Width = 210;
  IpAdressEdt.Height = 45;
  IpAdressEdt.Margins.right = 115;
  IpAdressEdt.margins.bottom = 450;
  IpAdressEdt.clProSettings.BorderWidth=1.5;
  IpAdressEdt.clProSettings.bordercolor=clAlphaColor.clHexToColor('#c2c4be');
  IpAdressEdt.clProSettings.backgroundcolor=clAlphaColor.clHexToColor('#eeeeec');
  IpAdressEdt.clProSettings.FontColor = clAlphaColor.clHexToColor('#68686a');
  IpAdressEdt.clProSettings.TextSettings.Font.Style = [fsBold];
  IpAdressEdt.clProSettings.FontSize = 100;
  IpAdressEdt.clProSettings.RoundWidth = 19;
  IpAdressEdt.clProSettings.RoundHeight = 19;
  IpAdressEdt.clProSettings.FontVertAlign = palcenter;
  IpAdressEdt.clProSettings.FontHorzAlign = palcenter;
  IpAdressEdt.clProSettings.TextSettings.Font.Style = [fsBold];
  IpAdressEdt.SetclProSettings(IpAdressEdt.clProSettings);
  
  PortEdt = mainform.AddNewProEdit(ScaledLayout,'PortEdt','Port');
  PortEdt.Align = alCenter;
  PortEdt.Width = 110;
  PortEdt.Height = 45;
  PortEdt.Margins.left = 225;
  PortEdt.margins.bottom = 450;
  PortEdt.clProSettings.BorderWidth=1.5;
  PortEdt.clProSettings.bordercolor=clAlphaColor.clHexToColor('#c2c4be');
  PortEdt.clProSettings.backgroundcolor=clAlphaColor.clHexToColor('#eeeeec');
  PortEdt.clProSettings.FontColor = clAlphaColor.clHexToColor('#68686a');
  PortEdt.clProSettings.FontSize = 25;
  PortEdt.clProSettings.RoundWidth = 19;
  PortEdt.clProSettings.RoundHeight = 19;
  PortEdt.clProSettings.FontVertAlign = palcenter;
  PortEdt.clProSettings.FontHorzAlign = palcenter;
  PortEdt.clProSettings.TextSettings.Font.Style = [fsBold];
  PortEdt.SetclProSettings(PortEdt.clProSettings);
  
}
 
{
MainForm = TCLForm.Create(Self);
ScaledLayoutVD;
LogoImageVD;
ServerConnectionVD;


clRTSetProperty(MainForm,'ClientHeight',700);
clRTSetProperty(MainForm,'ClientWidth',350);
MainForm.SetFormColor('#F5F7FA','',clGNone);
MainForm.FormWaiting.Visible = False;
MainForm.BtnFormMenu.Visible = False;
MainForm.BtnGoBack.Visible = False;
MainForm.Run;
}
https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" rel="nofollow - https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">



Cevaplar:
Mesajı Yazan: Emr.Erkmn
Mesaj Tarihi: 03 Şubat 2026 Saat 14:38
Merhaba Kaan, 
Bazen clProSettings de güncellemeyi atlayabiliyor 
PortEdt = mainform.AddNewProEdit(MainForm,'PortEdt','Port');
  PortEdt.Align = alCenter;
  PortEdt.Width = 110;
  PortEdt.Height = 45;
  PortEdt.Margins.left = 225;
  PortEdt.margins.bottom = 450;
  PortEdt.clProSettings.BorderWidth=1.5;
  PortEdt.clProSettings.bordercolor=clAlphaColor.clHexToColor('#c2c4be');
  PortEdt.clProSettings.backgroundcolor=clAlphaColor.clHexToColor('#eeeeec');
  PortEdt.clProSettings.FontColor = clAlphaColor.clHexToColor('#68686a');
  PortEdt.clProSettings.RoundWidth = 19;
  PortEdt.clProSettings.RoundHeight = 19;
  PortEdt.clProSettings.FontVertAlign = palcenter;
  PortEdt.clProSettings.FontHorzAlign = palcenter;
  PortEdt.clProSettings.TextSettings.Font.Style = [fsBold];
  PortEdt.SetclProSettings(PortEdt.clProSettings);
  PortEdt.TextSettings.Font.Size = 2;

bu şekil de yazar mısın?
https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" rel="nofollow - https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">


Mesajı Yazan: kaanl0
Mesaj Tarihi: 03 Şubat 2026 Saat 14:49
Teşekkürler https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" rel="nofollow - https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">



Sayfayı Yazdır | Pencereyi Kapat

Forum Software by Web Wiz Forums® version 12.07 - https://www.webwizforums.com
Copyright ©2001-2024 Web Wiz Ltd. - https://www.webwiz.net