hallo ralf, ich mache soetwas immer mit einer
query und zwar so
Delphi-Quellcode:
with DM1.IBQuery3
do
Begin
Close;
SQL.Clear;
SQL.Add('
insert Into Tab_Mitarbeiter (VNummer
, Name
, Vorname
, Beruf
, Firmen_Id)'+
'
values (:VNummer,:Name,:Vorname,:Beruf,:Firmen_id)');
ParamByName('
VNummer') .AsString := Edit1.Text;
ParamByName('
Name') .AsString := Edit3.Text;
ParamByName('
Vorname') .AsString := Edit2.Text;
ParamByName('
Beruf') .AsString := Edit4.Text;
ParamByName('
Firmen_Id').AsInteger:= x[ComboBox1.ItemIndex];
Open;
end;
DM1.IBTrans1.Commit;
also ich versuche immer paramisierte felder zu nehmen .versuche es mal auf dein dataset umzusetzen.
raik
edit :ich hoffe du hast nicht 800*600 als auflösung, bei mir sieht es schrecklich aus