ADOQueryUserLogin.SQL.Add('Where dDateTime Between :s1 And :s2');
ADOQueryUserLogin.Parameters[0].Value:=dStartDate;
ADOQueryUserLogin.Parameters[1].Value:=EndDate;
ADOQueryUserLogin.Open;
ADOQueryUserLogin.Parameters[0].Value:=dStartDate;
ADOQueryUserLogin.Parameters[1].Value:=EndDate;
ADOQueryUserLogin.Open;
ADOQueryUserLogin.Close;
ADOQueryUserLogin.SQL.Clear;
ADOQueryUserLogin.SQL.Add('Select * From TbCCTVLogin');
ADOQueryUserLogin.SQL.Add('Where dDateTime Between '''+datetimetostr(dStartDate)+' And '''+datetimetostr(dEndDate)+'''');
ADOQueryUserLogin.Open;
SELECT * FROM TABLE1 WHERE DAT>="2002-2-2"
SELECT * FROM TABLE1 WHERE DAT>=:DAT1
Query1.ParamByName('Dat').asDate=TimePicker.Date;