Du nennst den Paramter ID und versuchst einen parameter BenutzerID zu fülle,
Delphi-Quellcode:
const SQL_COPY1
= 'INSERT INTO PROFIL(Datum)'
+'SELECT *, %s FROM PROFIL'
+'WHERE BenutzerID = :ID';
...
ADODataSet.Close;
ADODataSet.FieldValues['BenutzerID'] := Label1.Caption;
ADODataSet.CommandText := Format(SQL_COPY1, [DateToStr(Date)]);
ADODataSet.Open;