Sayfayı Yazdır | Pencereyi Kapat

Obje var mı kontrolü

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=1226
Tarih: 13 Kasım 2025 Saat 15:02
Program Versiyonu: Web Wiz Forums 12.07 - https://www.webwizforums.com


Konu: Obje var mı kontrolü
Mesajı Yazan: M-Guney
Konu: Obje var mı kontrolü
Mesaj Tarihi: 13 Kasım 2025 Saat 10:52
Yapmış olduğum panel ile arkaplan efekti veriyorum fakat benim iki pop up'ımda da çalışmasını istiyorum aynı isaimde iki tane oluşturmaya çalıştığı için o uniti çalıştırmıyor.

void OpacityPnlVD
{
  if(OpacityPnl == nil){
  ShowMessage('opacity panel yok .')}
  if(OpacityPnl <> nil){
    OpacityPnl= MainForm.AddNewProPanel(MainForm,'OpacityPnl');
    OpacityPnl.Align=alCenter;
    //OpacityPnl.Width = 393;
    OpacityPnl.Width= (MainForm.clWidth);
    OpacityPnl.Height = (MainForm.clHeight*1.2);
    OpacityPnl.Visible=False;
    OpacityPnl.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#000000');
    OpacityPnl.opacity=0.6;
    OpacityPnl.SetclProSettings(OpacityPnl.clProSettings);
  }
}

void StatePopUp  // şEF SİPARİŞ DURUMUNA BASTIĞINDA AÇILACAK POPUP 
  { 
  OpacityPnlVD;
  StatePnl= MainForm.AddNewProPanel(MainForm,'StatePnl');

void WaiterPopUp  //GARSON SİPARİŞ DURUMUNA BASTIĞINDA AÇILACAK POPUP 
{
  OpacityPnlVD;
  
  WaiterPopUpPnl= MainForm.AddNewProPanel(MainForm,'WaiterPopUpPnl');



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