社区
VB基础类
帖子详情
如何编写像NetAnts,FlashGet一样的“拖放框”
textstar
2000-08-20 06:08:00
我想在我自编的程序中加入一段代码用来实现像NetAnts,FlashGet一样的“拖放框”,来接受其它程序中的文本只要用户从IE或WORD等文字软件中把文本拖放到“拖放框”中在我自编的程序的文本窗口显示出拖入的文本。请问各位高手如何实现!谢谢!
...全文
182
5
打赏
收藏
如何编写像NetAnts,FlashGet一样的“拖放框”
我想在我自编的程序中加入一段代码用来实现像NetAnts,FlashGet一样的“拖放框”,来接受其它程序中的文本只要用户从IE或WORD等文字软件中把文本拖放到“拖放框”中在我自编的程序的文本窗口显示出拖入的文本。请问各位高手如何实现!谢谢!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
shines77
2000-08-20
打赏
举报
回复
OUYAN说得对!textstar: 你是要 vb 代码,还是要 vc 的?vb的我帮你写,不就是几句吗?现在还不想写,等你回话!我太忙了,你去看看“VB虾们,我给100分!!帮忙!怎样将字符空移到指定的地方(当然,指定的地方一定要可以输入字符,比如文本狂)”的帖子。
shines77
2000-08-20
打赏
举报
回复
谁说VB很难做,其实我告诉你,pino,在VB里比VC++还容易百倍(此话有点过分!),不过那是你不懂,我用VB做出来的绝对比softsprite兄的简短,容易理解,不就是拖放,剪贴板,Always On Top吗,VB里做拖放窗口,哪用如此麻烦(广告语??) [步步高无绳电话,哪用如此尴尬!!]
OUYAN
2000-08-20
打赏
举报
回复
用 vb 处理很简单的,其实就是个拖放操作,把链接放在剪贴板里,下载时就去剪贴板里读。
pino
2000-08-20
打赏
举报
回复
用 vb 太不好办了,反正 delphi 有现成的 vcl 可用,vb 好像没有可用的 ocx
U皮特U
2000-08-20
打赏
举报
回复
创建一个继承CFrameWnd的类- CDownloadBasket
在该类的PreCreateWindow(CREATESTRUCT& cs) 中:
cs.style &= ~WS_CAPTION;
cs.style &= ~WS_SYSMENU;
cs.style |= WS_DLGFRAME | WS_EX_WINDOWEDGE | WS_EX_ACCEPTFILES;
去除标题栏、系统菜单等。
// 以下使得用鼠标按住窗口可以拖动窗口
void CDownloadBasket::OnLButtonDown(UINT nFlags, CPoint point)
{
PostMessage(WM_NCLBUTTONDOWN, HTCAPTION, MAKELPARAM(point.x, point.y));
}
//以下设置本窗口为顶级窗口,并替换视为可以处理拖放事件的视
int CDownloadBasket::OnCreate(LPCREATESTRUCT lpCreateStruct)
{
if (CFrameWnd::OnCreate(lpCreateStruct) == -1)
return -1;
g_downloadBasket = this; // 全局变量,在别处可以操作本窗口
CRect rect;
GetClientRect(&rect);
m_DLBView = new CDLBasketView();
m_DLBView->Create(NULL, "",
WS_VISIBLE | WS_CHILD, rect, this, 12453);
SetActiveView((CView*)m_DLBView);
SetWindowPos(&wndTopMost, 0, 0, 0, 0, SWP_NOSIZE | WS_EX_TOPMOST);
return 0;
}
创建一个继承CView的类 CDLBasketView,
分别处理它的OnDragEnter、OnDragOver、OnDrop等,处理拖放
在它的OnLButtonDown中,用g_downloadBasket->OnLButtonDown(nFlags, point); 将鼠标拖动窗口的处理交给框架窗口。
// 显示这个窗口
m_downloadBasket = new CDownloadBasket();
ASSERT_VALID(m_downloadBasket);
BOOL bResult = m_downloadBasket->Create(NULL,
_T(""),
WS_POPUP,
CRect(0,0,42,42),//CFrameWnd::rectDefault,
AfxGetApp()->m_pMainWnd );
ASSERT(bResult);
m_downloadBasket->ShowWindow(SW_NORMAL);
网际畅游 MyIE 3.0 源代码
目前内置了Net
Ant
s和
Flash
Get。 鼠标控制功能:可通过在页面空白处按住右键并移动鼠标来实现一些功能。目前有: 向下: 打开新窗口 向左: 后退 向右: 前进 先上再下: 刷新 右左右 或 先下再右: 关闭窗口...
使用OLE
拖放
不同程序间的数据
使用OLE
拖放
不同程序间的数据(OLE Drag and Drop)难度:★★★☆☆先行知识:Delphi / 接口 / Win32 / OLE or COM 从一个程序拖动数据到另一个程序(典型的情况是拖动文本)已经不是什么新鲜事了,很多共享软件都...
使用OLE
拖放
不同程序间的数据[转]
★★★☆☆先行知识:Delphi / 接口 / Win32 / OLE or COM 从一个程序拖动数据到另一个程序(典型的情况是拖动文本)已经不是什么新鲜事了,很多共享软件都支持这个功能(比如说著名的
flash
get、net
ant
s等的浮动...
【COM编程】如何往IE工具条添加按钮
当你装了
Flash
Get(网际快车)时,你会发现IE右键菜单多了两项:"使用网际快车下载"和"使用网际快车下载全部链接",而这时你打开注册表,在HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\下有这两个...
BHO
当你装了
Flash
Get(网际快车)时,你会发现IE右键菜单多了两项:"使用网际快车下载"和"使用网际快车下载全部链接",而这时你打开注册表,在HKEY_CURRENT_USER/Software/Microsoft/Internet Explorer/MenuExt/下有这两个...
VB基础类
7,763
社区成员
197,609
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章