Einzelnen Beitrag anzeigen

cltom

Registriert seit: 22. Sep 2005
221 Beiträge
 
Delphi 12 Athens
 
#8

AW: Programmnutzung einfach ermitteln

  Alt 20. Jun 2013, 14:55
nochmals danke, das nimmt langsam Form an (in anderen Worten: der zusammengeschusterte Fleckerlteppich lässt sich zumindest schon compilieren).

Eine Sache ist noch offen: Die Prozedur ist ziemlich genau wie im original, den Proxy hab ich jetzt mal bei mir drin.

Delphi-Quellcode:
var
  Params: TStringList;
  Enc: TEncoding;
  ResponseStr: string;
begin
  with TIdHTTP.Create(nil) do
    try
      //hier wurde der Proxy eingefügt
      Request.ContentType := 'application/x-www-form-urlencoded';
      Params := TStringList.Create;
      try
        with Params do
        begin
          Add('sometext');
        end;
        Enc := CharsetToEncoding(Request.CharSet);
        try
          ResponseStr := Post('http://www.delphipraxis.net/login.php?do=login', Params, Enc);
        finally
          Enc.Free;
        end;
      finally
        Params.Free;
      end;
    finally
      Free;
    end;
hier wird kein Params-String übergeben. Wenn ich die php-Datei im Browser aufrufe, klappt es. Es wird das php auch ausgeführt (ich lasse im php einen Text einfügen, der kommt auch, bloß eben der Params-String nicht).

Habt Ihr da noch Hinweise?
  Mit Zitat antworten Zitat