Hallo,

ich wollte mal fragen, was geanu das ADOQuery macht, wenn ich sage:

markieren

Delphi-Quellcode:

var
  q : TAdoQuery;
begin
  q:= TAdoQuery.Create(nil);
  q.Connection:= AdoConnection;
  q.SQL.Text:= 'SELECT * FROM Tabelle';
  q.Open;
  ....

Werden hier schon Daten beim Open übertragen oder nicht? Der Profiler zeigt ja sowas scheinbar nicht an...
Nun möchte ich einfach einen Datensatz anhängen mit Append. Muss da immer das Select vorausgehen oder wäre das nicht unnötige "Speicherverschwendung"?


Danke Tim

Hallo Tim,

nach dem .Open beginnt das DBMS damit ein Query auszuwerten und ggf. Daten an den Client zu übertragen.
Wenn Du neue Daten in die Tabelle einfügen möchtest und nicht mit einem INSERT Befehl von SQL arbeiten möchtest könntest Du es so machen:


ich wollte mal fragen, was geanu das ADOQuery macht, wenn ich sage:

zusammenfalten · markieren

Delphi-Quellcode:

var
  q : TAdoQuery;
begin
  q:= TAdoQuery.Create(nil);
  q.Connection:= AdoConnection;
  q.SQL.Text:= 'SELECT * FROM Tabelle WHERE 0=1'; // Da die Bedingung immer False ist wird kein Datensatz zum Cl übertragen.
  q.Open;
  q.Insert;
  q.FieldByName ('blubb').AsString := 'blubb'
  q.Post;
  ....

Danke für die Antwort, aber wie macht man denn das ganze z.B., wenn man eine Form und 3 TDBMemos, sowie eine Datasource und ein AdoQuery als visuelle Komponente hat?

markieren

Delphi-Quellcode:

Datasource1.Dataset:= Query;
DBMemo1.Datasource:= Datasource1;
DBMemo1.Datafield:= 'Feld1';

Bisher hab ich das immer so gelöst, dass ich beim onShow-Event folgendes gemacht habe:

markieren

Delphi-Quellcode:

procedure TForm1.FormShow(Sender: TObject);
begin
  Query.SQL.Text:= 'SELECT * FROM tabelle';
  Query.Open;
  Query.Append;
end;

und bei onOK-ButtonPress:
  Query.Post; Ist das wirklich die beste Lösung?