Шығыс Қазақстан облысының білім басқармасы


Splash := ShowSplashWindow(Application.Icon



Pdf көрінісі
бет151/180
Дата06.01.2022
өлшемі4,77 Mb.
#15026
1   ...   147   148   149   150   151   152   153   154   ...   180
Байланысты:
УМК-ОББ

Splash := ShowSplashWindow(Application.Icon, 
    'Загрузка данных. Подождите, пожалуйста...', False,  
    Application.MainForm);  
try 
 DataSource1.Enabled :=False; 
   With ADOQuery1 do begin 
    if Active=True then Active:=False; 
    SQL.Clear; 
    strSQL:= 'SELECT * FROM Страны ORDER BY Страны.'+NameSortField; 
    if Desc then strSQL:=strSQL+' DESC;' else strSQL:=strSQL+';'; 
    SQL.Add(strSQL); 
    Active:=True; 
   end; 
 DataSource1.Enabled :=True; 
 finally  
    Splash.Free;  
  end;  
end; 
Қадам 3 – мәліметтерді фильтрациялау және іздеу  
1. 
Елдерді атауы бойынша іздеу ыңғайлылығы үшін RxDBAware  бетінен  paTop  
тақтасына  TRxLookupEdit    компонентін  орналастырыңыз.  Объектілер  инспекторында  осы 
компонентің қасиеттеріне келесі мәндерді беріңіз: 


Достарыңызбен бөлісу:
1   ...   147   148   149   150   151   152   153   154   ...   180




©emirsaba.org 2024
әкімшілігінің қараңыз

    Басты бет