Einzelnen Beitrag anzeigen

Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.733 Beiträge
 
Delphi 6 Enterprise
 
#3

AW: Daten mit SQLDataSet in mysql-Datenbank schreiben

  Alt 30. Mär 2017, 09:28
Man sollte meiner Erfahrung mit ADO-Komponenten nach, weiß nicht ob's auch anderswo besser geht, so wie bei nahpets Beispiel zwei Anweisungen getrennt hintereinander ausführen. Theoretisch könnte man ja auch alle Anweisungen mit Semikolon getrennt hintereinanderschreiben und das dann nur ein mal Ausführen, aber das klappt mMn nicht.

Man könnte allerdings das ganze Schleifengerafel weglassen zu:

Delphi-Quellcode:
'...where datenbank_alt.Tabelle20.reihenfolge in (5,6,7,8,9,10)'

//oder
'...where datenbank_alt.Tabelle20.reihenfolge between 5 and 10'

//oder wenn's was dynamisches ist:
'...where datenbank_alt.Tabelle20.reihenfolge in ('+SQL_Liste+')'

function SQL_Liste:String;
var z : integer;
begin
  for z:=5 to 10 do
    begin
    if Result<>'then Result:=Result+','
    Result:=Result+IntToStr(z)
    end;
end;
Ralph
  Mit Zitat antworten Zitat