摘要：
优秀的菜单控件DevExpress Bar使用初探前一阵子在做项目时，用到了Develper Experss Inc. 的DevExpress Bar控件，感觉它真是一个好东西，可以完全取代Delphi现有的Menu控件和ToolBar控件，其功能也是第三方控件中的佼佼者。故在此写一点点自己的所得和体会，希望能够对各位朋友有所帮助。DevExpress Bar安装后，控件栏新添了ExpressBars页：我们使用的主要是第二个dxBarManager控件。这里，以建立一个含有菜单和快捷工具栏的应用程序为例。新建工程，将其放置到Form1上如图：双击该控件，出现设置窗口（如下图）。所有的设置均是 阅读全文
摘要：
这两天抽空研究了下Delphi2006如何连接Mysql5.1，过于追求新版本有时就会遇到此类问题，厂商实现不完善，有地方没实现或没考虑到的，直接用它的产品就会出问题。baidu搜了搜国内网站，好像还没此类文章，可能是没多少人在用Delphi2006了，呵呵。用google搜，还是老外nb啊，找到了不少连接的方法，有几种都是商业产品，例如mydac、dbx等，看看价格，还都不便宜，那个价人民币我都嫌贵，何况还是dollars。发财的机会还是很多的，趁厂商自己还没做开发个这样的数据库连接驱动也能赚一笔。大致找到了如下几种免费的办法，总结一下：测试环境： WinXP＋SP2 Delphi2006＋ 阅读全文
摘要：
DBGridEh导出功能详解(SaveDBGridEhToExportFile说明)--- 经常有用户要求数据导出，对此，我们一直用最原始的办法，打开查询，读取每个字段的数据，逐条的的写入文件。如下：procedure TForm10.prExpData(pMode:Byte);Var pFPath:String; pFName:String; //Exp Name of prefix pFObject:string; pMyFile:TextFile; pStr:string; i:integer;begin pFObject:='c:\Exp_Sample.csv'; AssignFil 阅读全文
摘要：
当前最全的TAdvStringGrid控件属性事件介绍和使用方法(AdvStringGrid使用技巧/Cells)---作者：TTT日期：20090306--- TAdvStringGrid是Delphi编程中常用的控件，经常用于统计数据和设计比较复杂的表格。控件功能很强大，但相应的使用也很复杂! 以下是我整理出的常用技巧，有一部分是我自己的经验，有一部分是网上搜的别人的总结，有一部分整理了，有一部分没有整理；有一部分测试了，有一部分没有经过测试~~~呵呵，但都是我手工编辑的啊~~。(部分示例过程是用于创建和设置动态Cells的过程，如果不理解请参考我总结的另一篇文章完美动态TAdvS 阅读全文
摘要：
Delphi获取机器名和IP地址的方法---{获取本机机名}function GetLocalName():String; var CNameBuffer : PChar; CLen : ^DWord;begin GetMem(CNameBuffer,255); New(CLen); CLen^:= 255; if GetComputerName(CNameBuffer,CLen^) then result:=CNameBuffer else result:=''; FreeMem(CNameBuffer,255); Dispose(CLen);end;{根据机名获取IP，要添加使用单元：Wi 阅读全文
摘要：
Delphi中判断是否含有全角字符方法：//判断全角限制字符ifLength(pStr)Length(WideString(pStr))thenbeginResult:='Full-widthcharacters';exit;end;说明：Length('汉字')=4Length(WideString('汉字'))=2 －－本文来源于[TTT BLOG]：http://www.taoyoyo.net/ttt/post/190.html (提示：转载时请务必保留版权信息或者注明来源。) 阅读全文
摘要：
有时我们需要在程序运行是知道当前是什么版本，当然查程序文件的属性也只可以看到，但这样太麻烦了。 可以用以下方法调用：//要在uses中添加引用单元：Version;procedure TForm1.FormSet;varpVer : tVersion;begin pVer := Tversion.Create(ParamStr(0)); x_pVerNo := pVer.FileVersion; x_pProgramName := pVer.InternalName; x_pComments := pVer.FileDescription; pVer.Free;end; －－本文来源于[T 阅读全文
摘要：
1，WinExec()： WinExec主要运行EXE文件，不能运行其他类型的文件。不用引用特别单元。 原型：UINT WinExec(exePath,ShowCmd) 示例，我想要用记事本打开"C:\HDC.TXT"，以正常方式运行：WinExec(pChar('notepad c:\taoyoyo.txt'),SW_SHOWNORMAL); 参数说明： --xePath：命令行参数。注意，要用pChar转化一下。 --ShowCmd：外部程序的运行方式。其取值如下： ----SW_HIDE 隐藏 ----SW_MAXIMIZE 最大化 ----SW_MINIMIZE 最小 阅读全文
摘要：
此窗体，只需要简单准备如下，即可运行： 1，添加一个TAdvStringGrid，并命名为strGrid1。 2，设置：TAdvStringGrid--option--goEditing=true TAdvStringGrid--enableGraphics=true 3，修改Form名称为form1，或替换以下代码中的form1为当前窗体的名字。 4，将以下代码覆盖原来的代码。 5，关联以下过程(只需要在窗体和strGrid1控件属性-事件页中双击相关项即可完成关联。) FormCreate FormShow strGrid1CanEditCell strGrid1GetAlignm 阅读全文