首页
博客
源码
资源
博客
源码
写文章
发布博客
发布资源
登录
X
delphi
相关资讯
热门
最新
代码人生
01-01 08:00
代码人生
delphi基本语法
delphi基本语法 本文参考自《delphi2010语法手册》 1. 工程文件结构 源文件联系着unit单元,delphi主模块源文件格式为.dpr,其他模块为.pas,一个完整程序由一个.dpr和若干.pas组成。 2..dpr 程序结构 一个.dpr由程序头、[use从句]、主程序块组成。一个典型工程文件如下: 1 program Project; 2 {$APPT
104
代码人生
01-01 08:00
代码人生
delphi idhttp提交网址包含中文
delphi idhttp提交网址包含中文 首先用use httpApp 然后中文部分要转换一下 str:=AnsiToUtf8(用户名edit.Text);str:=HTTPEncode(str); url:=‘http://127.0.0.1:8081/datasnap/rest/tprjmis/web_login‘+str str:=self.IdHTTP1.Get(url);原文:http
103
代码人生
01-01 08:00
代码人生
DELPHI 调用系统 ADO 配置窗体 提高软件易用性
DELPHI 调用系统 ADO 配置窗体 提高软件易用性 最近DELPHI好像不太景气哦,把自己的代码拿出来晒晒。高手别喷哦。 直接上代码 implementation uses AdoConEd; var saveconnstr:string; procedure TFsetup.BTAUTOClick(Sender: TObject);vartmpF:TConnEditForm;&
103
代码人生
01-01 08:00
代码人生
Delphi 判断AnsiStr是否是UTF编码格式 IsUtf8Format
Delphi 判断AnsiStr是否是UTF编码格式 IsUtf8Format Delphi 判断AnsiStr是否是UTF编码格式 IsUtf8Format //判断是否是UTF编码格式 function IsUtf8Format(AnsiStr: AnsiString): Boolean; var I, iCount, chr: Integer; c: AnsiChar; nBytes: Integer; // U
103
代码人生
01-01 08:00
代码人生
Delphi TreeView – 自动展开树形结构
Delphi TreeView – 自动展开树形结构 当处理完TreeView控件树形结构的数据后,需要默认自动全部展开,可以用到TreeView的Expanded属性。 var icount : integer; begin RzTreeView1.Items.EndUpdate; //示例中用的是Raize中的RzTreeView组件 for icount := 0 to RzTreeVi
103
代码人生
01-01 08:00
代码人生
Delphi第三方控件安装卸载指南
Delphi第三方控件安装卸载指南 基本安装1、对于单个控件,Componet-->install component..-->PAS或DCU文件-->install; 2、对于带*.dpk文件的控件包,File-->Open(下拉列表框中选*.dpk)-->install即可; 3、对于带*.bpl文件的控件包,Install Packages-->
103
代码人生
01-01 08:00
代码人生
Delphi TFontCharset - 字符集
Delphi TFontCharset - 字符集 Delphi TFontCharset - 字符集 ANSI_CHARSET = 0; DEFAULT_CHARSET = 1; SYMBOL_CHARSET = 2; SHIFTJIS_CHARSET = $80; HANGEUL_CHARSET = 129; GB2312_CHARSET = 134; CHINESEBIG5_CHARSET = 1
102
代码人生
01-01 08:00
代码人生
Delphi Xe 中如何把日期格式统一处理,玩转 TDatetime
Delphi Xe 中如何把日期格式统一处理,玩转 TDatetime 日期格式的处理总是会很复杂,因为不同的环境日 期格式也不一样。为了程序统一处理, 最好把格式给统一了: 可以在程序的初始化段: FormatSettings.ShortDateFormat := ‘dd/mm/yyyy‘; FormatSettings.DateSeparator := ‘/‘; for I := 1 to 12
101
代码人生
01-01 08:00
代码人生
Delphi 语法基础[2] 异常、抛出异常raise
Delphi 语法基础[2] 异常、抛出异常raise Delphi 语法基础[2] 异常、抛出异常raise //例1: begin raise Exception.Create(‘抛出异常‘); raise Exception.CreateFmt(‘%s %d‘, [‘错误代码:‘, 999]); end; //例2: var Excs: Exception; begin Excs :
101
代码人生
01-01 08:00
代码人生
Delphi的DataSource事件
Delphi的DataSource事件 Delphi的DataSource事件 procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField); //数据源记录移动触发 begin end; procedure TForm1.DataSource1StateChange(Sender: TObje
101
«
1
2
...
5
6
7
8
9
10
11
...
14
15
»