Mam na stronie WWW formularz za pomoca ktorego mozna wgrac plik na serwer.
Chciałem napisać program którym bedzie można wgrywać pliki:
procedure TForm1.Button2Click(Sender: TObject);
var
Stream : TIdMultipartFormDataStream;
odbior : TStringStream;
begin
Stream := TIdMultipartFormDataStream.Create;
Stream.AddFile( 'pliczek', 'D:\Zdjęcia\bboylatata3.jpg','multipart/form-data');
odbior := TStringStream.Create('');
IdHTTP1.Post( 'http://breakworld.eu/test2.php?', Stream, odbior );
Memo1.Lines[0] := odbior.DataString;
end;
Problem jest z wyświetlaniem odpowiedzi (Zawartość odbior.DataString). Zawiera ona kod html strony przed wysłaniem a nie po wysłaniu. Dlaczego?