Наверное так:
Код:
DataModule4.FindQuery.SQL.Add('WHERE Кто LIKE '''+FindEdit.Text+'''' );
DataModule4.FindQuery.SQL.Add('and MyDate between :StartDate and :FinishDate');
DataModule4.FindQuery.Parameters.ParamValue['StartDate'] := StartDate;
DataModule4.FindQuery.Parameters.ParamValue['FinishDate'] := FinishDate; |