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

Hi,

wie wärs mit
AnsiLastChar oder

markieren

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

Zitat von mirage228:

markieren

Delphi-Quellcode:

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

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

Danke

EDIT:

Zitat:

markieren

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

Moin David,

Zitat von mirage228:

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
if copy(MyString,length(MyString),1) = '\' then

Ich habe jetzt IncludeTrallingPathDelemiter ausprobiert.

Folgender Code:

markieren

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...

markieren

Delphi-Quellcode:

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

Hallo,

Zitat von onlinehome:

Ich habe jetzt IncludeTrallingPathDelemiter ausprobiert.

Folgender Code:

markieren

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

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

so gehts:

showmessage(IncludeTrailingPathDelimiter(jvdirectoryedit1.text)); ich hab mir die Funktion aber selber geschrieben (kürzer , außerdem lassen sich noch weitere Funktionen hinzufügen):

zusammenfalten · markieren

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;

Folgendermaßen ist die FUNKTION deklariert:

function IncludeTrailingPathDelimiter(const S: string): string; Du nimmst aber den Rückgabewert gar nicht entgegen.

Richtig wäre also:

markieren

Delphi-Quellcode:

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

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