循环语句大家都用得比较多了，如果循环语句里面应用了太多判断语句的话，会加重程序的负担。。所以，建议大家用一些转向语句，提高代码效率！ 1：Break （强制退出循环）语句...
Delphi开发的调试技巧 1、设置调试选项 Delphi主菜单。【Project】－【Options】，或单击工程管理器中的【ProjectOptions】按钮。显示ProjectOptions,选择Complier 1选中DebugInformation:把调试信息嵌入到...
strtodatetime 这个函数在win7下出错 例如 strtodatetime('2010-11-25') 在win7下出错 ， 但在xp系统下正常 解决方法 日期格式不一样，你需要统一日期格式，可以再控制面板中修改，或者用代码实现...
问题的引入： 准备做一个多国语言软件，发现信息变量（都是字符串）数量庞大，如果简单的通过 “变量=readstring”从ini文件中获取的话，几百个变量就是几百行，这个工作量非常大，...
从国外网站上找的，编译出来的程序有点大，还有更好的方法。 program Project2; {$APPTYPE CONSOLE} uses SysUtils, ExtCtrls, Classes; type PMethodPointer = ^TMethodPointer; TMethodPointer = packed record pMethod: Point...
实现过程：不停地剪切标题的第1个字符放到最后一位，OK。 1、定义一个全局变量保存显示到标题栏的字符串 var strScroll:Widestring = 'Beyond - 海阔天空.mp3 - 千千静听 www.delphitop.com'; 2、添加...
一些delphi开发的小技巧 这是我从网上收集到的一些delphi开发的小技巧，现在与大家一起分享 ◇[DELPHI]网络邻居复制文件 uses shellapi; copyfile(pchar('newfile.txt'),pchar('//computername/direction/targe...
delphi利用系统时间产生随机数的函数 ━━━━━━━━━━━━━━━━━━━━━━━━━━ 一个利用系统时间产生随机数的程序,比系统的随机函数真实 function Myrandom(Num: Integer):...
在许多数据表中，数据是以代码方式存放的，如在班级编码数据表tB03(表5．5)中，系部字段TB0309采用编码方式存放，系部真实名称则存放在系部编码表TB06。使用代码的好处是，用户可在...
首先要uses uses FMX.Platform.Android, Androidapi.JNI.Telephony, Androidapi.JNI.Provider, Androidapi.JNIBridge, Androidapi.JNI.GraphicsContentViewText, Androidapi.JNI.JavaTypes, FMX.Helpers.Android; 接著放上Button，在Click事件打上...