DELPHI者，经典开发工具、美奂美仑之开发环境也。 盖论DELPHI其身世，实为神界之神物，后借宝蓝公司之手，于1990年代，现于江湖。 DELPHI一出江湖，码农爱之，企业爱之。一时间，风雨雷动，群...

http://www.xinjuji.com/dianshi/cctvju/junshilianmeng2huxiaolongyin/zaixianguankan-0-7.html

uses IdMessage, IdMessageParts, IdAttachment, IdGlobalProtocols, ...; procedure SaveAttachmentsFromFile(FileName: String) var IdMessage: TIdMessage; MsgPart: TidMessagePart; Hea...

Function SHGetSpecialFolderLocation(hwndOwner: HWND; nFolder: Integer; var ppidl: PItemIDList): HResult; stdcall; Function SHGetPathFromIDList(pidl: PItemIDList; pszPath: PChar)...

之前发的 搜 不到了，为了方便，再补发如下： ZConnection1.Protocol := 'mysql-5'; ZConnection1.ControlsCodePage := cGET_ACP; ZConnection1.ClientCodepage := 'utf8'; ZConnection1.Aut...

AlphaControls 是 著名的 Delphi 第三方皮肤组件,使用非常方便，只需加一个 TsSkinManager 组件，再指定所用皮肤名，即可对 Delphi 开发的程序进行美化。但使用中发现有一个组件 NoteBook， ...

var NetResource: TNetResource; Result: cardinal; // ... NetResource.dwType := RESOURCETYPE_DISK; NetResource.lpLocalName := nil; NetResource.lpRemoteName := '\\192.168.0.100\dir...

SQL 数据库 Python 提供了一系列标准的数据库的 API，这里我们介绍 sqlite 数据库的用法，其他的数据库的用法大同小异： In [1]: import sqlite3 as db 首先我们要建立或者连接到一个数据库上...

MySQL 8.0.11 的用户授权语法发生改变了(这比较讨厌) 1.开启远程访问 use mysql; update user set host='%' where user='root'; 2.修改密码 ALTER USER 'root'@'%' IDENTIFIED WITH mysql_na...

Application.ScreenUpdating = FALSE '禁止屏幕刷新 Application.Calculation = xlCalculationManual '计算模式为手动 ‘一般在Sub结束前改回: Application.Calculation = xlCalculationAuto...

dim name dim fs, s 'name = Inputbox("姓名") 'msgbox(name) set fs = wscript.createobject("scripting.filesystemobject") 'fs为FSO实例 if (fs.folderexists("c:\temp")) then '判断c:\...

1.可视化分析 大数据分析的使用者有大数据分析专家，同时还有普通用户，但是他们二者对于大数据分析最基本的要求就是可视化分析，因为可视化分析能够直观的呈现大数据特点，同时能够非常容易...

unit UindexFTP; interface uses SysUtils, Classes ,StrUtils ,OverbyteIcsWndControl, OverbyteIcsFtpCli; type TFindFile = procedure(FileName,EditTime,Attribute,Owner,Group,Siz...

最好的消息，Delphi 10.2.3 发布 http://altd.embarcadero.com/download/radstudio/10.2/delphicbuilder10_2_3_2631.iso 1. 此版有100多个bug修正 2. 核心可视化框架的增强，更好的V​​DP ...

面向对象的设计模式---工厂模式和单例模式 1.工厂模式： 　　a.概述： 工厂模式主要是为创建对象提供过渡接口，以便将创建对象的具体过程（new 关键字和具 体的构造器）隐藏起来。...

var point: TPoint; begin Application.BringToFront; Form1.WindowState := wsMaximized; Form1.FormStyle := fsStayOnTop; // edt1.SetFocus; point.x := edt1.left + 3; p...

Delphi null与Empty的区别 procedure TForm1.Button1Click(Sender: TObject); var i:OleVariant; begin i:=null;// 注释掉这句 再运行 if VarIsNull(i) then showmessage('null')...

ADOX.Catalog catalog = new ADOX.Catalog(); //创建Student.accdb数据库 catalog.Create("Provider = Microsoft.ACE.OLEDB.12.0;Data Source = .\Data\Student.accdb;Jet OLEDB:Database Pa...

http://www.axolot.com/xls.htm Version 6 released! Important news: Support for pivot tables. New component: TXLSGrid. This is like a simpler version of XLSSpreadSheet where you c...