Bestimmten Teil eines Strings auslesen

[BorlanDelphiUser]

Danke an alle .. ich hab gerade eben hier in der Suche noch was nützliches gefunden und umgeschrieben .. funktioniert super. Das Thema kann also geschlossen werden - Problem gelöst

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  myString : String;
  ipString : String;
  i      : Integer;
begin
  myString := '<font color=white>08:15</font>';
  i := Pos ('>',mystring); 
  Delete (myString,1,i); 
  i := Pos ('</font>',mystring); 
  ipString :=  Copy(myString,1,i-1);
  Label1.Caption := ipString;
end;