摘要： 在输入框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 阅读全文

摘要： php 中几种while循环输出数据库中的数据代码 这段代码的功能是： 连接到一个 url 地址为localhost 、 端口为 3306 的mysql服务器上。 mysql服务器的帐号是"root"，密码是"9999" mysql 服务器上有一个数据库 ok ， 数据库里有一个表 abc。 表 a 阅读全文

摘要： <?php $connstr="DRIVER=Microsoft Access Driver (*.mdb);DBQ=".realpath("mydb.mdb"); $connid=odbc_connect($connstr,"","",SQL_CUR_USE_ODBC ); ?> 如上就建立了一个 阅读全文

摘要： 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 阅读全文