Şube Kodu İşaretlendiğinde ComboBox'ın Kapatılması.

Rs:=PrepareStmDirect("SELECT parametre_kolonu FROM parametre_tablosu")
  If Not Rs.ExecuteStm() Then
    MessageBox("HATA MESAJI","HATA",MB_ICONSTOP)
    Return
  EndIf
    if rs.MoveNext() Then    
    degiskene_tanimlanan_parametre_kolonu:=rs.parametre_kolonu 
  Endif
  rs.Close()
  
    if Null2Zero(degiskene_tanimlanan_parametre_kolonu) = 1 Then  
    f.CmbIsım.Enabled:=True
  Else
    f.CmbIsım.Enabled:=false
  EndIF

Last updated

Was this helpful?