Delphi-PRAXiS - Delphi Doppelte Anführungszeichen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Delphi Doppelte Anführungszeichen (https://www.delphipraxis.net/144027-doppelte-anfuehrungszeichen.html)

API	28. Nov 2009 08:33

Doppelte Anführungszeichen

Hi,

Ein Dateiname soll immer in doppelten Anführungszeichen (") stehen.
Falls die Anführungszeichen schon vorhanden sind, sollen sie nicht nochmals gesetzt werden.

Ist das so korrekt oder geht's auch einfacher?

Delphi-Quellcode:

			sFileName :=  'X:\ABC\EFGH\ABC.XYZ';

LabelFileName.Caption := AnsiQuotedStr (AnsiDequotedStr(sFileName,'"'),'"');

SirThornberry

28. Nov 2009 08:41

Re: Doppelte Anführungszeichen

ich würde es so machen:

Delphi-Quellcode:

			if (pos('"', sFileName) < 1) then

  sFileName = '"' + sFilename + '"';

API	29. Nov 2009 07:13

Re: Doppelte Anführungszeichen

Danke, das ist einfacher

Alle Zeitangaben in WEZ +1. Es ist jetzt 13:11 Uhr.