Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: Syntax SendMCICommand

    Delphi
    by himitsu, 25. Jul 2012
  Wenn if assigned(myMCIPlayer) then myMCIPlayer.Destroy; geht, dann geht garantiert auch myMCIPlayer.Free;, denn rate mal was Free macht.
  
  Wenn aber myMCIPlayer weiterhin verwendet wird, dann sollte man FreeAndNil(myMCIPlayer); verwenden.
• Forum: Programmieren allgemein

  AW: Syntax SendMCICommand

    Delphi
    by himitsu, 24. Jul 2012
  Wieso nicht?
  
  PS: Application.ExeName = ParamStr(0)
• Forum: Programmieren allgemein

  AW: Syntax SendMCICommand

    Delphi
    by himitsu, 22. Jul 2012
  \\ ?
  
  // Path = mit \ am Ende
  Pfad := '"' + ExtractFilePath(Application.ExeName) + 'Sounds\Sound1.wav"';
  SendMCICommand('play ' + Pfad);
  
  // Dir = ohne \ am Ende (gut, mit einer kleinen Ausnahme)
  Pfad := '"' + ExtractFileDir(Application.ExeName) + '\Sounds\Sound1.wav"';
  SendMCICommand('play ' + Pfad);