kod wyglada tak to jest drugi krok pierwszy dziala wiec nie wklejam
Input := TStringStream.Create('');
Output := TStringStream.Create('');
try
btnSend.Enabled := False; // zablokowanie przycisku
{ dodanie do strumienia lancucha oznaczajcego dane nowego tematu na forum. Dane do tego
lancucha pobierane sa z komponentow }
Forum.Post(link.Text, Input, Output);
if Pos('<script language', Output.DataString)=0 then
begin
statusBar.SimpleText:='zly link...'+Output.DataString;
end
blad wywala sie w linijce"Forum.Post(link.Text, Input, Output);" 411 length required
a tak wyglada komponen idhttp u mnie tz jest tak ustawiony
object Forum: TIdHTTP
OnWork = ForumWork
OnWorkEnd = ForumWorkEnd
Host = 'http://ogame185.de'
OnConnected = ForumConnected
ProtocolVersion = pv1_0
Request.Accept = 'text/html'
Request.AcceptEncoding = 'identity'
Request.Connection = 'keep-alive'
Request.ContentLength = 0
Request.ContentRangeEnd = 0
Request.ContentRangeStart = 0
Request.ContentType = 'application/x-www-form-urlencoded'
Request.ExtraHeaders.Strings = (
'Cookie: U_pl23:REM78=U_pl23%3AREM78; PHPSESSID=d75513ca5bb9299da' +
'ef06f4c5fbd20af')
Request.ProxyPort = 0
Request.UserAgent = '4programmers Poster'
Left = 600
Top = 432
end
a tak nawiasem mówiac wiem, ze to forum od delhi i prosze mi nie zarzucać bełkotu, po prostu zamiast zasypywac forum 200 liniami nieczytelnego kodu wolalem opisac w jakiej sytuacji pojawia sie błąd