Thema: Prism Sounds

Einzelnen Beitrag anzeigen

Benutzerbild von dahead
dahead

Registriert seit: 16. Mai 2005
620 Beiträge
 
#10

Re: Sounds

  Alt 5. Feb 2006, 13:19
nein, eher so:

Delphi-Quellcode:
type
  TForm1 = class(TForm)
  ...
  private
    ...
    fAppDir: String;
    ...
  public
   ...
  end;

...
procedure TForm1.FormCreate(Sender: TObject);
begin
  fAppDir := IncludeTrailingPathDelimiter(ExtractFileDir(ParamStr(0)));
...
end;
also auf jeden Fall ohne die umschließenden '-Zeichen. Die brauchst du nur, wenn du der String-Variable einen bestimmten String zuweisen willst. Bsp.:

Delphi-Quellcode:
var
 fString: String;
begin
  fString := 'Dies ist ein Test';
end;
Weist du der String-Variablen (also fAppDir oder fString) einen String zu, dann kannst du die logischerweise weglassen.

Außerdem ist durch den Befehl IncludeTrailingPathDelimiter beim String fAppDir bereits ein Backslash dran. Du fügst ihn unten aber doppelt hinzu.

edit: bisschen ausführlicher.
  Mit Zitat antworten Zitat