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