PDA

Ver la Versión Completa : Problema con subir archivos


JuanOrtega
19-07-2013, 16:29:46
Hola estoy tratando de subir un archivo con el api de imageshack.

El codigo que tengo es este :

procedure TForm1.Button1Click(Sender: TObject);
var
par: TIdMultiPartFormDataStream;
rta: string;
Response: TStream;

begin


//Response := TMemoryStream.Create;
//rta:=IdHTTP1.Post('https://post.imageshack.us/upload_api.php', 'test.jpg', Response);


par := TIdMultiPartFormDataStream.Create;
par.AddFormField('key', 'mikey');
par.AddFormField('fileupload','test.jpg');
par.AddFormField('format', 'json');

rta := IdHTTP1.Post('https://post.imageshack.us/upload_api.php', par);
Memo1.Lines.Add(rta);

end;

Y no me sube nada aparte de mostrar este error :

Exception class EIdIOHandlerPropInvalid with message 'IOHandler value is not valid

Tambien intente agregando esto :


par.AddFile('fileupload', 'test.jpg','application/octet-stream');


Pero es lo mismo.

¿ Alguien me podria ayudar ?

Casimiro Notevi
19-07-2013, 17:40:10
¿No hay ninguna documentación en su web?

JuanOrtega
19-07-2013, 18:50:16
na , el error ya esta arreglado le quite la s a https y ando sin ningun problema , igual gracias.