Registriert seit: 9. Nov 2005
Ort: Derenburg
183 Beiträge
Delphi 5 Professional
|
Re: Firebird in Netzwerk
18. Aug 2009, 12:51
Also Tansaktionen :
Standart Einstellungen
Zitat:
write
consistency
Ein Einfügen von Daten mache ich über IBSQL z.B.
Delphi-Quellcode:
var werte, sql : string;
begin
Inc(Pos);
werte := #39+inttostr(AnNr)+#39+' , '+#39+inttostr(Pos)+#39+' , '+#39+unit1.Einheit+#39+' , '+#39+' 1'+#39+' , '+#39+' Art-Text'+#39+' , '+#39+' 19'+#39+' , '+#39+' 0,00'+#39;
sql := ' Insert into ADATEN (ANR, POS, EINH, ANZ, TEXT, MWST, PREIS) VALUES ('+Werte+' ) ';
DM.SQL( sql);
Delphi-Quellcode:
procedure TDM.Sql( Sql : String);
begin
//showmessage(sql);
IBSQL1.SQL.Clear;
IBSQL1.SQL.Text := Sql;
IBSQL1.ExecQuery;
SQLUpdate;
end;
Thomas Man muß nicht alles wissen, man muß nur wissen in welchem Buch es geschrieben steht!
|
|
Zitat
|