Habe den scheinbaren Fehler gefunden:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
Response:String;
Stream:TStringStream;
LParams: TStringlist;
begin
Stream:=TStringStream.Create('');//Rückgabe-Stream erstellen
LParams := TStringlist.Create;
LParams.Add('param1=wert');
LParams.Add('param2=wert2');
LParams.Add('param3=wert3');
LParams.Add('param4=wert4');
IdHTTP1.Post('http://www.thru-soft.de/test.php', LParams, Stream);
Response:=Stream.DataString;
Showmessage(Response);
mem_feedback.Lines.Add(Response);
LParams.Free;
Stream.Free;
end;
Und der php-Code:
<?php
foreach ($_POST as $key => $value)
{
echo("$key.": ".stripslashes($value)."\n\n");
}
?>
Ergebnis? Keins!
Ich erhalte nur einen Leerestring zurück und sonst nix.
Dabei ist es doch gemaess php-Code so, dass ich eigentlich den Parameternamen und den Wert wiederbekommen sollte. Also nun ist zwar vom Code her alles ok, aber es funzt einfach nicht.
Warum nur?
Muss ich vielleicht noch irgendwas in der idhttp-Kompo einstellen?
Demnaechst sende ich vielleicht das ganze Projekt!?