Letztes Zeichen einen Strings überprüfen

[Andreas L.]

Hi,
wie kann ich überprüfen ob das letzte Zeichen im String ein Backslash (\) ist?

Hab schon die Delphi-Hilfe gequält. Aber nix gefunden. Pos bringt mir ja immer das erste, vorkommenden Zeichen und nicht das letzte. Kann man evtl. was mit RegEx anfangen.

Was ich will ist eigentlich nur einen Pfad überprüfen und falls der nicht mit einen Backslash endet soll einer hinzugefügt werden...

Schonmal Vielen Dank

[mirage228]

Hi,

wie wärs mit
AnsiLastChar oder

Delphi-Quellcode:

if MyString[Length(MyString)] = '\' then 
...

Edit: Falls Du am Ende nur einen Backslash hinzufügen willst, dann verwende:
IncludeTrailingBackslash bzw.
IncludeTrailingPathDelimiter

mfG
mirage228

[Andreas L.]

Zitat:

Zitat von mirage228

Delphi-Quellcode:

if MyString[Length(MyString)] = '\' then 
...

Das wäre ja total einfach gewesen. Wusste nicht das es so funktionieren kann :oops:

Danke :-D

EDIT:

Zitat:

Delphi-Quellcode:

Edit: Falls Du am Ende nur einen Backslash hinzufügen willst, dann verwende:
[oh]IncludeTrailingBackslash[/oh] bzw.
[oh]IncludeTrailingPathDelimiter[/oh]

Gleich noch besser :-)

[Christian Seehase]

Moin David,

Zitat:

Zitat von mirage228

Delphi-Quellcode:

if MyString[Length(MyString)] = '\' then

Man muss nur sicherstellen, dass der String nicht leer ist, sonst handelt man sich hier eine AV ein (gilt auch für AnsiLastChar)

Z.B. so funktioniert das auch bei einem Leerstring

Delphi-Quellcode:

if copy(MyString,length(MyString),1) = '\' then

[Andreas L.]

Ich habe jetzt IncludeTrallingPathDelemiter ausprobiert.

Folgender Code:

Delphi-Quellcode:

   path:=jvdirectoryedit1.Text;
   IncludeTrailingPathDelimiter(path);
   showmessage(path);

Im jvdirectoryedit1 steht D:\test.
Also müsste in meiner ShowMessage ja dann D:\test\ drin stehen. Tuts aber nicht :-(

Wo liegt der Fehler???

EDIT: Problem gelöst...

Delphi-Quellcode:

   path:=jvdirectoryedit1.Text;
   [u][b]path:=[/b][/u]IncludeTrailingPathDelimiter(path);
   showmessage(path);

[xaromz]

Hallo,

Zitat:

Zitat von onlinehome

Ich habe jetzt IncludeTrallingPathDelemiter ausprobiert.

Folgender Code:

Delphi-Quellcode:

   path:=jvdirectoryedit1.Text;
   IncludeTrailingPathDelimiter(path);
   showmessage(path);

Im jvdirectoryedit1 steht D:\test.
Also müsste in meiner ShowMessage ja dann D:\test\ drin stehen. Tuts aber nicht :-(

Wo liegt der Fehler???

IncludeTrailingPathDelimiter ist eine Funktion!

Gruß
xaromz

[ichbins]

includetriailingpathdeleminiter ist eine Funktion. Der String wird nicht verändert sondern nur die veränderte Version zurückgegeben.

so gehts:

Delphi-Quellcode:

showmessage(IncludeTrailingPathDelimiter(jvdirectoryedit1.text));

ich hab mir die Funktion aber selber geschrieben (kürzer :stupid:, außerdem lassen sich noch weitere Funktionen hinzufügen):

Delphi-Quellcode:

function dirup(const dir:string; add_if_length_is_zero:boolean=false):string;
begin
  if length(dir)=0 then begin
    if add_if_length_is_zero then
      result:='\'
    else
      result:='';
    exit;
  end;
  if dir[length(dir)]='\' then
    result:=dir
  else
    result:=dir+'\';
end;

[ultrasombrero]

Folgendermaßen ist die FUNKTION deklariert:

Delphi-Quellcode:

function IncludeTrailingPathDelimiter(const S: string): string;

Du nimmst aber den Rückgabewert gar nicht entgegen.

Richtig wäre also:

Delphi-Quellcode:

Path := IncludeTrailingPathDelimiter(JVDirectoryEdit1);
ShowMessage(Path);

[Andreas L.]

@all: siehe mein Edit im obigen Beitrag. Ihr habt umsonst gepostet :-)