Merhaba Şeyma,
Örnek olabilmesi adına aşağıda ki kodu inceler misin?
var FrmDashboard: TclForm; pnlHeader: TclProPanel; lytUser, lytTexts: TclLayout; Imgavatar: TClProImage; lblhg, lbluser, lblyazi: TClProLabel;
{ FrmDashboard = TclForm.Create(Self); FrmDashboard.SetFormColor('#1E293B', '#0F172A', clGVertical);
pnlHeader = FrmDashboard.AddNewProPanel(FrmDashboard, 'pnlHeader'); pnlHeader.Align = alTop; pnlHeader.Height = 100; pnlHeader.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#0F172A'); pnlHeader.clProSettings.BorderColor = clAlphaColor.clHexToColor('#334155'); pnlHeader.clProSettings.BorderWidth = 1; pnlHeader.clProSettings.IsFill = True; pnlHeader.SetclProSettings(pnlHeader.clProSettings);
lytUser = FrmDashboard.AddNewLayout(pnlHeader, 'lytUser'); lytUser.Align = alLeft; lytUser.Width = 60; lytUser.Height = 60; lytUser.Margins.Left = 15; lytUser.Margins.Top = 20; lytUser.Margins.Bottom = 20;
Imgavatar = FrmDashboard.AddNewProImage(lytUser, 'Imgavatar'); Imgavatar.Align = alClient; Imgavatar.clProSettings.PictureAutoFit = True; Imgavatar.clProSettings.PictureSource = ' https://resmim.net/cdn/2026/07/09/CU0EcR.jpg" rel="nofollow - https://resmim.net/cdn/2026/07/09/CU0EcR.jpg '; Imgavatar.SetClProSettings(Imgavatar.clProSettings);
lytTexts = FrmDashboard.AddNewLayout(pnlHeader, 'lytTexts'); lytTexts.Align = alClient; lytTexts.Margins.Left = 12; lytTexts.Margins.Top = 20; lytTexts.Margins.Right = 15;
lblhg = FrmDashboard.AddNewProLabel(lytTexts, 'lblhg', 'Hoş Geldiniz,'); lblhg.Align = alTop; lblhg.Height = 18; lblhg.clProSettings.FontColor = clAlphaColor.clHexToColor('#C8D2E6'); lblhg.clProSettings.FontSize = 11; lblhg.SetclProSettings(lblhg.clProSettings);
lbluser = FrmDashboard.AddNewProLabel(lytTexts, 'lbluser', 'Admin'); lbluser.Align = alTop; lbluser.Height = 22; lbluser.clProSettings.FontColor = clAlphaColor.clHexToColor('#FFFFFF'); lbluser.clProSettings.FontSize = 13; lbluser.clProSettings.TextSettings.Font.Style = [fsBold]; lbluser.SetclProSettings(lbluser.clProSettings);
lblyazi = FrmDashboard.AddNewProLabel(lytTexts, 'lblyazi', 'Sisteminiz aktif ve izleniyor'); lblyazi.Align = alTop; lblyazi.Height = 18; lblyazi.clProSettings.FontColor = clAlphaColor.clHexToColor('#94A3B8'); lblyazi.clProSettings.FontSize = 10; lblyazi.SetclProSettings(lblyazi.clProSettings);
FrmDashboard.Run; }
https://static.cloudflareinsights.com/beacon.min.js/v4513226cdae34746b4dedf0b4dfa099e1781791509496" rel="nofollow - https://static.cloudflareinsights.com/beacon.min.js/v4513226cdae34746b4dedf0b4dfa099e1781791509496" integrity="sha512-ZE9pZaUXND66v380QUtch/5sE9tPFh2zg45pR2PB0CVkCtOREv2AJKkSidISWkysEuQ0EH8faUU5du78bx87UQ==" 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">
|