delphi 10.2---非常简单的数组用法求和

【delphi 10.2---非常简单的数组用法求和】的更多相关文章

delphi 10.2---非常简单的数组用法求和

unit Unit9; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls; TYPE Arr=array[0..10] of integer; type TForm9 = class(TForm) Button1: TBut…

Java简单的数组用法尝试，和C语言很不一样

public class Main { static int ARRY_LONGTH=100; static int[] getRandomArr(int n){ int[] randomArr; randomArr = new int[n]; for(int i=0;i<n;i++){ randomArr[i]=(int)(Math.random()*100); } return randomArr; } static void testForArr(){ int[] randomArr=ge…

delphi 10.1 Berlin 中使用自带的 Base64 编码

delphi 10.1 berlin版本中,有好几个 base64 编码的单元可以使用,例如 Indy, MessageDigest_5,还有 CnBase64,我现在使用自带的 System.NetEncoding. var params: string; Digest: TBytes; Base64: TBase64Encoding; begin Base64 := TBase64Encoding.Create; params := Base64.EncodeBytesToString(Di…

Delphi 10.2 JSON与对象/结构体序列化性能提高100多倍

今天在盒子闲逛,无意中看到有人说XE7自带的Json对象序列化很慢,帖子在这里:http://bbs.2ccc.com/topic.asp?topicid=464378;经过测试的确如此. 但是 D10.2后,自带的 Json 做了优化,性能大大的提高了100多倍. 和其他json库对比了序列化和反序列化性能,JsonDataObjects 性能最好,但是只支持简单的对象,不支持结构体,QJson 则不支持动态数组,不支持 Attributes (RTTI),比如需要排除某些字段,Sys…

修改Delphi 10.1.2 edit控件在android的复制、剪切和粘贴样式

Delphi 10.1.2 edit控件在android默认的复制.剪切和粘贴样式太丑,经悟能-DelphiTeacher的提示,用最简单的代码修改后稍有改观. 默认的样式: 修改后的样式: 修改FMX.Platform.Android.pas 找到procedure TWindowManager.ShowContextMenu(const ItemsToShow: TContextMenuItems),按下面的红字增加Copy.cut和Paste button的setBackgroundCol…

Linux常用基本命令：三剑客命令之-awk数组用法

AWK的数组用法跟javascript类似. 1,定义数组 awk 'BEGIN{a[0]="zhangsan";a[1]="lisi";print a[0]}' 2,打印一个没有定义的数组项,值为空 awk 'BEGIN{a[0]="zhangsan";a[1]="lisi";print a[2]}' 3,判断一个数组项是否存在,用 ( 下标 in 数组 ) ghostwu@dev:~/linux/awk$ awk 'BE…

Delphi 10.3实现Android App的动态权限申请

Delphi 10.3 RIO发布近两个月,针对Google Play的要求,完美实现了对Android 8的支持,即对Android API Level 26的支持.这支持当中,最主要的得算是动态申请应用权限,现在我们来看看,如何在自己的app中动态申请权限? 下面的代码,是10.3封装的Android权限列表,这些权限,我们都可以动态申请. {class} property ACCESS_CHECKIN_PROPERTIES: JString read _GetACCESS_CHECKIN_…