View Single Post
  #1 (permalink)  
Old 12th August 2003
icefixer icefixer is offline
Junior Member
BS.Player Newbie
 
Join Date: Aug 2003
Posts: 1
Rep Power: 0
icefixer is an unknown quantity at this point
Default Problem with the BSplayer API

Hi, i am try to develop an autorun program for my DivX movies but i have a problem using the bsp.pas
my project in delphi 7 compile without error( i have enter the unit bsp.pas
'uses bsp in bsp.pas' in the project code)
but the BSplayer didn't accept the message i try to send with the following
code:

procedure TfrmBSLoader.btnPlayMovieClick(Sender: TObject);
var
bsp_handle: HWND;
i, j: Integer;
begin

ShellExecute(bsp_handle,'Open','bplay.exe',' "BSinit.bsi" ', ' ' ,SW_SHOWNORMAL) ;
bsp_handle:=FindWindow('BSPlayer',nil);
SendMessage(bsp_handle,WM_BSP_CMD,BSP_CycleSub,0);
Application.Terminate;
end;
__________________
Nemo regit meus vita
Reply With Quote
 

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20