Thema: Delphi DVD Menü

Einzelnen Beitrag anzeigen

aMuTeX

Registriert seit: 8. Mai 2003
Ort: Luzern
54 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#2

Re: DVD Menü

  Alt 6. Apr 2005, 10:41
Du musst wohl ein Steuerkreuz simmulieren. Also Links, Rechts, Rauf, Runter und Select. Für 'Links' sieht das dann etwa so aus:

Delphi-Quellcode:
procedure btnLtClick(Sender: TObject);
var
  DVDControl2: IDVDControl2;
begin
  if Succeeded(FilterGraph1.QueryInterface(IID_IDVDControl2, DVDControl2)) then
    DvdControl2.SelectRelativeButton(DVD_Relative_Left);
  DVDControl2 := nil;
end;
für die anderen Richtungen sinngemäss. Für 'Select' so:

Delphi-Quellcode:
procedure btnSelectClick(Sender: TObject);
var
  DVDControl2: IDVDControl2;
begin
  if Succeeded(FilterGraph1.QueryInterface(IID_IDVDControl2, DVDControl2)) then
    DvdControl2.ActivateButton;
  DVDControl2 := nil;
end;
Weitere Infos dazu findest du in der MSDN Library.
  Mit Zitat antworten Zitat