- Delphi怎样实现TMemo、TRichEdit行跳转 2011-09-03 点击:1875 评论:0
- Delphi的静态类使用Demo 2011-09-03 点击:1302 评论:0
- Delphi截获DBGrid的滚动条消息 2011-09-03 点击:1058 评论:0
- Delphi中实现ListView滚动条的换肤方案 2011-09-03 点击:1231 评论:0
- Delphi中TDrawGrid选中单元格边框变色 2011-09-03 点击:2014 评论:0
- Delphi中VirtualStringTree使用心得 2011-09-03 点击:1690 评论:0
- Delphi中怎样在listbox中拖拽可以改变所显示内容的上下顺序 2011-09-03 点击:1703 评论:0
- Delphi用EnableWindow使OpenDialog对话框的文件类型选择变灰 2011-09-03 点击:1850 评论:0
- Delphi中使用 TWebBrowser 编辑网页 2011-09-03 点击:1081 评论:0
- Delphi中TStringList类常用属性方法详解 2011-09-03 点击:4167 评论:0
以下是代码(很简单):1)Memo:var linenum :Integer; //要跳往的行号begin SendMessage(Memo1.Handle,WM_VSCROLL,...
unit Static;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Contro...
unit Unit1;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, ...
首先是要骗过WM_NCPAINT消息。这个十分容易。WM_NCPAINT消息的wParam是一个区域的句柄。当它不为1时,从它里面CLIP掉滚动条的区域,再传给原窗口过程即可。当它...
procedure TMainForm.AllDrawGridClick(Sender: TObject);var Rect: TRect;begin Rect:=TDrawGri...
(1)这是一个可扩展到多层的树视图。视图就是单纯显示,无法与传入数据自动同步,必须手动写。(2)无论父节点还是子节点,传入数据必须是一个相同的结构(record),存放在其data...
varDragFile,popfile//拖动的文件名procedureTfrmMain.lbxMyListClick(Sender:TObject); begin//单击时确定要...
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Control...
//这里是让整个页面可编辑, 也可以单独编辑某个元素 WebBrowser1.OleObject.document.body.contentEditable := True;//有...
//TStringList 常用方法与属性:var List: TStringList; i: Integer;begin List := TStringList.Create; ...