关于吸附窗体的问题?请大家参与!!
这个程序是在CB5下编译成功的,我在CB6下编译,其中的一个错误是说没有这个TDockableForm(可吸
附窗体)类型,大家谁做过,帮我在CB6中完成这个程序,或者说,在CB6中和它(TDockableForm)一
样的的功能是那一个类型?
void __fastcall TMainWin::DockPanelDockOver(TObject *Sender,
TDragDockObject *Source, int X, int Y, TDragState State,
bool &Accept)
{
Accept = (dynamic_cast<TDockableForm*>(Source->Control) != NULL);//这就是程序出错的地方,说没有这个TDockableForm(可吸附窗体)类型
if (Accept)
{
// Modify the DockRect to preview dock area.
Windows::TPoint TopLeft = DockPanel->ClientToScreen(Point(0, 0));
Windows::TPoint BottomRight = DockPanel->ClientToScreen(
Point(this->ClientWidth / 3, DockPanel->Height));
Source->DockRect = Windows::TRect(TopLeft, BottomRight);
}
}
附窗体)类型,大家谁做过,帮我在CB6中完成这个程序,或者说,在CB6中和它(TDockableForm)一
样的的功能是那一个类型?
void __fastcall TMainWin::DockPanelDockOver(TObject *Sender,
TDragDockObject *Source, int X, int Y, TDragState State,
bool &Accept)
{
Accept = (dynamic_cast<TDockableForm*>(Source->Control) != NULL);//这就是程序出错的地方,说没有这个TDockableForm(可吸附窗体)类型
if (Accept)
{
// Modify the DockRect to preview dock area.
Windows::TPoint TopLeft = DockPanel->ClientToScreen(Point(0, 0));
Windows::TPoint BottomRight = DockPanel->ClientToScreen(
Point(this->ClientWidth / 3, DockPanel->Height));
Source->DockRect = Windows::TRect(TopLeft, BottomRight);
}
}
...全文
相关推荐
c#磁性窗体/吸附窗体
c#做的一个窗体吸附/磁性效果、效果如千千静听等!
VB6窗体吸附技术实现与应用.zip
事件驱动编程是一种程序设计范式,它以事件作为程序控制的流程和行为的基本单位。在这种模型中,程序的运行不是由一段段的代码顺序执行推动的,而是依赖于外部或内部事件的发生。这些事件可能是用户操作、系统消息或者其他程序触发的信号。事件驱动编程广泛应用于现代应用程序开发,特别是在图形用户界面(GUI)设计中,如VB6(Visual Basic 6)等编程环境。在事件驱动模型中,一个事件发生后,程序会调用一个或多个预先定义好的事件处理程序(也称为事件处理器或事件处理函数)。
WPF 仿QQ吸附窗体
WPF 中的StoryBoard实现窗体的隐藏和出现动画,通过鼠标按下和释放判断当前窗体的位置。
Java吸附窗体、Java磁性窗体、磁性窗体
一个类似于千千静听播放器界面吸附的Java程序。当多个窗体之间小于一定距离后会发生吸附的效果。(类似于磁铁)吸附算法。Java吸附窗体、Java磁性窗体、Java窗体吸附、Java磁铁窗体
窗体吸附源码
vb6 窗体吸附的源码


