NewQuerySQL; end;
procedure TfmMain.FormCreate(Sender: TObject);
begin
NameSortField:=DBGrid1.Columns[0].FieldName;Desc:=False;
NewQuerySQL; end;
4.
Бағдарламаны орындау үшін іске қосыңыз және бағаналардың сұрыпталуы
ойлағандай іске асып жатқанына көз жеткізіңіз.
5.
МҚ – на сұрауды орындау уақытында бағдарлама қолданушының әрекетіне
жауап бермейді және оны ол туралы ескеру керек. Rx кітапханасында осыны істеуге
көмектесетін ShowSplashWindow арнайы функция бар. Бұл функцияның суреттелуін
кітапхана бойынша анықтамада оқыңыз, содан кейін unMain модулінің мәтініне төменде
қара шрифтпен бөліп көрсетілген жолын орналастырыңыз:
var
fmMain: TfmMain;
NameSortField:string;Desc:boolean;
implementation
uses SplshWnd;
{$R *.DFM}
procedure TfmMain.NewQuerySQL;
var strSQL:string;Splash: TForm; begin
