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]

[Luckie]

Kuck dir doch mal den letzten Parameter von copy in der Hilfe an. :roll:

[tamarix]

Hi Luckie,

ich habe mir bereits in der Hilfe umgeschaut, aber da nichts hierzu gefunden.

Mit LeftStr kann ich nicht arbeiten da die Länge unterschiedlich ist und
ich von der Gesamtlänge irgendwie halt die letzten 4 Zeichen entfernen muss.


Wäre toll wenn Du mir bitte einen genaueren Tip hierzu geben könntest.


Danke und Gruss
Tamarix

[Luckie]

Was gibt der letzte Parameter von Copy an?

[tamarix]

Mit LeftStr kann ich nicht arbeiten da die Länge unterschiedlich ist und
ich von der Gesamtlänge irgendwie halt die letzten 4 Zeichen entfernen muss.

[Luckie]

Wer redet denn von LeftStr? Ich frage dich noch mal: Was gibt der letzte Parameter von copy an?

[phlux]

Ich frage auch Mal was gibt Length(s) an???

[tamarix]

Sitze jetzt irgendwie auf em Schlauch...

Welchen Parameter meinst Du?

[toms]

Welche Delphi Version verwendest du denn?

[DaFox]

Hi,

Zitat:

Zitat von OH

Copy gibt einen Substring oder ein Array zurück, das Count Zeichen oder Elemente ab S[Index] enthält.

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)-4); //So kann ich hier die letzten 4 Zeichen abschneiden!

end;

Gruß,
Markus