w> I saved a midi file as a resource in my .exe file w> and I know it's in there. Now I want to play it w> with the TMediaPlayer component while my program w> runs.
procedure ExtractRes( const ResType, ResName, ExtractedResFileName : String); var Resur:TResourceStream; begin Resur := TResourceStream.Create( hInstance, ResName, pCHAR(ResType) ); try Resur.SaveToFile(ExtractedResFileName); finally Resur.Free; end; end; __________________________________________________ Delphi-Talk mailing list -> [email protected] http://www.elists.org/mailman/listinfo/delphi-talk
