Das Prinzip ist das selbe:
1. Kopiere String bis auf das letzte Zeichen (= Anführungszeichen)
2. Mit einer Schleife von HINTEN nach dem ersten Treffer auf Anführungszeichen testen
3. Den String von Position 2.) bis zum Ende Kopieren.... Fertig!
... so aus dem Kopf:
Delphi-Quellcode:
[...]
test := 'bind "o" "say Delphi Praxis ist super!"';
var2 := copy(test, 1, length(test)-1);
for i := length(var2) downto 1 do
if var2[i] = '"' then begin;
zeichen := i;
break;
end;
ergebnis := copy(var2, zeichen+1, length(var2));
Vielleicht statt einer FOR-Schleife eine "while"-Schleife verwenden und damit break; vermeiden...
SCRaT