var
StreamIn, StreamOut : TStringStream;
tex : string;
begin
StreamIn := TStringStream.Create('');
StreamOut := TStringStream.Create('');
try
tex := WebBrowser1.OleObject.Document.documentElement.innerHTML
StreamIn.WriteString(Format('kod=%s', [tex]));
http.Request.contenttype:='application/x-www-form-urlencoded';
http.Post('http://mojadres.pl/skrypt.php', StreamIn, StreamOut); // wysłanie zawartości do skryptu
Edit2.Text:=PChar(StreamOut.DataString);
finally
StreamIn.Free;
StreamOut.Free;
end;
Wywala mi błąd (missing operator or semicolon) w tej linijce:
StreamIn.WriteString(Format('kod=%s', [tex]));
i wstawia kursor po StreamIn . O co może chodzić? Bo nie mam pojęcia i necie nie mogę znaleźć.