Запрос у тебя правильный, проверь тип параметра в Query и что в него передается.
Query1.Close;
Query1.ParamByName('ID_Paciyent').AsInteger := StrToInt (Edit3.Text);
Query1.Open;
if Query1.Recordcount=0 then
begin
Showmessage('Нет данных.....');
Query1.Close;
end;
-------------------
О... и еще один вопрос по теме: Как сделать так, чтобы при открытии формы мы получили имитацию нажатия кнопки "+" на напели DBNavigator (Добавление новой учетной записи)? Ну и конечно обработчик, для сохнанения даных в таблицу!
-------------------
Если ты добаляешь данные непосредственно в Grid то при открытии формы сделай Table.Insert;
Чтобы сделать свой обработчик кнопки DBNavigator необходимо
в методе BeforeAction написать:
case Button of
nbInsert : begin
/////
end;
end;
|