Search options (Page 1 of 7)

procedure FrmOth_Button1_OnClick (Sender: TObject; var Cancel: boolean);
begin
     FrmOth.Button1.dbSQL :=   ' SELECT login.login, login.FIO, '+
     ' (SELECT COUNT(*) FROM main WHERE main.id_login = login.id AND (main.data >= {DateTimePicker5} AND main.data <= {DateTimePicker6})) '+
      ' FROM login '+
      ' WHERE (login.aktiv = (2)) ';
               end;

procedure FrmOth_Button1_OnClick (Sender: TObject; var Cancel: boolean);
begin
     FrmOth.Button1.dbSQL :=   ' SELECT login.FIO, '+
                                    ' (SELECT COUNT(*) FROM main t1 WHERE t1.id_login = main.id_login) '+
                                    ' FROM main LEFT OUTER JOIN login ON login.id=main.id_login '+
                                    ' WHERE (login.aktiv = 2) '+
                                    ' group BY id_login ';
end;

' SELECT sch.id_print, '+
                                ' (SELECT max(sch) from sch t1 where (t1.id_print = sch.id_print) and (t1.id_priznzam = 1)), '+
                                ' (SELECT min(sch) from sch t2 where (t2.id_print = sch.id_print) and (t2.id_priznzam = 1)), '+
                                ' (SELECT  ((SELECT max(sch) from sch t1 where (t1.id_print = sch.id_print) and (t1.id_priznzam = 1)) - (SELECT min(sch) from sch t2 where (t2.id_print = sch.id_print) and (t2.id_priznzam = 1))) as t3) '+
                                ' from sch '+
                                ' group BY id_print ';

 begin
    if frm.ComboBox1.dbItemID = -1 then
    begin
        ShowMessage('Обязательное поле');
        frm.ComboBox1.SetFocus;
        frm.ComboBox1.DroppedDown := True;
        Cancel := True;
    end;

SQLExecute('INSERT INTO test(ee,dateTime)VALUES('''+Form1.DateTimePicker1.sqlDate+''')');

if t1.Date > "2021-04-27"

procedure form1_Button1_OnClick (Sender: TObject);
begin
if t1.Date > {DateTimePicker1} then ... 

select 
res.id_print as id       
, print.model as name     
, res.date as date    
, res.res as Res 
From res
LEFT OUTER JOIN print ON res.id_print=print.id 
WHERE res.id_Priznak = 1
GROUP BY print.model  

MAX(id) FROM res WHERE id_priznak =1
 для каждого id_print

select 
res.id_print as id       
, print.model as name     
, res.date as date    
, res.res as Res 
From res
LEFT OUTER JOIN print ON res.id_print=print.id 
WHERE (select id FROM res WHERE id_priznak =1)
????? и должно быть условие что id = MAX(ID) FROM res WHERE id_priznak =1 для каждого id_print