Re: Fehlermeldung bei Aufruf von WMP1:TWindowsMediaPlayer;
ich habe es nun so gemacht:
unit Unit1; interface uses ... , WMPLib_TLB; type TForm1 = class(TForm) . . private { Private-Deklarationen } public { Public-Deklarationen } wmp1: TWindowsMediaPlayer; var wmp1da : Boolean; // ist dll für wmp1 da? procedure TForm1.FormCreate(Sender: TObject); begin wmp1da := true; try wmp1 := TWindowsMediaPlayer.Create(self); wmp1.Parent := Self; WMP1.Left := 416; WMP1.Top := 336; WMP1.Width := 361; WMP1.Height := 129; except showmessage('wmp1da := false'); wmp1da := false; end; end; end. Vielen Dank nochmals für Eure Hilfe!!! Grüße Franziska |
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:54 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz