摘要：首先，在主窗体中声明以下private过程:procedure TMainForm.DoEnterAsTab(var Msg: TMsg; var Handled: Boolean);beginif Msg.Message = WM_KEYDOWN thenbeginif Msg.wParam = 阅读全文

摘要：但就是没有很好解决问题。 之前找到一个能正确发送的code:(Alt+A) PostMessage(hWnd,WM_SYSKEYDOWN,VK_MENU,0); PostMessage(hWnd,WM_SYSKEYDOWN,0x41,0); Sleep(50); PostMessage(hWnd,W 阅读全文

摘要：数据库字段一般都是英文，不能直接展示给用户，而应该显示中文含义给用户。需要汉化两部分，一是设计用的字段汉化，二是表格区显示内容的汉化。 1、 字段汉化 设计工具（PivotGridToolBoxEh1）中显示字段中文含义，是通过数据集字段的DisplayLabel属性实现，只需要正确设置Displa 阅读全文

摘要：界面及连接关系 frxDBDataset1连接datasource 双击frxReport1控件进入设计界面,选择报表->数据,弹出窗口选择要显示数据的frxdbdataset,frxdbdataset可以有多个 打印按钮事件 //载入报表文件并打印 procedure TForm1.Button2 阅读全文

摘要：FastReport 3.X var PageLine: integer; //在現在頁列印到第幾行 PageMaxRow: integer=15; //設定每頁列數 procedure MasterData1OnBeforePrint(Sender: TfrxComponent); begin P 阅读全文

摘要：inherited； 以本方法名在父类中调用，没有明确指定参数，但把当前使用的参数传给继承下来的方法。 inherited Create(AOwner) ； inherited Create是指定调用父类的Create方法，当然你也可以inherited Destory 阅读全文

摘要：inherited就是调用祖先类的函数，如果不带参数就是默认调用同名函数如果带参数则表明子类中的函数个数可能比祖先类要多取其中的几个参数传过去例如祖先类有个函数 Create(AName:string);子类有个函数 Create(AName:string;AComponent:TObject);o 阅读全文

摘要：Owner为创建者，Parent为容器 （创建的对象会拥有Owner的属性，然后放在Parent上显示出来）他们的类型不同， Owner为TComponent【元件（如窗体、一些控件）】,Parent为TWinControl【窗体控件（如窗体里面的控件panel等）】。 Parent属性是指构件的包 阅读全文

摘要：Constructor TcountButton.create(AOwner:Tcomponent);begininherited create(Aowner);inc(TotBtns);end;请解释一下这里Aowner的用法 AOwner指明这个控件的拥有者. 在AOwner释放时会自动释放自己 阅读全文

摘要：Delphi中实现MDI子窗体用MDI实现浏览子窗口，具有窗口管理功能，同屏观看多个网页的内容 ① 多文档窗体（MDI） MDI窗体是一种具有主子结构的窗体体系，微软的Word便是其中的一个典型例子。MDI体系中至少需要两种窗体，只能将其中之一设置为主窗体，其余窗体全部则全部为子窗体，主窗体负责子窗 阅读全文

摘要：不好意思，弄错了，为了不误导楼主，特更正如下：两种方法：1、如果要实现复杂的判断，可以用字段的OnValidate事件，写法如下：procedure ClientDataSetValidate( Sender: TField);var tpEvent:TFieldNotifyEvent;begin 阅读全文

摘要：创建一个文件UAC.manifest，内容如下： <?xml version="1.0" encoding="UTF-8" standalone="yes"?> <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1 阅读全文

摘要：GetProcAddress(Hinstance,lpname)用来获取指定的动态连接库函数的地址 Hinstance为由LoadLibrary返回的模块句柄,lpname为文件名/函数名，返回值，成功返回动态连接库的地址，失败返回NULL， FreeLibrary（Hinstance），Hinst 阅读全文

摘要：1．TTabControl 组件的典型用法TTabControl 组件使用起来，根本不会使程序简单化，所以不提倡使用此组件，可以用TPageControl组件代替。与多页组件不同的是，虽然Tab 组件上可以有一组按钮，但它们的客户区是公用的，当用户选择其中某个按钮时，将触发OnChange 事件。在 阅读全文

摘要：private SortCol: Integer; SortWay: Integer; procedure TForm1.LVweColumnClick(Sender: TObject; Column: TListColumn); begin SortCol:=Column.Index; if (S 阅读全文

摘要：1.方法的重写Overriding和重载Overloading是Java多态性的不同表现。重写Overriding是父类与子类之间多态性的一种表现，重载Overloading是一个类中多态性的一种表现。 如果在子类中定义某方法与其父类有相同的名称和参数，我们说该方法被重写 (Overriding)。 阅读全文

摘要：unit Unit1; interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Com 阅读全文

摘要：Delphi 的编译指令(1): $DEFINE、$UNDEF、$IFDEF、$ELSE、$ENDIF本文转自：http://www.cnblogs.com/awei0611/archive/2009/02/26/1398459.html 一个程序从无到有的过程是这样的: 编辑代码 -> 预处理 - 阅读全文

摘要：本文采用delphi7+TServerSocket+TClientSocket; 笔者在工作中遇到对局域网中各工作站与服务器之间进行Socket通信的问题。现在将本人总结出来的TServerSocket和TClientSocket两个组件的基本用法写出来，希望与您分享。 ClientSocket组件 阅读全文

摘要：一、结果 keydown：用户在键盘上按下某按键时发生。一直按着某按键则会不断触发。 keypress：用户按下一个ASCII字符按键，产生一个字符时发生（不含shift、alt、ctrl）。一直按着某按键则会不断触发。 keyup：用户释放某一个按键是触发。 二、事件触发顺序 keydown、ke 阅读全文