天道酬勤,学无止境

程序开发

Classes 单元下的公用函数目录

Classes 单元下的公用函数目录 有简单提示的链接有效. 过程或函数名 分类 简单提示 ActivateClassGroup ActiveClassGroup AllocateHWnd AncestorIsValid BeginGlobalLoading BinToHex Bounds CheckSynchronize ClassGroupOf CollectionsEqual CountGenerations DeallocateHWnd EndGlobalLoading ExtractStrings FindClass FindGlobalComponent FindIdentToInt FindIntToIdent FindNestedComponent FindRootDesigner FreeObjectInstance GetClass GetFixupInstanceNames GetFixupReferenceNames GetUltimateOwner GlobalFixupReferences GroupDescendentsWith HexToBin IdentToInt InitComponentRes InitInheritedComponent IntToIdent InvalidPoint IsDefaultPropertyValue

2021-11-26 15:31:33    分类:博客    程序开发   函数

Delphi XE2 之 FireMonkey 入门(3) - 关于 TPosition

Delphi XE2 之 FireMonkey 入门(3) - 关于 TPosition 把 FireMonkey 简称为 FM 吧. FM 的窗体继续使用 Left、Top 属性, 但更多控件不是了.//FM 控件的位置控制不再是 Left、Top, 取而代之的是 Position 属性 procedure TForm1.Button1Click(Sender: TObject); begin Rectangle1.Position.X := Rectangle1.Position.X + 10; Rectangle1.Position.Y := Rectangle1.Position.Y + 10; end; //TPosition 是类 procedure TForm1.Button2Click(Sender: TObject); var posObj: TPosition; begin posObj := TPosition.Create(TPointF.Create(10, 10)); Rectangle1.Position.Assign(posObj); posObj.Free; end; //TPosition.Point 是 TPointF 类型的结构 procedure TForm1.Button3Click(Sender: TObject); begin

2021-11-26 15:30:17    分类:博客    Delphi编程   程序开发

Delphi XE2 之 FireMonkey 入门(11) - 控件居中、旋转、透明

Delphi XE2 之 FireMonkey 入门(11) - 控件居中、旋转、透明 RotationAngle、RotationCenter、Opacity 属性继承自 TControl(FMX.Types), 这些新属性成了控件的基本功能. 先在 HD 窗体上添加 TRectangle 和两个按钮...procedure TForm1.FormCreate(Sender: TObject); begin Rectangle1.Width := 100; Rectangle1.Height := 100; Rectangle1.Fill.Color := claYellow; Rectangle1.Stroke.Color := claRed; {居中; 喜欢这种带枚举名的赋值方式} Rectangle1.Align := TAlignLayout.alCenter; end; procedure TForm1.Button1Click(Sender: TObject); begin {旋转中心点: [0.5,0.5] 是默认值, 表示控件的中心点; [0,0] 和 [1,1] 分别表示控件的左上角和右下角} Rectangle1.RotationCenter.X := 0.5; Rectangle1.RotationCenter.Y := 0.5; // {旋转角度}

2021-11-26 15:30:10    分类:博客    Delphi编程   程序开发

Delphi XE2 之 FireMonkey 入门(14) - 滤镜: 概览

Delphi XE2 之 FireMonkey 入门(14) - 滤镜: 概览 相关单元:FMX.Filter FMX.FilterCatBlur FMX.FilterCatGeometry FMX.FilterCatTransition FMX_FilterCatColor FMX_FilterCatColorAdjust FMX_FilterCatComposite FMX_FilterCatGenerator FMX_FilterCatStyle FMX_FilterCatTiles FMX.FilterCatDistortion FM 提供了 10 个类别的滤镜:{ 分类名称 实现单元 } Blur //FMX.FilterCatBlur Geometry //FMX.FilterCatGeometry Transition //FMX.FilterCatTransition Color //FMX_FilterCatColor Color Adjust //FMX_FilterCatColorAdjust Composite //FMX_FilterCatComposite Generator //FMX_FilterCatGenerator Style //FMX_FilterCatStyle Tiles //FMX_FilterCatTiles Distortion

2021-11-26 15:30:04    分类:博客    Delphi编程   程序开发

Delphi XE2 之 FireMonkey 入门(17) - 特效

Delphi XE2 之 FireMonkey 入门(17) - 特效 刚打开 XE2 时, 就从 Tool Palette 窗口的 Effects 组中发现洋洋洒洒的六十多个特效... 每个特效分别对应一个类, 分别来自 FMX.Effects 和 FMX.Filter.Effects 单元. FMX.Effects 中的特效属于附加特效, FMX.Filter.Effects 中的特效只是某种滤镜效果; 它们都是滤镜的一种快捷应用. 每个特效有不同的参数; 因都是直接或间接地继承与 FMX.Types 中的 TEffect, 也都拥有 Trigger、Enabled、GetDisablePaint 等功能. 测试: 在窗体上放一个 TPanel{ 为 Panel1 设置阴影特效 } procedure TForm1.FormCreate(Sender: TObject); begin with TShadowEffect.Create(Self) do begin Parent := Panel1; //特效也是作用于其父对象 Distance := 3.0; //距离 Direction := 45.0; //角度 Softness := 0.3; //柔和度 Opacity := 0.6; //透明度 ShadowColor := claBlack; //阴影色

2021-11-26 15:29:58    分类:博客    Delphi编程   程序开发

Delphi XE2 之 FireMonkey 入门(19) - TFmxObject 的子类们(表)

Delphi XE2 之 FireMonkey 入门(19) - TFmxObject 的子类们(表) 参考: 和 FMX 相关的类(表)TFmxObject IFreeNotification TAnimation TBitmapAnimation TBitmapListAnimation TColorAnimation TColorKeyAnimation TFloatAnimation TFloatKeyAnimation TGradientAnimation TPathAnimation TRectAnimation TBitmapObject TBrushObject TCommonDialog TOpenDialog TSaveDialog TPageSetupDialog TPrintDialog TPrinterSetupDialog TCustomPopupMenu TPopupMenu IItemsContainer TEffect TBevelEffect TBlurEffect TGlowEffect TInnerGlowEffect TImageFXEffect TImageFXEffect -> 57 个 TReflectionEffect TShadowEffect TFilterBaseFilter TFilterBaseFilter -> 57 个

2021-11-26 15:29:55    分类:博客    Delphi编程   程序开发

Delphi XE2 之 FireMonkey 入门(30) - 数据绑定: TBindingsList: TBindExpression 的 OnAssigningValue 事件

Delphi XE2 之 FireMonkey 入门(30) - 数据绑定: TBindingsList: TBindExpression 的 OnAssigningValue 事件 表达式中的函数有限, 譬如我想通过绑定输出文本的长度(譬如在 Label1 中绑定输出 Edit1.Text 的长度)就没有相应的函数; 这可在 TBindExpression 的 OnAssigningValue 事件中处理. TBindExpression 和它的兄弟们 (TBindExprItems、TBindLink、TBindListLink、TBindGridLink、TBindPosition、TBindList、TBindGridList、TBindDBEditLink、TBindDBTextLink、TBindDBListLink、TBindDBImageLink、TBindDBMemoLink、TBindDBCheckLink、TBindDBGridLink) 拥有相同的事件. 先在窗体上添加 Label1、Edit1、BindingsList1, 然后激活 Edit1 的 OnKeyUp 事件和窗体的默认事件; 代码中手动完成了 OnAssingningValue 事件, 在设计时添加事件会更方便.unit Unit1; interface uses System

2021-11-26 15:29:49    分类:博客    Delphi编程   程序开发

JAVA环境变量配置

前言 每次装完系统,都要查一下java环境变量配置,经过几次配置后,现在也熟悉了,这样也好自己配置。我们.net安装vs的时候自己就给我们path里面配置了,所以也不用我们操心了。虽然不是搞java的,但是还是要熟悉熟悉,把配置过程熟悉写一遍感觉会忘得慢些。 正文 第一步:下周jdk文档,是做java时候用到的一些类库的一些东东。。。 第二步:配置环境变量,这些都查到的,为什么自己还要写,就是想记录自己干啥了以及熟悉这个过程。 我得电脑-》属性-》更改配置-》高级-》环境变量 系统变量中新建: 变量名:JAVA_HOME 变量值:也就是我们jdk安装的本地硬盘路径,不建议安装到c盘。D:\Program Files\Java\jdk1.7.0_09 后面没有\ 变量名:CLASSPATH 变量值:.;%JAVA_HOME%\lib\dt.jar;%JAVA_HOME%\lib\tools.jar; %%表示取变量名 第三步:找到path变量,在变量值后面把;%JAVA_HOME%\bin;%JAVA_HOME%\jre\bin;放到后面就可以了,注意开头的;,如果你是.net开发,或者path变量值已经有了配置,;千万别丢了。 第四步:验证一下是否起作用了,win+r -> cmd打开我们的doc命令框,输入javac,大小写both ok。 最后 配置就完成了,其实挺简单的

2021-11-22 20:53:37    分类:博客    Java基础   程序开发

java基础-8种基本类型

正文 java中的八种基础类型。 boolean:只有两个值,false,true 带符号类型 byte:占用1个字节,一个字节也就是8位,那么由于是最高一位是用来表示 负还是正,所以范围就是 -2^7 ~ 2^7-。 short:占2个字节,16位,范围-2^15~2^15-1 int:占用4个字节,32位,范围 -2^31~2^31-1 long:占用8个字节,64位,范围 -2^63~2^63-1 浮点型 float:占用4个字节,32位,可取值范围:-3.40e38 — 3.403e38 (有效位数为6-7位) double:占用8个字节,64位,可取值范围:-1.798e308 — 1.793e308 (有效位数为15位) 来源:https://blog.51cto.com/u_15199183/2771906

2021-11-22 20:53:34    分类:博客    Java基础   程序开发

java基础-java与c#的可变参数

正文 可变参数,必须最为参数的最后一个参数;可变参数只能有一个; c#可变参数例子: class Program   {   static void Main(string[] args)   {     Test t = new Test();     t.say("li", "wang");     Console.Read();   }   }   class Test   {   int num = 0;   public void say(params string[] name)   {   foreach (string item in name)   {   Console.WriteLine(item);   }   }   } java可变参数例子:   public class Pram {     public static void main(String[] args) {       Pram p = new Pram();       p.say("li","wang");     }     public void say(String ... name)     {       for(String n:name)       {         System.out.println(n);       }     }   } 通过例子可以观察到

2021-11-22 20:53:28    分类:博客    Java基础   程序开发