PHP und Delphi

[Joe the Junkie]

Ich denke die Frage kam schon sher sehr oft, aber ich habe auch durch suchen irgendwie nicht das gefunden, was ich haben möchte.

Ich würde gerne ein Delphiprogramm schreiben, dass einige Leute auf ihrem Rechner haben. In diesem Programm sind zwei Editfenster, in denen man seinen Nickname und das Passwort eingibt. Diese Werte werden dann an ein PHP-Script weitergeschickt, und das Programm bekommt diese Werte.

D.h. im klartext

User xxxx wil sich einloggen.
Er startet das programm gibt seinen NAmen und sein Passwort an. Ein PHP-Script von mir im inet wertet die Daten aus und schickt an das Programm rückwerte, bzw das Delphiprogramm versucht sie sich zu beziehen.


Kann mir da einer helfen ider ist da unmöglich?

[gekmihesg]

is eigendlich nicht schwer.
die daten musst du einfach über post an dein script senden (z.b. mit idhttp).
vom phpscript aus kannst du mit der funktion fopensocket dann zum delphi programm senden.

[SirThornberry]

wie schon geschrieben ist das ganz simpel. per idhttp die daten mit post oder get, je nach dem was dir lieber ist an das script senden und dann kannst du im Script ja mit "print" oder "echo" etwas ausgeben. Zum Beispiel "Fehler" wenn das nicht geklappt hat und das wird dir dann als result beim senden zurückgegeben im Delphiprogramm

[Nightshade]

Einen Button , zwei Edits, ein Memo und ein idHttp (Indy-Components) aufs Formular werfen :

Delphi-Quellcode:

procedure TForm1.BitBtn1Click(Sender: TObject);
var sl : TStringlist;
begin
  sl := TStringList.Create;
  sl.Add('Username='+Edit1.text);
  sl.Add('Passwort='+edit2.Text);
  Memo1.Text := idHttp1.Post('http://www.dartyducks.de/return.php',sl);
  FreeAndNil(sl);
end;

return.php :

Code:

<?php
echo "Entered Username : ".$_POST['Username'].chr(13).chr(10);
echo "Entered Passwort : ".$_POST['Passwort'].chr(13).chr(10);
?>

PS : Die return.php liegt auch noch auf dem Server, kannst du also mit rum-experimentieren.

[supermuckl]

zwischen den parametern müssen aber noch & dazwischen und nach der aufzurufender scripturl noch ein ?

www.bla.com/script.php?var1=bla&var2=blaa

usw

[Joe the Junkie]

Ich danke euch für eure Super Hilfe, das hier ist echt ne super Community, macht weiter so!

[Mamphil]

Zitat von supermuckl:

zwischen den parametern müssen aber noch & dazwischen und nach der aufzurufender scripturl noch ein ?

www.bla.com/script.php?var1=bla&var2=blaa

usw

Nein, ich denke nicht. So wie ich das verstanden habe, wird im obigen Beispiel doch per POST gesendet und die Parameter landen in einer "TStringList".

Mamphil

[Joe the Junkie]

Naja, mal ganz ehrlich jetzt, irgendwie hat mir ales noch nicht so ganz geholfen und das beispiel, was mir gegeben wurde tut auch nicht, außer dem sacht Delphi bei dem idhttp.post irgendwie immer einen Fehler. Köte mir vieleicht jemand, ein kompletes prog schreiben (hier ins Forum) was tuen würde?

[Nightshade]

Die Version die ich geschrieben habe hat funktionier (zumindest bei mir)...

Aber hier nochmal die Dateien :

[Borlox]

Hi Nightshade,

habe gerade mal versucht, etwas mit POST zu senden (mit deinem Code), aber ich bekomme es einfach nicht hin! Dann habe ich auch nochmal deine Dateien auprobiert und es kommt in beiden Fällen der gleiche Fehler:

[Error] Unit1.pas(40): There is no overloaded version of 'Post' that can be called with these arguments

Ne Ahnung, was das sein könnte?

THX
Borlox