Delphi-Quellcode:
function allocinfo(s: string; start, ende: Char): string;
var
anfang, ende: integer;
begin
anfang := Pos(start,s);
ende := Pos(ende,s);
result := copy(s,anfang, ende-anfang);
end;
allocinfo('schlüssel=wert;','=',';') müsste dann wert geben