Ich hab den Fehler gefunden. Mit
AsWideString gehts:
Code:
WPData.DBQuery.SQL.Text := 'UPDATE "WPFILEITEMS" SET NAME=:NAME WHERE FILE_ID=1';
WPData.DBQuery.ParamByName('NAME').AsWideString := s;
WPData.DBQuery.ExecSQL;
WPData.DBQuery.SQL.Text := 'SELECT NAME FROM "WPFILEITEMS" WHERE FILE_ID=1';
WPData.DBQuery.OPEN;
s2 := WPData.DBQuery.FieldByName('NAME').AsWideString;
WPData.DBQuery.Close;