Thema: Delphi Firebird in Netzwerk

Einzelnen Beitrag anzeigen

clock50

Registriert seit: 9. Nov 2005
Ort: Derenburg
183 Beiträge
 
Delphi 5 Professional
 
#5

Re: Firebird in Netzwerk

  Alt 18. Aug 2009, 11: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!
  Mit Zitat antworten Zitat