摘要：delphi使用outputdebugstring调试程序和写系统日志procedure TForm1.btn1Click(Sender: TObject);begin OutputDebugString('dddddd'); OutputDebugString('11');end;proced... 阅读全文

摘要：结构体定义PYpType=^TYpType;TYpType=record yfcode:string; ypcode:string; YpUnitPrice:Currency; YpRetailPrice:Currency; YpCostPrice:Currency; YpTotal:Currency; CkTotal:Currency; YpUseDT:string; YpAddr:string; Dwcode:string; CzyCode:string; Update_DT:TDateTime; IsDelete:Integer; IsApprove:Integer;end;加入结构体f 阅读全文

摘要：Block With工具，用来提取开域with的工具，如下代码：1 ADOQuery_Tmp.Data := fData;2 ADOQuery_Tmp.Filtered := false;3 ADOQuery_Tmp.Filter := '选择=1';4 ADOQuery_Tmp.Filtered := true;经过使用此工具，提取ADOQuery_Tmp字符串后，代码为：1 With ADOQuery_Tmp do2 Begin3 Data := fData;4 Filtered := false;5 Filter := '选择=1';6 Filtered 阅读全文

摘要：在FormCreate设置PersonSignLB的windows消息aHint :=THintWindow.Create(nil);aHint.Color :=clInfoBk;FWndMethod := PersonSignLB.WindowProc;PersonSignLB.WindowProc := LabelWndProc;显示个人提示框procedure TMainForm.LabelWndProc(var Msg: TMessage); //根据一定长度，将字符串变为回车的字符 function SplitByLen(src:string;var row:Integer;perC 阅读全文

摘要：**************************数学单元*********************************Delphi / Kylix 跨平台运行时（Runtime）库Copyright (c) 1996, 2001 Borland 软件********************************************************************这个单元包含高性能的算术、三角、对数、统计和金融方面的计算及FPU程序函数用于补充Delphi语言System.pas 单元中的数学常规程序函数 注意1) 对于有些函数，这个单元中涉及的概念或常数由Earl 阅读全文

摘要：[步骤][功能][说明]Move移动1、将选定的静态函数从一个类移动到另一个类2、将选中的类或接口移动到其他单元Extract Interface抽取接口将选定的函数抽取到一个新的接口Extract Superclass抽取基类将选定的函数、属性、字段从一个类里抽取到一个基类中Pull Member Up将成员向上拉1、将子类中的函数或字段移动到父类2、将子接口中的函数移动到父接口Push Members Down将成员向下推1、将父类中的字段或者函数移动到子类2、将父接口中的函数移动到子接口Safe Delete安全删除在确认没有其他代码调用的情况下,删除所选定的变量、组件、类或接口Inli 阅读全文

摘要：DuplicateHandle函数可以用来复制线程等。 在一个进程中，这个函数可根据位于不同进程内的现有句柄创建一个新句柄。可以从这两个进程中发出对这个函数的调用。进程必须提供PROCESS_DUP_HANDLE访问权限，否则函数执行不能成功 阅读全文

摘要：根据定义计算对文法中每一 A∈VN 计算 FOLLOW(A)(a) 设S为文法中开始符号，把{#}加入FOLLOW(S)中(这里"#"为句子句号)。(b) 若A→αBβ是一个产生式，则把FIRST(β)的非空元素加入FOLLOW(B)中。 如果β =>ε则把FOLLOW(A)也加入FOLLOW(B)中。(c) 反复使用(b)直到每个非终结符的FOLLOW集不再增大为止。或：(a)对文法开始符号S，令#∈FOLLOW(S)。(b)若B→αAβ是一个产生式，则令FIRST(β)-{ε}属于FOLLOW(A)；(c)若B→αA是一个产生式，或B→αAβ是一个产生式且有ε∈F 阅读全文

摘要：语法分析,编译原理 阅读全文

摘要：编译原理,词法分析 阅读全文

摘要：Delphi调用JavaScript解析Json 1.首先加入ComObj单元 2.加入函数 阅读全文

摘要：提取图标到ImageList const SFile='D:\windows\system32\shell32.dll'; 阅读全文

摘要：判断是否联网 在uses中加入WinInet 阅读全文

摘要：默认DBGRID选中行的颜色为深蓝色，可以在程序中改变 在DBGRID的OnDrawColumnCell中写入 阅读全文

摘要：可将Options->pcoUserPageColorForTab设为True,这样标签按钮的颜色和标签页内容颜色一致 阅读全文

摘要：求出下一个发票号，如FP001的下一个为FP002,FP 001 X的下一个为FP 002 X,FP 001 XN 002的下一个号码为FP 002 XN 002 总是取出第一个数字并加一，但是不足的位数要补零 阅读全文

摘要：在delphi中，可以用WIN API锁定鼠标移动范围。 设有两个按钮，button1用来锁定范围，button2用来解除锁定，代码为： 阅读全文

摘要：lazarus下的正则表达式 阅读全文

摘要：lazarus的安装 阅读全文

摘要：对于常用的SQL语句，有时为了规整，必须让关键字大写，但对有的不规范的，我们可以用正则表达式修改为大写，具体步骤为： 阅读全文