Hi,
ich habe nach einem Tuturial(Klick Mich) einen script erstell der an eine PHP datei auf einen Webserver eine nachricht sendet. Aber leider functioniert es nicht ganz so wie ich möchte

zusammenfalten · markieren

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
  IdHTTP;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Memo1: TMemo;
    Memo2: TMemo;
    Button1: TButton;
    IdHTTP1: TIdHTTP;
    procedure Button1Click(Sender: TObject);
   
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var Strings: TStringList;
begin


  Strings := TStringList.Create;
  Button1.Enabled := False;
  try
    Strings.Add('mode=write');
    Strings.Add('user='+Edit1.Text);
    Strings.Add('pw='+Edit2.Text);
    Strings.Add('code='+Memo1.Lines.Text);
    try
      HTTP.Post('http://www.deinhost.de/interface.php', Strings);
    except
     on E: Exception do
       showmessage('Error encountered during POST: ' + E.Message);
    end;
  finally
    Strings.Free;
  end;
  Button1.Enabled := True;
end;



end.

Als Fehlermeldung bekomme ich:

markieren

Code:

[DCC Error] Unit1.pas(47): E2003 Undeclared identifier: 'HTTP'

wäre nett wenn ihr mir helfen könntet

mfg

n3r0f0x

Hallo und Willkommen in der DP ,

Deine Komponente heißt ja auch IdHTTP1 und nicht HTTP

dankeee
functioniert alles mfg n3r0f0x