пробовал так
Код:
q.SQL.Text:= 'select count(*) as cnt from LichDan where [Увольнение] ='+QuotedStr('По статье')+'and [Должность]='+QuotedStr('Инженер')+'and [Должность]='+QuotedStr('Монтажник');
Программа компилируется, но кусок запроса после последнего end не работает и ошибок ни каких не выдает. В чем может быть проблема?