|
var MainForm:TCLForm; MainScaledLayout:TclScaledLayout; FlowLayout:TclProFlowLayout; FinansalOzetBtn,StarejikPlnBtn,HammaddeVeUretimBtn,IkBtn,StokBtn,TedarikBtn,PerformansBtn,KarbonAyakiziBtn,AcilDurumVeArizaBtn,CikisBtn:TClProButton; MainPnl,UstPnl,MerhabaContainerPnl,TarihPnl,MenuGridPnl,AltBlokPnl,OperasyonelAkisPnl,AjandaPnl,AkisSatirPnl,FAIkonPnl: TclProPanel; MerhabaLbl,MerhabaAltBaslikLbl UstFlodolaLbl,UstModulLbl,TarihLbl,AkisBaslikLbl,AjandaBaslikLbl,FALbl,DetayLbl: TClProLabel; CikisIcon:TCLImage; { //AnaForm MainForm = TCLForm.Create(Self); MainForm.clSetWindowState(fwsMaximized);// Tam ekran MainForm.BtnFormMenu.Visible = False; MainForm.BtnGoBack.Visible = False; MainForm.clSetCaption('----- CEO PANEL ----- '); MainForm.SetFormColor('#075660','',clGNone); //Scaled Layout MainScaledLayout = MainForm.AddNewScaledLayout(MainForm, 'MainScaledLayout'); MainScaledLayout.Align = alClient; if (Clomosy.PlatformIsMobile) // PlatformIsMobile { MainScaledLayout.OriginalWidth = 1000; MainScaledLayout.OriginalHeight = 1200; } else { MainScaledLayout.OriginalWidth = 1500; MainScaledLayout.OriginalHeight = 740; } //Main Panel MainPnl=MainForm.AddNewProPanel(MainScaledLayout, 'MainPnl'); MainPnl.Align= alClient; MainPnl.Margins.Top =(MainForm.clHeight*10)/100; MainPnl.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#F8FAFC'); MainPnl.SetclProSettings(MainPnl.clProSettings); //Üst Panel UstPnl=MainForm.AddNewProPanel(MainScaledLayout, 'UstPnl'); UstPnl.Align= alTop; UstPnl.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#075660'); UstPnl.SetclProSettings(UstPnl.clProSettings); //Üst Flodola label UstFlodolaLbl=MainForm.AddNewProLabel(UstPnl, 'UstFlodolaLbl', 'FLODOLA'); UstFlodolaLbl.Align= alNone; UstFlodolaLbl.Position.X =(UstPnl.Width*2)/100; UstFlodolaLbl.Position.y =(UstPnl.Height*20)/100; UstFlodolaLbl.clProSettings.AutoSize = True; UstFlodolaLbl.clProSettings.FontColor = clAlphaColor.clhextocolor('#F8FAFC'); UstFlodolaLbl.clProSettings.FontSize = 20; UstFlodolaLbl.clProSettings.TextSettings.Font.Style =[fsBold]; UstFlodolaLbl.SetclProSettings(UstFlodolaLbl.clProSettings); //Üst Modül Label UstModulLbl=MainForm.AddNewProLabel(UstPnl, 'UstModulLbl', 'Ceo Modülü'); UstModulLbl.Align= alNone; UstModulLbl.Position.X =(UstPnl.Width*2)/100; UstModulLbl.Position.y =(UstPnl.Height*98)/100; UstModulLbl.clProSettings.AutoSize = True; UstModulLbl.clProSettings.FontSize = 11; UstModulLbl.clProSettings.FontColor = clAlphaColor.clhextocolor('#F8FAFC'); UstModulLbl.SetclProSettings(UstModulLbl.clProSettings); //Çıkış Buton CikisBtn=MainForm.AddNewProButton(UstPnl, 'CikisBtn', ''); CikisBtn.Align=alNone; CikisBtn.height = (UstPnl.Height*150)/100; CikisBtn.Width = (UstPnl.Height*150)/100; CikisBtn.Position.X =(UstPnl.Width*92)/100; CikisBtn.Position.y =(UstPnl.Height*30)/100; CikisBtn.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#F8FAFC'); CikisBtn.clProSettings.BorderWidth = 1; CikisBtn.clProSettings.RoundHeight = 8; CikisBtn.clProSettings.RoundWidth = 8; CikisBtn.SetclProSettings(CikisBtn.clProSettings); //Çıkış Buton İcon bitmedi CikisIcon =MainForm.AddNewImage(CikisBtn,'CikisIcon'); MainForm.SetImage(CikisBtn,'LogoutIcon'); CikisIcon.align =alNone; kodu kullandığımda şu hatayı almaktayım RUNTIME ERROR File library NewCeoAnaSayfa: Error loading image: Loading bitmap failed (C:\Users\Furkan EREL\Desktop\ClomosyLearn\Assets\Projects\CLOSTARTER\1905467A2B2\LogoutIcon). when evaluating instruction CallProc ($FFFFFFFF,$2,$16BA270,$0,'SetImage'). Stack content is: [1683309940480,Null,Null,Null...]. Source position: 82,43 Position: 82, 43
https://static.cloudflareinsights.com/beacon.min.js/v8c78df7c7c0f484497ecbca7046644da1771523124516" rel="nofollow - https://static.cloudflareinsights.com/beacon.min.js/v8c78df7c7c0f484497ecbca7046644da1771523124516" integrity="sha512-8DS7rgIrAmghBFwoOTujcf6D9rXvH8xm8JQ1Ja01h9QX8EzXldiszufYa4IFfKdLUKTTrnSFXLDkUEOTrZQ8Qg==" 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" style="display: none !important;">
|