Zitat von
Jasocul:
Zitat von
turboPASCAL:
Wo hast du denn die Constante her (
Unit)?
InternetGetConnectedState + F1
Da wird in der D2005-Hilfe eine passende Liste angezeigt.
Nunja, nicht bei mir. ( D6
PE )
Zitat von
Daniel:
Ich weiß jetzt, warum ich nur wenige User zu sehen bekomme.
Ich sehe ein wenig mehr als ihr und meine Liste besteht nicht nur aus homogen aufgebauten Links.
Das Prg liest ja auch nur die eingelogten, reg. Benutzer und dann auch nur die die die sich nicht verstecken.
Zitat von
Daniel:
Beim ersten "Dingens", das dieses Programm nicht erkennt, hört es offenbar auf.
Ja, dem ist so. Es werden nur die Umschliessenden Href's gelöscht.
Delphi-Quellcode:
if length(s) > 0
then // Simple Parse HTML
begin
s := Copy(s, 1, Pos('
</span>', s) - 1);
for i := 1
to length(s)
do
if s[i] < #32
then delete(s, i, 1);
i := 1;
repeat
i := _PosEx('
<', s, i);
n := _PosEx('
>', s, i);
delete(s, i, n - i + 1);
until not (i <> 0);
Result := Trim(s) + '
, ';
end;