Tag!
Würde gerne den Fortschritt einer HTML_Source-Formatierung mit einer ProgressBar
anzeigen, krieg´s aber nicht hin.....
Delphi-Quellcode:
function StripHTML(S: string): string;
var
TagBegin, TagEnd, TagLength: integer;
begin
TagBegin := Pos( '<', S);
while (TagBegin > 0) do begin
TagEnd := Pos('>', S);
TagLength := TagEnd - TagBegin + 1;
Delete(S, TagBegin, TagLength);
TagBegin:= Pos( '<', S);
end;
Result := S;
end;
Funktion entfernt
HTML-Tags aus dem SC.Aber wie die ProgressBar einbinden????
Danke+Gruss Loki!