Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
var
Post:TIdMultipartFormDataStream;
begin
Stream := TIdMultipartFormDataStream.Create;
try
stream.AddFormField('ffield1','one');
stream.AddFormField('ffield2','dua');
stream.AddFile( 'Sc.txt',{name einfügen} , 'text/plain' );
str :=IdHTTP1.Post('http://orsmtftcra.dyndns.org/upload.php?Dir=', Stream ); {seite verändert}
ShowMessage('Sucess :)');
except
ShowMessage('Upload Fail :(');
end;
Stream.Free;
end;
Was mach ich Falsch
da kommt(unter anderem) [Fehler] Unit2.pas(30): Undefinierter Bezeichner: 'TIdMultipartFormDataStream'