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

[Luckie]

Zitat:

Zitat von tamarix

Sitze jetzt irgendwie auf em Schlauch...

Welchen Parameter meinst Du?

Den letzten von copy. Was bewirkt da das length(s)?

[tamarix]

Verwende den Code in Inno Setup

Die Hilfe habe ich in Delphi 7 durchsucht.

[tamarix]

Hi DaFox,

genau das wars.

Besten Dank @all

Tamarix

[Luckie]

Zitat:

Zitat von tamarix

Verwende den Code in Inno Setup

Sollte keinen Unterschied machen.

Zitat:

Die Hilfe habe ich in Delphi 7 durchsucht.

Ich kenne nur die von D6 personal, aber da steht es drin. Und in der Hilfe von D7 sollte es auch drin stehen. Sogar in der Personal, falls du die verwendest.

[Assarbad]

Warum ist die Frage als Offen markiert?

[phlux]

Damit Leute wie du den Thread nochmal pushen, ich dann ne email kriege und mich wieder drüber aufrege das ich viel zuviele threads abonniert habe :mrgreen: hat der user wohl vergessen als gelöst zu markieren, einer der mods sollte das mal ändern :roll:

[Assarbad]

Ich gehe regelmässig offene Fragen durch, deshalb kotzen mich solche vermeintlich offenen Fragen besonders an. Und dann nerve ich quasi die Mods ... *g*

[edit=Sharky]"Genervter Mod hat die Frage als beantwortet markiert ;-) Mfg, Sharky[/edit]