![]() |
ActiveX Komponente des WindowsMediaPlayer ohne .filename
Liste der Anhänge anzeigen (Anzahl: 2)
Hi Leutz!
Hab nen Prob mit meinem Delphi Und zwar hat meine ActiveX Komponente des WindowsMediaPlayer keine .filename Endung. Weiß net warum. Deswegen zeigt er mir bei folgendem Quelltext immer diese Fehlermeldung [Error] Unit7.pas(41): Undeclared identifier: 'FileName'
Delphi-Quellcode:
Weis jemand, wie ich es trotzdem hinbekomme, das mein MediaPlayer in Delphi über den Laden-Button meines geschriebenen Programms doch eine Datei in den programmierten WMP lädt und abspielt?
unit Unit7;
interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, ExtCtrls, OleCtrls, WMPLib_TLB; type TForm7 = class(TForm) Bevel1: TBevel; Panel1: TPanel; BitBtn1: TBitBtn; Label1: TLabel; WindowsMediaPlayer1: TWindowsMediaPlayer; OpenDialog1: TOpenDialog; Button1: TButton; procedure BitBtn1Click(Sender: TObject); procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form7: TForm7; implementation {$R *.dfm} procedure TForm7.BitBtn1Click(Sender: TObject); begin hide end; procedure TForm7.Button1Click(Sender: TObject); begin If OpenDialog1.Execute then WindowsMediaPlayer1.FileName:=OpenDialog1.FileName; end; end. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:19 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz