![]() |
HTML-<Form> simulieren, per POST verschicken
Ich möchte folgende HTML-Form simulieren:
Code:
Wenn man nun auf das Bild klickt, wird der Punkt an dem man geklickt hat in x und y-Koordinaten übergeben. Eine GET-Addresse würde so aussehen:
<form name="f1" action="abc.php" method="POST">
<input type="hidden" name="id" value="1"> <input type="image" name="bild" value="x" src="bild.jpg" border="0"> </form>
Code:
Die obige HTML-Form will ich in Delphi 'simulieren', d.h. sie soll nie angezeigt werden, und das ganze soll dann per POST mit meinen eigenen Werten 'versandt' werden.
abc.php?id=1&bild.x=54&bild.y=32
Ich hab mich so daran versucht, aber mit dem Bild hab ich schwierigkeiten:
Delphi-Quellcode:
Das ganze scheint so nicht zu funktioniernen. Kann mir jemand helfen?
var
data : TIdMultiPartFormDataStream; IdHTTP1: TIdHTTP; begin data := TIdMultiPartFormDataStream.Create; IdHTTP1 := TIdHTTP.Create(Form1); try data.AddFormField('id', '1'); data.AddFormField('bild.x', '54'); data.AddFormField('bild.y', '32'); Memo1.Lines.Text := IdHTTP1.Post('abc.php', data); finally data.Free; end; end; thx, Philipp |
Re: HTML-<Form> simulieren, per POST verschicken
Hi!
Was genau funktioniert denn nicht? Gibt es Fehlermeldungen (und welche?) Ciao fkerber |
Re: HTML-<Form> simulieren, per POST verschicken
Alle Variablen, sogar die id-Variable sind undefiniert.
ciao, Philipp |
Re: HTML-<Form> simulieren, per POST verschicken
Soooo ... ich glaub, ich habs:
Delphi-Quellcode:
Manche Codes in der DP sind auch so verwirrend ... so geht es jedenfalls.
var
data : TStringList; IdHTTP1: TIdHTTP; begin data := TStringList.Create; IdHTTP1 := TIdHTTP.Create(Form1); data.Add('id=1'); data.Add('bild.x=54'); data.Add('bild.y=32'); Memo1.Lines.Text := IdHTTP1.Post('abc.php', data); end; Zuerst denkt man sich so was kompliziertes aus, und dann geht es so einfach ... :wall: ciao, Philipp |
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:31 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz