d6+win98。
我不想显示右边的滚动条,自己做两个按钮,一个是向上翻页,一个是向下翻页。
还需要一个滚动条(其实就是一个图片),可以实现真正滚动条的功能,但只需要能按住滚动条上下拉就可以了。
大家帮忙。
我手上有了个 c++builder做的翻页的程序,大侠要是能给改为delphi的也行,谢谢大家!帮我,因为是做多媒体光盘,所以什么都要用图片处理的,谢谢大家。
我不想显示右边的滚动条,自己做两个按钮,一个是向上翻页,一个是向下翻页。
还需要一个滚动条(其实就是一个图片),可以实现真正滚动条的功能,但只需要能按住滚动条上下拉就可以了。
大家帮忙。
我手上有了个 c++builder做的翻页的程序,大侠要是能给改为delphi的也行,谢谢大家!帮我,因为是做多媒体光盘,所以什么都要用图片处理的,谢谢大家。
用c++ builder做的,翻页程序
void __fastcall Tts_txt::nextClick(TObject *Sender)
{
if(wz->Document!=NULL)
{
IHTMLDocument2 *pdoc;
IHTMLWindow2 *pwin;
if(SUCCEEDED(wz->Document->QueryInterface(IID_IHTMLDocument2,(void **)&pdoc)))
{
pdoc->get_parentWindow(&pwin);
pwin->focus(); }
}
keybd_event(34,MapVirtualKey(byte('B'),0),0,0);
}void __fastcall Tts_txt::prevClick(TObject *Sender)
{
if(wz->Document!=NULL)
{
IHTMLDocument2 *pdoc;
IHTMLWindow2 *pwin;
if(SUCCEEDED(wz->Document->QueryInterface(IID_IHTMLDocument2,(void **)&pdoc)))
{
pdoc->get_parentWindow(&pwin);
pwin->focus(); }
}
keybd_event(33,MapVirtualKey(byte('B'),0),0,0);
}