Einzelnen Beitrag anzeigen

Benutzerbild von SleepyMaster
SleepyMaster

Registriert seit: 18. Mai 2003
634 Beiträge
 
#1

Posten in der Shoutbox (per Delphi)

  Alt 2. Mai 2004, 00:08
Hi ihrs!

Erst mal sorry wegen meinem geflodde in der Shoutbox.
Mein Problem:

mit diesem (HTML )Code kann ich ohne Probleme posten.
Code:
<html>
<head>
</head>
  <form method="POST" action="http://www.delphipraxis.net/shoutbox_view.php">
   <input type="text"       name="message"       value="Sorry wegen dem flodden :)"/>
   <input type="submit"    name="shout"       value="Go"/>
  </form>
</body>
</html>
Doch mit Delphi schaff ichs nicht:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var strLParams:TStrings;
begin
   strLParams := TStringList.Create;
   strLParams.Add('message=Sorry wegen dem flodden :)');
   strLParams.Add('shout=Go');
   Memo1.Lines:=strLParams;
   try
     Memo1.Lines.Text := IdHTTP1.Post('http://www.delphipraxis.net/shoutbox_view.php', strLParams);
   except
     Memo1.Lines.Text := '';
   end;
   strLParams.free;
end;
Die Seite wird zwar geöffnet, aber mein Beitrag kommt nicht an!
Wo ist der Fehler???
Vielen Dank!
  Mit Zitat antworten Zitat