Saludos gente del foro
Espero por la ayuda de uds. Estoy comenzando en Delphi y estoy haciendo un programa con base de datos Paradox. El problema es que quiero usar un DBNavigator y al usar el botón Post insertar mi código, pero no graba el registro, me dice que le falta un campo, que de hecho es el indice que es autoincremento dsde el código, he tratado con todo y bueno esto es lo último, aquí está para que le echen una ojeada, gracias de antemano. (y).
Código Delphi
[-]
.........
nbPost:
begin
Query2.Close;
Query2.SQL.Clear;
Query2.SQL.Text:='Select Fecha,Campo From Tabla Where (Fecha = :Fec) And (Campo = :Camp)';
Query2.ParamByName('Camp').asString := QuotedStr(DBLookUpComboBox1.Text);
Query2.ParamByName('Fec').asDate := DateTimePicker1.Date;
Query2.RequestLive := true;
Query2.Open;
Tamano:=Query2.RecordCount;
if Tamano <> 0 then
begin
Showmessage('Este campo ya está registrado.');
Query1.Cancel;
end
else
begin
Table2.FieldByName('Id').AsInteger :=Table2.RecordCount+1;
Table2.FieldByName('Fecha').AsDateTime:=DateTimePicker1.Date;
Table2.FieldByName('Campo').AsString := DBLookUpComboBox1.Text;
end;
DateTimePicker1.Date:=DateTimePicker1.Date+1;
end;
.........