Probleme mit POS/Copy

[Blackheart]

Zitat von Neotracer64:

Bau dir doch ne Funktion, die das dann so macht.

Delphi-Quellcode:

function Between(Tag1, Tag2, Text: String): String;
begin
  Delete(Text,1,Pos(Tag1,Text) + Length(Tag1)-1);
  Delete(Text,Pos(Tag2,Text),Length(Text));
  Result:=Text;
end;

in etwa...