Current and Following EPG

[yeyotheiron]

var
AEpgInfo: TEPGInfo;

begin

SendMessage(DDHwnd,
WM_MODULE_MSG,
DMODAPI_GET_EPG_CURRENT,
Integer(@AEpgInfo)
);

Why AEpgInfo is nil here...

SendMessage(DDHwnd,
WM_MODULE_MSG,
DMODAPI_GET_EPG_FOLLOWING,
Integer(@AEpgInfo)
);

and here...

Please, howto get Current and Following EPG...

Thanks, excuse my English.

🌟 Recommended Tools & Services

• Formify.one - Free Online Form Creator (Better than Google Forms). - Create Professional Forms That Match Your Business, Form Builder That Actually Helps You Collect More Responses
• CrispShare - Screenshot Editor That Makes Your Work Look Professional (Without Design Skills). - Make Your Screenshots Stand Out in Crowded Social Feeds
• DVB Dream - Best TV Reception/Record software for your computer DVB add on. - Stop Missing Your Favorite Shows - Record TV Directly to Your PC. Turn Your Computer Into a Professional TV Recorder. Unlock Its Full Potential With Professional TV Software

[FredB]

You can encapsulate the SendMessage functions in a Timer procedure.

ie :

Code: Select all


var
Timer1:Integer; //TTimer;
....

....

Timer1:=SetTimer(0,0,1000,@Timer1Timer);

....

procedure Timer1Timer (Hw: LongWord; Msg:LongWord;
idEvent:LongWord; dwWord:LongWord); StdCall;)

//Current EPG
SendMessage(DDHwnd, WM_MODULE_MSG, DDMODAPI_GET_EPG_CURRENT, Integer(@AEpgInfo));

//Following EPG
SendMessage(DDHwnd, WM_MODULE_MSG, DDMODAPI_GET_EPG_FOLLOWING , Integer(@AEpgInfo));

...


[yeyotheiron]

Thanks...