|
Registriert seit: 23. Jun 2005
403 Beiträge
|
Re: Mein Programmierstyl
19. Apr 2006, 10:47
Hab noch einen:
if fileExists(ExtractFilePath(ParamStr(0)) + '\FDS_Server_profiles.xml') = True then
besser:
if FileExists(IncludeTrailingPathDelimiter(ExtractFilePath(ParamStr(0)))+'FDS_Server_profiles.xml') Then
Ist a) Plattformunabhängig und b) falls irgendwann doch die Methode 'ExtractFilePath' den '\' dranhängen lässt (spätere Delphi Version) hast Du sonst zwei '\' unddannhängterisichauf  .
Manchmal sehen Dinge, die wie Dinge aussehen wollen mehr wie Dinge aus, als Dinge
<Esmerelda Wetterwachs>
|