
Indy v Delphi XE2
Dobry den Všem.
Man dotaz.
Jsou v delphi XE2 všechny komponenty od Indy.
procedure TForm1.Button1Click(Sender: TObject);
var
ASource: TIdMultiPartFormDataStream;
begin
ASource := TIdMultiPartFormDataStream.Create;
ASource.AddFile('fileupload', OpenDialog1.FileName, '');
IdHTTP1.Request.Referer := 'www.imageshack.us';
IdHTTP1.Post('www.imageshack.us', ASource);
ASource.Free;
end;
TIdMultiPartFormDataStream - [DCC Error] Unit1.pas(51): E2003 Undeclared identifier: 'TIdMultipartFormDataStream'
Však tá hláška jasne píše, že nemáš deklarovanú triedu TIdMultipartFormDataStream...
Tvoj kód Ti aj tak fungovať nebude - žiadny upload obrázku na imageshack.us sa konať nebude...
To je zase nejaký copy/paste kód nájdený kdesi na internete?
http://stackoverflow.com/questions/6887766/upload- image-to-imageshack-with-delphi