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

data := TIdMultiPartFormDataStream.Create;
  try
    { add the used parameters for the script }
    data.AddFormField('autor', 'value1');
    data.AddFormField('topic', 'value2');
    data.AddFormField('cat', 'vcl');
    data.AddFormField('id', 'value3');

    { Call the Post method of TIdHTTP and read the result into TMemo }
   idhttp1.Post('http://www.domain.de/data/data.php', data);
  finally
    data.Free;
  end;