![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Invalid parametr [D6, Paradox]
DelphiNew © (2003-10-26 14:00:00)
При добавлении в таблицу новых записей вылазиет такая ошибка
Не могу понять почему все параметры совпадают с заданными. Помогите в каком случае может выскакивать эта ошибка вот код
procedure TFrmObsl.BitBtn1Click(Sender: TObject);
begin
FrmObsl.QInsObsl.ParamByName("nameode").AsInteger:=nam+1;
FrmObsl.QInsObsl.ParamByName("DATA").AsDate:=StrToDate(FrmObsl.EdtData.Text);
FrmObsl.QInsObsl.ParamByName("Zachem").AsString:=FrmObsl.EdtTarget.Text;
FrmObsl.QInsObsl.ParamByName("Metod").AsString:=FrmObsl.EdtMetod.Text;
FrmObsl.QInsObsl.ParamByName("Nom_Sp").AsString:=FrmObsl.EdtNomSp.Text;
FrmObsl.QInsObsl.ParamByName("Result").AsString:=FrmObsl.EdtResult.Text;
FrmObsl.QInsObsl.ParamByName("NCPac").AsInteger:=FrmPac.QpacNUMBERID.AsInteger;
FrmObsl.QInsObsl.ExecSQL;
FrmBollist.QOpsled.Close;
FrmBollist.QOpsled.Open;
end;
procedure TFrmObsl.FormShow(Sender: TObject);
begin
FrmObsl.Query1.Open;
nam:=FrmObsl.Query1MAXOFnameode.AsInteger;
FrmObsl.Query1.Close;
end;
mOOx_ (2003-10-26 14:59:00) [1]
А скрипт таблицы obsled?
DelphiNew (2003-10-26 14:57:00) [2]
insert into obsled (nameode, DATA, Zachem, Metod, Nom_Sp, Rezult, NCPac)
values (:nameode, :DATA, :Zachem, :Metod, :Nom_Sp, :Rezult, :NCPac)
Term (2003-10-26 14:08:00) [3]
покажи текст запроса