摘要：// 加密方法一(通过密钥加密解密) function EncryptString(Source, Key: string): string; function UnEncryptString(Source, Key: string): string; //加密方法二(通过移位加密解密) funct 阅读全文

摘要：Params设置如下： 相关控件按如下顺序连接 阅读全文

摘要：Delphi中处理数据库主要有两种方法，也就是BDE、ADO，从Delphi 6.0开始还加入了一种dbExpress方法。 另外，Delphi还提供了专门处理Borland 公司自己的数据库产品InterBase 数据库的专门的方法。 BDE（Borland Databas Engine）， 是D 阅读全文

摘要：在许多应用软件中，启动程序后，在主导界面出现之前，有一个一般以图象为主,文字为辅的画面，通常用来显示软件或公司的主题标志、软件名称、作者、版权和版本信息等，停留数秒或按了任意键后软件进入主导界面，这个画面称为Splash画面，意思为引人注目画面。这个画面的另外一个用处是在处理耗时进程时，为用户展示一 阅读全文

摘要：在delphi里实现文件复制可以直接调用 copyfile(path1,path2,false); 其中path1为源文件名(包括路径),path2为目标文件名(包括路径); 注意path1,path2为char类型,如果是其他类型注意强制变类型 可以写成copyfile(pchar(path1), 阅读全文

摘要：procedure TMainForm.Edit2KeyPress(Sender: TObject; var Key: Char); begin if not (key in ['0'..'9',#8]) then begin key := #0; showmessage('请您勿必输入数字'); 阅读全文

摘要：type procedure OnMouseWheel(Var Msg :TMsg;var Handled:Boolean);//注意，需先在type里声明 /////////////////////////////////////////////////////////////////////// 阅读全文

摘要：在ADOQuery的属性SQL里写下面的SQL语言 select * from XX表 where format(生日,'mm-dd')=:shengri 说明:上面的shengri可以写成任何东东,呵呵 在delphi里写下面的代码 ADOQuery.Parameters[0].Value:=fo 阅读全文

摘要：在输入框Edit输入数据时,能实时过滤掉不符合条件的数据 procedure TMainForm.Edit1Change(Sender: TObject); begin ADOQuery1.Active :=false; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add( 阅读全文

摘要：0.获取程序执行文件的所在目录 ExtractFilePath(Application.ExeName) 1.获取不带扩展名的文件名方法，利用ChangeFileExt函数修改传入参数的扩展为空，并不会对文件本身产生变更。 ChangeFileExt(ExtractFileName('D:\KK\T 阅读全文

摘要：uses shellapi ShellExecute(0,'Open',ExeName,nil,nil,SW_SHOW) ExeName:='C:WinNTSystem32Calc.exe'; 也有可能系统不安装在C盘,建议把Calc.exe拷到程序的运行文件下 ExeName:=pchar(Ext 阅读全文

摘要：首先大家了解一下FTP的基本知识：FTP是一个标准协议，它是在计算机和网络之间交换文件的最简单的方法。 FTP也是应用TCP/IP协议的应用协议标准。 FTP通常于将作者的文件上传至服务器，或从服务器上下传文件的一种普遍的使用方式作为用户，您可以用非常简单的DOS界面来使用FTP，也可以使用由第三方 阅读全文

摘要：通过TIdHTTP空间的Get访问外网IP查询 procedure TForm1.Button1Click(Sender: TObject); var stxt:string; i,i2:integer; begin //如果访问出现“HTTP1.1/ 403 Forbidden”错误，需要以下4行 阅读全文

摘要：在Delphi 7开发下有强大的Indy控件，版本为9，要实现一个FTP服务器，参考自带的例子，发现还要写很多函数，而且不支持中文显示文件列表等等。于是，自己改进封装了下，形成一个TFTPServer类，源码如下： {***************************************** 阅读全文

摘要：Delphi 7自带的INDY控件，其中包含了IdFTP，可以方便的实现FTP客户端程序，参考自带的例子，其中有上传、下载、删除文件，但是不包含对文件夹的操作，得自己实现上传、下载、删除整个文件夹（带子目录和文件）。于是自己参考了网上的资料，重新整理下，使用归纳如下示例工程所示： 窗体上放置TIdF 阅读全文

摘要：uses ActiveX;//注意引用ActiveX单元 procedure TForm1.WriteHtmlToWB(wb: TWebBrowser;HTMLCode: string); var ss: TStrings; ms: TMemoryStream; begin ss := TStrin 阅读全文

摘要：DBNavigator组件用于在数据集进行记录导航，当用户单击DBNaVigator组件的某个按钮时，可实现记录 指针的前移、后移，插入‘删除、修改当前记录等操作，而无须编写任何程序代码。 1. DBNavigator组件按钮功能 First按钮 将指针移到数据表的第一条记录。 Previous按钮 阅读全文

摘要：uses Clipbrd; procedure TForm1.Button1Click(Sender: TObject); begin Clipboard.AsText := Text; ShowMessage(Clipboard.AsText); {Form1} end; 阅读全文

摘要：EhLib 9安装 安装EhLib： 在Installer文件夹里找到EhLibInstaller.exe，右键以管理员权限运行EhLibInstaller.exe。 按照提示一路安装下来，顺利完成。 最后不要忘记在菜单tool->environment options->libriary中加入控件 阅读全文