unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;...
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;...
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;...
DateUtils.YearsBetween(); DateUtils.MonthsBetween(); DateUtils.WeeksBetween(); DateUtils.DaysBetween(); DateUtils.HoursB...
Delphi没有自己的字符串分割函数,所以只能程序员自己写了,网上搜了好多但是真正好用的没有几个。 下面这个是我在网上找到修改...
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,...
用Delphi开发基于ORACLE平台的数据库管理信息系统过程中,连接ORACLE后台一般考虑两种方式,一种是用ORACLE公司提供的驱动,用OD...
Delphi的字符及字符串[6] - Char(AnsiChar)、WideChar与其编码的相互转换 //Char 类型与其编码值的转换: var b: Byte; c: Char; ...
Windows API 中的字符串对应这 Delphi 的 PChar(PAnsiChar); 在 API 中使用 Delphi 的字符串还 是比较灵活的. 先说赋值: //赋值...
//字符串与字符数组 var arr: array[0..5] of Char; str: string; begin {可以把字符串常量直接赋给字符数组; 但超界不行} arr :...
//String 的指针地址及实际的内存地址 var str: string; pstr: PString; pc: PChar; begin {在没有给 str 赋值以前, 既然声明了,...
Delphi的字符及字符串[2] - Char、AnsiChar、WideChar、PChar、PAnsiChar、PWideChar //单字符 Char、AnsiChar (在目前版本(2007...
Delphi 的字符及字符串[1] - string、AnsiString、WideString、String[n]、ShortString //最常用的 string var str: string; {定...
procedure TForm1.Button1Click(Sender: TObject); var str: string; wh: TSize; w,h: Integer; begin {前面用过 Canvas.TextWid...
Delphi 的 Graphic 单元有五个重要的图像类: TGraphic、TBitmap、TMetafile、TIcon、TPicture. TBitmap 用来操作位图; TMetafile...
//画刷类 TBrush 有三个重要属性: Color、Style、Bitmap. {Style: 样式; Delphi 为画刷定义了样式枚举 TBrushStyle, 包含以下样...
//奇妙的异或运算, 就这些简单的代码, 反复点击按钮... procedure TForm1.Button1Click(Sender: TObject); begin Canvas.Pen.Col...
//TPen 的主要属性有四: Color、Width、Style、Mode {Color: 颜色} {Width: 宽度; 默认是 1; 如果 赋予 = 0 的值, 会使用默认值}...
//先来个例子: procedure TForm1.FormPaint(Sender: TObject); const S =...
//第一种重载的声明: TextRect( Rect: TRect; {矩形} X, Y: Integer; {相对于窗体的位置} const Text: string {文本} ); {如果要...