1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:

var
 filest:tfilestream;
 post:tstringstream;
 tag,s:string;
 buffer:tstringstream;
 http:tidhttp;
begin


  http:=tidhttp.create(nil);
  buffer:=tstringstream.create('');
  post:=tstringstream.create('');
  filest := tfilestream.create(filename,fmOpenRead,fmShareDenyNone);

  tag := '7d292f3201ec';

  //der part muss für jede variable die mitübergeben werden soll wiederholt werden
  //'varname' ist der name und 'inhalt' der inhalt (naja logisch oder)
  s:=s+'-----------------------------'+tag+#13#10;
  s:=s+'Content-Disposition: form-data; name="varname"'+#13#10+#13#10;

  s:=s+'inhalt'+#13#10;
  //--------------


  //namepic ist der name mit dem die datei im phpscript identifiziert wird
  //( in html: es ist der name des <input type=file ... im uploadform)
  //filename ist der pfad zur datei
  s:=s+'-----------------------------'+tag+#13#10;
  s:=s+'Content-Disposition: form-data; name="namepic"; filename='+filename+#13#10;
  //folgendes für ein belibiege datei
  s:=s+'Content-Type: application/octet-stream'+#13#10+#13#10;
  //oder für ein image da geht das obere aber auch, also lieber immer das oben
  //s:=s+'Content-Type: image/pjpeg'+#13#10+#13#10;


  post.writestring(s);
  post.copyfrom(filest,0);

  //hier können auch noch variablen übergeben werden!

  s:='-----------------------------'+tag+'--'+#13#10#13#10;
  post.writestring(s);



  http.request.ContentType := 'multipart/form-data; boundary=---------------------------'+tag;
  http.request.Contentlength := post.size;

  

  try
   http.post(url,post,buffer)
  except
  end;

  //im buffer wird die antwort des scripts gespeichert, falls du das analysieren willst


  http.free;
  buffer.free;
  post.free;
  filest.free;
 

end;