1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:

procedure TForm1.Button1Click(Sender: TObject);
var
  Params: TIdMultiPartFormDataStream;
  ReturnMemoryStream: TMemoryStream;
  ReadOut: array of Char;
  StreamSize: Integer;
begin
  ReturnMemoryStream:=TMemoryStream.Create;
  Params:=TIdMultiPartFormDataStream.Create;
  Params.AddFormField('Passwort', 'Test');
  try
    MySQLIdHTTP.Post('http://killprocess.ki.funpic.de/Passwort.html', Params, ReturnMemoryStream);
    StreamSize:=ReturnMemoryStream.Size;
    ReturnMemoryStream.Position:=0;
    SetLength(ReadOut, StreamSize);
    ReturnMemoryStream.ReadBuffer(ReadOut[0], StreamSize);
    ShowMessage(String(ReadOut));
  except
    Application.MessageBox('Fehler beim Abruf von Daten', 'HTTP-Fehler', 16);
  end;
  FreeAndNil(Params);
  FreeAndNil(ReturnMemoryStream);
end;                    

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

<?php
  echo $_Post["Passwort"];
  if ($_Post["Passwort"]=="Test")
  {
     echo("1");  
  }
  else
  {
    echo("0");
  }
?>