Ist schon etwas älter aber ich bin gerade durch die Suche drauf gestoßen.
Wenn die Webseite in ISO-8859-1 kodiert ist:
Delphi-Quellcode:
Params := TStringStream.Create('');
try
Params.WriteString('name=' + HTTPEncode('value') + '&');
// [...]
finally
Params.Free;
end;
Wenn die Webseite in UTF-8 kodiert ist:
Delphi-Quellcode:
Params := TStringStream.Create('', CP_UTF8);
try
Params.WriteString('name=' + 'value' + '&'); // ggf. SmallHTTPEncode()
// [...]
finally
Params.Free;
end;
// [...]
function SmallHTTPEncode(AStr: string): string;
begin
result := StringReplace(AStr, '&', '%26', [rfReplaceAll]);
end;
Damit fahre ich ATM ganz gut.
Und dann gibt es noch den Weg über TIdMultiPartFormDataStream, dass würde aber hier den Rahmen sprengen.