摘要: 可以修改如下: 或者如下: 代码如下: unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms... 阅读全文
posted @ 2015-10-23 17:22 GOD攀 阅读(208) 评论(0) 推荐(0) 编辑
摘要: 开发数组的参数赋值和传参如下: 代码如下: unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, ... 阅读全文
posted @ 2015-10-23 17:12 GOD攀 阅读(171) 评论(0) 推荐(0) 编辑
摘要: 按值传递,会在函数内复制一个变量,不会改变外部参数的值。 按址传递,需要在参数上写var标识符,会改变外部传入参数的值。 如下图: 代码如下: unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classe... 阅读全文
posted @ 2015-10-23 17:00 GOD攀 阅读(166) 评论(0) 推荐(0) 编辑
摘要: 如果程序 A 调用程序 B,而程序 B 又调用程序 A,当我们开始撰写这 个程序代码的时候,我们等于是在呼叫一个编译程序还没看到的程序。 在这个情形下(还有很多情形也会有类似的情况发生),我们可以先宣告一个 函式或者程序, 把完整的名称、 参数都宣告好, 但不用提供完整的程序代码。 要做到这一点,我们只要把完整的程序或函数名称宣告写好,最后加上一个 forward... 阅读全文
posted @ 2015-10-23 16:44 GOD攀 阅读(180) 评论(0) 推荐(0) 编辑
摘要: for in 循环中,会把整个数组、字符串、List 里面的所有元素都列出来。 procedure TForm1.Button1Click(Sender: TObject); var S: string; Ch: Char; begin S := 'Hello world'; for Ch in S do begin Memo1.Lines.Add(... 阅读全文
posted @ 2015-10-23 16:33 GOD攀 阅读(132) 评论(0) 推荐(0) 编辑
摘要: Dec 把参数一的数据递减,如果有参数二,则把参数一递减 参数二所述的数值 Inc 把参数一的数据递增,如果有参数二,则把参数一递增 参数二所述的数值 Odd 回传参数数据是否为奇数,如果要测试是否为偶数,请 直接加个 not 在前面做反向运算即可:not Odd Pred 回传参数数据的前一个数值,系统会依据参数型别来判... 阅读全文
posted @ 2015-10-23 16:02 GOD攀 阅读(165) 评论(0) 推荐(0) 编辑
摘要: 关键代码如下: unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls; ... 阅读全文
posted @ 2015-10-23 15:17 GOD攀 阅读(156) 评论(0) 推荐(0) 编辑
摘要: 1.按Ctrl+D 可以格式化代码 2.注释方法如下: { 这里面的文字都是批注 } (* 这是第二段批注 *) // 从左边出现了两个斜线以后,到本行的末端都会被视为批注 阅读全文
posted @ 2015-10-23 14:59 GOD攀 阅读(135) 评论(0) 推荐(0) 编辑
摘要: 1.新建多设备运用程序工程 2.选择空白的运用 3.代码如下,点击运行,可以看到运行平台 关键代码: 1 procedure TForm1.Button1Click(Sender: TObject); 2 begin 3 {$IFDEF IOS} 4 ShowMessage ('Running on ... 阅读全文
posted @ 2015-10-23 14:49 GOD攀 阅读(225) 评论(0) 推荐(0) 编辑
摘要: 1.新建工程,选择New->Other 2.选择Console Applicat 3.写好以下代码 ,点击绿色三角运行 阅读全文
posted @ 2015-10-23 14:40 GOD攀 阅读(305) 评论(0) 推荐(0) 编辑