Bonjour,
je suis en train d'essayer (je débute tout juste sur delphi) de faire un client http qui va uploader un fichier à l'aide du composant Indy. Je comprend pas pour quoi sa marché, ça me lève une exception EAccessViolator
Voila ma source
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
program Project2;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils,
  IdMultipartFormData,
  IdHTTP;
 
var
  MultiPartFormDataStream: TIdMultiPartFormDataStream;
  monhttp: TIdcustomHTTP;
 
begin
    monhttp.Create(nil);
    MultiPartFormDataStream := TIdMultiPartFormDataStream.Create;
    try
      MultiPartFormDataStream.AddFile('userfile', 'C:\Sites web\CubeSNMP\grid.css' , 'multipart/form-data');
      MultiPartFormDataStream.Position := 0;
      //Poste !
      monhttp.Post('http://localhost/testFichier/upload.aspx', MultiPartFormDataStream);
    finally
      MultiPartFormDataStream.Free;
  end;
end.