Copy(s,1,length(s)); //Ohne die letzten 4 Zeichen

[tamarix]

Hi Leute,

ich habe zu folgendem Code eine Frage:

Delphi-Quellcode:

function MyConst(Default: String): String; 
var s: String; 
begin 

s := ExpandConstant('{ini{%MyVari}MyINI.ini,PFADE,/MyProg/ABC/}'); 

Result := Copy(s,1,length(s)); //Wie kann ich hier die letzten 4 Zeichen abschneiden? 

end;

Besteht hier irgendwie die Möglichkeit den TeilString so herauszufiltern
das die letzten 4 Zeichen weggeschnitten werden und ich als Result
(Beispiel D:\MyProgDAT\) erhalte da das letzte Verzeichnis immer aus
3 Zeichnen besteht.

Hier ein Auszug aus der MyINI.ini

[PFADE]
/MyProg/ABC/=D:\MyProgDAT\ABC\


Wie kann ich das Problem lösen?

Tamarix

[edit=Luckie]Delphi-Tags ergänzt. Mfg, Luckie[/edit]