ADO: Parameter funktionieren nicht(oder ich wende falsch an)

[Die Muhkuh]

Hi,

ich hab nochmal ein Problem mit meiner Accessdatenbank, auf welche ich per ADO zugreife.

Delphi-Quellcode:

for I := 0 to Count - 1 do
    begin
      p := Items[I];

      profilequery.SQL.Text := 'INSERT INTO profile (user, password, domain, desc) ' +
        'VALUES (:user, :pw, :domain, :desc)';

      with profilequery.Parameters do
      begin
        ParamByName('user').Value := p.Benutzername;

        with TCipher_Rijndael.Create(PW, nil) do
        begin
          ParamByName('pw').Value := EncodeString(p.Passwort);
        end;

        ParamByName('domain').Value := p.Domain;
        ParamByName('desc').Value := p.Beschreibung;
      end;

      tmp := profilequery.SQL.text;  // Nur zum Test [1]

      profilequery.ExecSQL;


      profilequery.Close;
    end;

Das Problem ist, dass nach dem einfügen der Parameter, die Parameter nicht verändert werden.
Will heißen, im tmp ([1]) steht noch der SQL-Befehl, ohne die veränderten Parametern.

Vielleicht verwende ich das auch falsch

Danke für euere Antworten,

mfG,

Manu