// I decided to publish some code snippets, here they are:


// Finding the PowerDVD window:
PowerWindow := FindWindow(nil,'CyberLink Universal Player');


// Sending the screen capture command to powerdvd:
PostMessage(PowerWindow,WM_KEYDOWN,67,1);


// Sending the frame advance command to powerdvd:
PostMessage(PowerWindow,WM_KEYDOWN,84,1);


// Getting the codec selection list:
ICCompressorChoose(Form.Handle,0,nil,nil,Addr(CompVars),nil)


// Commands used in AVI creation:
// Yes, 8 procedures and 2 structures that need to be filled,
// and the codec code translated.
AVIFileInit
AVIFileOpen
AVIFileCreateStream
AVIMakeCompressedStream
AVIStreamSetFormat
AVIStreamWrite
AVIStreamRelease
AVIFileRelease





// You can look at all these commands in the Micro$oft
// Win32 help files.
