资源不能完全使用,请教
wwqi 2002-03-15 10:19:36 我用如下:
void __fastcall TForm1::IconButtonClick(TObject *Sender)
{
//Screen->Cursor=LoadCursor(HInstance,"C1");
Icon=new TIcon();
Icon->Handle =LoadIcon(HInstance,"I1");
Application->Icon =Icon;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::cursorButtonClick(TObject *Sender)
{
Screen->Cursors[crDefault]=LoadCursor(HInstance,"C1");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::WaveButtonClick(TObject *Sender)
{
char *wav_handle;
HRSRC h=FindResource(HInstance,"S1","WAV");
HGLOBAL h1=LoadResource(HInstance,h);
wav_handle=(char *)LockResource(h1);
sndPlaySound(wav_handle,SND_MEMORY|SND_SYNC);
}
以实现ICON、CURSOR以及播放一个WAVE文件,但CURSOR无法实现,WAVE只能播放45秒(不论WAVE文件是否3MIN 4MIN。。。。。),请哪位给予帮助