Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
Delphi 8 Professional
|
Re: InsertSQL
14. Mär 2007, 12:40
Warum machst Du das nicht so ?
Delphi-Quellcode:
procedure Add_New_Terminal(typ, Bez, Beschr :String);
begin
with D_DataModule.DataSet do
begin
Insert;
FieldByName ('TYP').AsString := typ;
FieldByName ('BEZEICHNUNG').AsString := Bezeichnung;
FieldByName ('BESCHREIBUNG').AsString := Beschr;
Post;
end;
end;
[/quote]
Gruß
Hansa
|