如何在程序运行中拖动和改变image的大小

怎么在程序运行中拖动和改变image的大小

有两个问题


5 楼jishiping（JSP 季世平）回复于 2003-01-06 18:30:16 得分 100其实很简单，不需要写什么程序：  
  1. 设定Image的属性DragKind=dkDock; DragMode=dmAutomatic; 设定Form  
  的属性DockSite=true。  
  2. 在Image的事件OnEndDock里写一行代码就可以了：  
  void __fastcall TForm1::Image1EndDock(TObject *Sender, TObject *Target,  
  int X, int Y)  
  {  
  Image1->HostDockSite = (TWinControl*)0xFFFFFFFF;  
  }

一.按上面这样设置后可以任意移动,但会移到窗体外面去,而且就找不回来了.

二.拖动image的大小

[解决办法]
void __fastcall TForm1::Image1EndDock(TObject *Sender, TObject *Target,
int X, int Y)
{
//Image1->HostDockSite = (TWinControl*)0xFFFFFFFF; 注释掉你的问题就都解决了
}