Ah, jetzt ist mir eingefallen wie ich es gemacht habe:
Delphi-Quellcode:
function StringToPostData( Str:
String):OleVariant;
var
i,l:Integer;
PostDataArray:Variant;
begin
l:=Length( Str);
PostDataArray:=VarArrayCreate([0,l-1],varByte);
for i:=0
to l-1
do
PostDataArray[i]:=Byte( Str[i+1]);
Result:=PostDataArray;
end;
...
var
URL,Flags,TargetFrameName,PostData, Header: OleVariant;
begin
...
PostData:=StringToPostData(...);
Header:='
Content-Type: application/x-www-form-urlencoded'#13#10;
IE.Navigate(
URL,Flags,TargetFrameName,PostData, Header);
Es hat immer problemlos funktioniert.