[delphi] Runtime Create van een Query

[Verwijderd]

Hallo

Ik moet Runtime een Query maken hoe doe ik dit?
Ik dacht zoiets als wat hieronder staat maar dat werkt nog niet echt

code:

unit xxx;

interface
uses ......

procedure X

implementation

procedure X
var InsertQuery : TQuery;
begin
  InsertQuery := TQuery.Create();
end;
end.

[edit: code tags [ code ] & [/ code ] toegevoegd]

[Verwijderd]

code:

var
  InsertQuery: TQuery;
begin  
  InsertQuery := TQuery.Create(nil);
  try
    ..
  finally
    InsertQuery.Free;
  end;
end;

[Verwijderd]

Merci :-)