Thank you it was really helpful!-- 2010-11-16, 13:24 --Once again I have a problem with parsing this time. The html data is the same as post#7. Using that piece of code Iam trying to take the number after '>' and before '/' :
but It returns nothing... what can be possibly wrong?Code:var htm_data: array of String; temp_str: String; i: Integer; begin temp_str := WebBrowser1.OleObject.Document.documentElement.innerHTML; Setlength(htm_data,length(temp_str)); for i:=0 to length(temp_str) -1 do begin htm_data[i] := temp_str[i]; end; for i:=0 to length(temp_str) -1 do begin if htm_data[i] = 'i' then begin if htm_data[i+1] = 'd' then if htm_data[i+4] = 'l' then if htm_data[i+5] = '4' then begin j := i+6; while htm_data[j] <> '>' do begin j := j+1; end; while htm_data[j+1] <> '/' do begin memo1.Text := memo1.Text + htm_data[j]; j:= j+1; end; end; end; end;
Note that temp_str length is about 11200