delphi
k1988
这个作者很懒,什么都没留下…
展开
-
delphi组件之ListView和第三方组件VirtualViewTree
最近在项目中使用了强大的树型显示控件 VirtualViewTree,在进行了两天的研究和使用后发现这个控件和delphi中自带的ListVeiw还是有很大的不同。 ListView组件的方法大多是直接操纵ListVeiw的显示效果,而VirtualViewTree更着重于直接对数据进行操作,然后将数据反馈到界面。当然ListVeiw也有data模式。原创 2009-04-12 15:45:00 · 1601 阅读 · 0 评论 -
EmbeddedWebBrowser(EmbeddedWB)不显示图片
在我的项目中使用到了Delphi第三方控件EmbeddedWB,但是不清楚为什么使用EmbeddedWB中的TEmbededWB后图片在第一次访问网页时不加载一些图片,必须要手动在图片上右键显示图片才行。研究数小时后无果,直接使用EmbeddedWB中TEwbCore后访问图片却正常了。我没时间去研究TEmbededWB应该也是基于TEwbCore的,为什么一个没有问题而一个有问题。暂时放在这里,原创 2010-04-19 10:47:00 · 2748 阅读 · 2 评论 -
修正TEmbeddedWEB不能使用中键滚动的bug
Date: 20:16:30, 2010年3月18日----Modified : /EmbeddedWB/EmbeddedWB.pasModified : /EmbeddedWB/EmbeddedWebBrowser_D7.dpk {$IFDEF Enable_MouseWheelFix}function MouseHookProc(nCode: Integer; wParam:原创 2010-04-19 10:54:00 · 883 阅读 · 0 评论 -
使用w使使用webbrowser控件,浏览页面时,点右键查看属性时程序死掉
//使用webbrowser控件,浏览页面时,点右键查看属性时程序死掉,表现为无法点击弹出的属性窗口,也无法点击程序,回车键也不行,但是按esc可以关闭属性窗口。 procedure EnabledWebBrowserPropertyForm; procedure TForm.EnabledWebBrowserPropertyForm();var X: Integer;be原创 2010-03-17 15:08:00 · 768 阅读 · 0 评论 -
TWebBrowser编程简述
这篇文章最先发表于2000年07月25日,最后一次修改是在2001 年02月07日。这里再次贴出的目的,一是作为前一阶段的完结,所以文章中的错误都不作修改;二是希望作为一个新的起点。我准备整理一下至今所积累的浏览器编程的知识,比较完整地写出来,与网友共勉。摘要:Delphi 3开始有了TWebBrowser构件,不过那时是以ActiveX控件的形式出现的,转载 2010-03-18 15:28:00 · 862 阅读 · 0 评论 -
Windows文件操作的直接函数调用
1、调用文件属性对话框procedure OpenWindowsFilePropertys(FileName: string);var sei: TSHELLEXECUTEINFO;begin ZeroMemory(@sei, sizeof(sei)); sei.cbSize := sizeof(sei); sei.lpFile := PChar(FileNam原创 2010-03-02 10:41:00 · 776 阅读 · 0 评论 -
使用代码控制TVirtualStringTree的选项
在这里仅以“是否允许中键选择”为代表,其它属性。 function GetMultiSelected: Boolean;begin result := toMiddleClickSelect in frameTask.vstList.TreeOptions.SelectionOptions;end;procedure SetMultiSelected(const Va原创 2010-02-26 14:45:00 · 1453 阅读 · 0 评论 -
TVirtualStringTree的图标状态重叠
procedure TfrmTaskManager.vstTasksGetImageIndex(Sender: TBaseVirtualTree; Node: PVirtualNode; Kind: TVTImageKind; Column: TColumnIndex; var Ghosted: Boolean; var ImageIndex: Integer);var pN原创 2010-02-07 09:57:00 · 1057 阅读 · 0 评论 -
delphi类的相互引用
在写c++的接口时可以将两个相互引用的类放在两个.h文件中,然后将这个接口翻译到delphi时,放在两个文件里就不可能了。只能放在同一个unit中。并且要将这两个类都放在同一个type下面进行定义,当前面一个类要使用后面一个类时,需要在前面一个类的前面放置一个前置声明,并且前置声明只能是IVariantMap = class;这种格式而不能是IVariantMap = class(TObject)原创 2010-02-03 10:53:00 · 1716 阅读 · 0 评论 -
一些碰到的陌生的技术名词搜集(持续更新……)
网络类:心跳测试:网络通信中,一端向另一端定时发送特定格式的数据包以验证当前连接是否存在。 数据处理:加密算法: 数据加密的基本过程就是对原来为明文的文件或数据按某种算法进行处理,使其成为不可读的一段代码,通常称为“密文”,使其只能在输入相应的密钥之后才能显示出本来内容,通过这样的途径来达到保护数据不被非法人窃取、阅读的目的。对称式”和“非对称式”加密: 对原创 2009-11-10 17:16:00 · 1038 阅读 · 0 评论 -
速记:两个进程模拟模态窗口
if IsWindow(Handle) then // If the application exists... begin WaitForInputIdle(HProcess, INFINITE); SetWindowLong(Handle, GWL_HWNDPARENT, Self.Handle); EnableWindow(Self.Handle, F原创 2009-10-21 16:24:00 · 854 阅读 · 0 评论 -
ListView的消息钩子
constructor ***.Create()begin // ListView的消息钩子 FNewProc := MakeObjectInstance(SelfListViewProc); FOldProc := Pointer(GetWindowLong(FListView.Handle, GWL_WNDPROC)); SetWindowLong(FList原创 2009-09-26 10:24:00 · 1030 阅读 · 0 评论 -
TvirtualStringTree之DragDrop
昨天在项目中需要做一个播放列表管理界面,播放列表中的结点本身要求可以拖动,并且要求播放列表能够支持从资源管理器上拖入FLV文件和播放列表文件。我继续使用了强大的TvirtualStringTree组件,但是在同时支持这两种拖动上犯了难,以前做的程序都是只支持其中一种拖动。 将TvirtualStringTree组件的dragMode属性设置为dmAutomatic,然后添加onD原创 2009-04-23 10:55:00 · 2041 阅读 · 0 评论 -
Delphi中Form的position属性与代码自定义窗体位置
<br /> 通过Form的Position属性可设置窗体的初始位置,如选择DesktopCenter为桌面中心,ScreenCenter为屏幕中心,等等。 这个属性在很多时候简化了程序代码。<br /> 但是,如果设置了position为ScreenCenter和DesktopCenter等,在窗体oncreate和onshow事件中使用代码控制窗体的位置就会不成功了,无论设置Self.Top,Self.Left为什么值,最后窗体都会自动根据Position自动调整位置。<br /> 我使用下面方法去原创 2010-06-21 17:27:00 · 5020 阅读 · 0 评论