Переменные StartDate и FinishDate не объявил, вот и ругается. И последние 2 строчки так напиши:
Код:
DataModule4.FindQuery.Parameters.ParamByName('StartDate').Value := StartDate;
DataModule4.FindQuery.Parameters.ParamByName('FinishDate').Value := FinishDate;