Entwickler-Ecke :: Thema anzeigen - Login formular in Delphi und per Post an die PHP Datei überg

jackie05 - Mi 23.01.08 00:15
Titel: Login formular in Delphi und per Post an die PHP Datei überg

Hallo,
ich möchte etwas versuchen und zwar, habe ich in Delphi ein Login formular erstellt und wenn ich auf Login klicke, dann sollen die Daten von Edit1 und Edit2 an die login.php übergeben werden.

Da das ganze in PHP über POST ermittelt wird, weiss ich jetzt nicht wie ich die Daten übergeben soll, über idHTTP1.Get geht das nicht, man müsste es schon mit idHTTP1.Post machen.

Eigentlich müsste ich ja erst die einzelnen Daten in idHTTP1.Post füllen und diese dann mit Stream absenden.

z.B. idHTTP1.Post('http://www.deineseite.de/login.php',stream);

Ich weiss leider nicht wie ich das machen soll, ich wäre euch sehr dankbar, wenn ihr mir helfen könntet.
Vielen Dank.

EDIT Hat sich erledigt, ich habe das so gelöst:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

  Strings := TStringList.Create;
  try
    Strings.Add('Loginname=jackie05');
    Strings.Add('Loginpass=Test');
    Strings.Add('act=Login');
    try
    memo1.text := idHTTP1.Post('http://deineseite.de/login.php', Strings);
    except
     on E: Exception do
       showmessage('Error encountered during POST: ' + E.Message);
    end;
  finally
    Strings.Free;
  end;

MfG

jackie05 - Mi 23.01.08 02:20

Ich habe da noch ein kleines problem und zwar, wenn das Passwort z.B. falsch ist, dann hängt sich mein Programm für eine kurze zeit auf, das hat was mit dem idHTTP1.Post zu tuhen.
Wie kann ich das so machen, wenn
idHTTP1.Post('http://deineseite.de/login.php, Strings);

eine 0 zurück gibt, damit mein Programm dann nicht hängt?

Ich bedanke mich schonmal.

MfG

dieter1a - Mi 30.01.08 03:14
Titel: Re: Login formular in Delphi und per Post an die PHP Datei überg

jackie05 hat folgendes geschrieben:

EDIT Hat sich erledigt, ich habe das so gelöst:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

  Strings := TStringList.Create;
  try
    Strings.Add('Loginname=jackie05');
    Strings.Add('Loginpass=Test');
    Strings.Add('act=Login');
    try
    memo1.text := idHTTP1.Post('http://deineseite.de/login.php', Strings);
    except
     on E: Exception do
       showmessage('Error encountered during POST: ' + E.Message);
    end;
  finally
    Strings.Free;
  end;

MfG

Sorry, wenn ich hier nachfrage.

Ich denke ich habe ein ähnliches Problem mit Delphi.
Ich kriege es nicht geregelt einen String an eine PHP zu schicken und einen Antwort-String zu erhalten.
Habe das bisher mit Director gelöst, was aber nicht das Gelbe vom Ei ist.
Mit obigem Script hast du ja wohl eine Teillösung gefunden.
Ist es von mir vermessen Dich um das komplette Script zu bitten?
Ich möchte mir damit als Anfänger mit Delphi einen Überblick verschaffen.

Ich wäre Dir sehr dankbar.

MfG dieter1a

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!