copy(a,b,c); a:就是copy源,就是一个字符串,表示你将要从a里copy一些东西, b:从a中的第b位开始copy(包含第1位), c:copy从第b位开始后的c个字符, 例如: m:='the fellowship of the ring' s:=copy(m,2,2): //s值为‘he’ pos(a,b); 取出子串a,在父串b中第一次出现的位置: 例如: pos('b','abcd'): 返回结果是2:

POS和ANSIPOS的主要区别在于,POS参数多用于是一个字符,而ANSIPOS多用于是多个字符: 例如:i:=pos('a','sssssas'); i:=ansipos('abc','sdabcss'); AnsiPos是以Ansi字符做为Pos单位,例如AnsiPos('|','王韡|')得到的值是5Pos是以字节作为Pos单位,例如Pos('|','王韡|')得到的值是4,因“‘韡”是由两个字节组成,而其低位为“|”所以Pos后的结果为4 另外AnsiPos和Pos都可以Pos多字符目

使用Pos函数来定位子字符串第一次出现的位置 函数定义: Function Pos(Substr: String, S: String): Integer; 表示取出Substr在S中第一次出现的位置,返回取到的位置 比如:Pos('a', '1234a'); //返回值为5 使用Copy函数来截取字符串 函数定义: Function Copy(S: <string or dynamic array>, Index: Integer, Count: Integer): String; 表示从S

Delphi从XE4版本就开始支持移动开发了,但是笔者最近才开始学习这块内容.因为笔者原来一直使用的是Delphi7,对于很多新语法没有了解过,所以把其中一些东西记录下来.        程序开发,调试是少不了的.关于搭建调试环境,网上已经有很多文章,这里就不复述了,大家可以自己搜索搜索.个人推荐,对于安卓平台,使用真机比较好,因为模拟器的速度是非常非常非常非常慢的,对于我这种急性子简直是无法忍受.不过你也可以在虚拟机里面搭建IOS的环境,那个速度就非常快了,比安卓的手机速度还快.一般地说,IO

Delphi 是一个基本上被我遗忘的工具, 要不是在使用RapidSql , 我是收不到Embarcadero 公司发出的邀请来參加Delphi XE5的公布会的. 有人可能要问为什么是Embarcadero (名称很拗口)而不是Borland 开Delphi 公布会, 这是由于Borland那几年撑不下去, 把IDE工具打包成立了CodeGear 公司,已经被Embarcadero 收购了. 实际上十多年前以前參加过机械工业出版社主办的一个技术沙龙, 李维先生作为Borland 技术专家, 畅

我发现了一篇发表在1999.11.29   b13版的     <令win32应用程序跳入系统层>东南大学   卢威   luwei@126.com     是用vc++嵌汇编做的,     很接近了,可试试         BCB或DELPHI进入Ring0     东南大学卢威1999.12发表在<<计算机世界>>报上的一篇     <<WIN32跳入系统0层>>,原采用VC++编程,现改成C++Builder     供诸位参考,DELPH

Delphi 在很大程度上是一个被遗忘我的工具. 无论是在使用RapidSql , 我还没有收到Embarcadero 本公司发行参与邀请Delphi XE5该公告将. 可能有人会问,为什么Embarcadero (这个名字很拗口)代替Borland 开放Delphi 公布会, 这是由于Borland那几年撑不下去, 把IDE工具打包成立了CodeGear 公司,已经被Embarcadero 收购了. 实际上十多年前以前參加过机械工业出版社主办的一个技术沙龙, 李维先生作为Borland 技术专

{设置打印机}Assignfile(RPrinter,'LPT1'); {准备写文件}Rewrite(RPrinter); {向后倒纸}//Writeln(RPrinter,chr($b)+chr(27)+'K'+chr(40));   {打印}Writeln(RPrinter,'测试:****'+(Edit1.text)); {向前进纸}Writeln(RPrinter,chr($b)+chr(27)+'J'+chr(140)); {关闭打印机}CloseFile(RPrinter); del

这两天博客园上关于“.Net工资低”的讨论挺多的,让我不禁想起一句话“拉不出屎来怪地球没引力”. 那些抱怨“做.Net工作三年了月薪才6千,我的同学做Java现在都一万二”的哥们,你问问自己“我会什么,人家会什么”:人家使用struts做mvc模式开发已经轻车熟路的时候,你还在为GridView控件的一堆事件的触发顺序而头疼:人家已经研究IOC.AOP应用的缺点的时候,你还在为会找到一个好用的三层架构代码生成器而沾沾自喜:人家已经在研究Redis.Ngix.Memcached等技术进行大型网站架

1. VCG Libary是Visulization and Computer Graphics Libary(可视化与计算机图形学库)的缩写,是一个开源的C++模板库,用于三角网格和四面体网格的控制.处理和OpenGL显示.其中包含了超过100 000行的代码.基于该库,Visual Computing Lab开发了几个著名的工具,如metro和MeshLab. VCG Libary是专门为处理三角网格而设计的,库很大,且提供了许多最先进的处理网格的功能,如:             *基于边

相信同类Delphi 类似文章非常多了,这里我用c++ builder firemonkey 实现填充椭圆 本例主要在FormPaint实现,当然你想在Image1->Bitmap->Canvas这种地方也能够,详细看官方演示样例吧. void __fastcall TForm3::FormPaint(TObject *Sender, TCanvas *Canvas, const TRectF &ARect) { Canvas->BeginScene(); System::Typ

delphi xe7 中对数组操作做了很多扩充,比如加入了类似字符串处理的功能. 例如,数组相加 var A: array of integer; B: TBytes = [1,2,3,4]; //Initialization can be done from declaration begin ... A:=[1,2,3]; // assignation using constant array A:=A+[4,5]; // addition - A will become [1,2,3,4,

delphi TEdit设为下横线,类似填表格效果,无需第三方控件就可以实现. 无须编写代码,只要设置一下控件属性 需要修改这些属性: BorderStyle改为bsNone BevelKind改为bkSoft BevelEdges下的项目中只将beBottom设为True,其余设为False 为了美观,最好再将Ctl3D设置为False.

扩展 delphi 泛型 以实现类似lambda功能 , C#中的any count first last 等扩展方法 在C#中对泛型的扩展,输入参数是泛型本身的内容,返回值则是bool.基于这一点,开始构造在delphi下如何实现. 首先1.delphi 是支持匿名函数的其语法为:名称 = reference to 函数类型定义例如:TFun = reference to function(const num: Integer): Integer; 2.对泛型的扩展的语法如下:TList<T>

Delphi也是基于继承和接口的多态性.

今天在看QT对象内存管理的一篇文章时:http://blog.csdn.net/dbzhang800/article/details/6300025想到了一个问题:就是QT类库体系结构与Delphi类库体系结构的对比问题.从它们都有parent属性,而且都可以管理子控件的内存释放,就可以猜测两者的体系结构十分相似.以下是我的过程,就把它当自己对Qobject和QWidget的一个熟悉过程吧. ----------------------------------------------------

一.基础知识简介: 1.包的命名介绍: 包的命名没有规则,但是建议遵守包的命名约定:包的命名与包的版本相关,包的名称前面几个字符通常表示作者或公司名,也可以是控件的一个描述词,后面紧跟的Std表示运行期包,Dsgn表示设计期包,然后是版本号.如:MyDataEditStd60,MyDataEditDsgn60. 2.对象浏览器[Object Inspector]中一个属性感知一类控件的原理: 控件属性的感知只不过是将它的一个属性声明为将要感知的控件类而已,例如要感知Image控件,则:prope

今天在看QT对象内存管理的一篇文章时:http://blog.csdn.net/dbzhang800/article/details/6300025想到了一个问题:就是QT类库体系结构与Delphi类库体系结构的对比问题.从它们都有parent属性,而且都可以管理子控件的内存释放,就可以猜测两者的体系结构十分相似.以下是我的过程,就把它当自己对Qobject和QWidget的一个熟悉过程吧. ----------------------------------------------------

1.copy(‘csdn’,1,2) 返回的结果是 cs 注释: Copy有3个参数,第一个是要处理的字符串,第二个是要截取的开始位置,第三个是截取位数 当第三个参数大于字符长度,那么效果就是取开始位置 后的所有字符 2.Pos('3','123456') 返回的结果是 3 注: 取出子串在父串中第一次出现的位置 http://blog.csdn.net/zisongjia/article/details/53428734

/// <summary> /// 获得今天是今年的第几周 /// </summary> /// <param name="year"></param> /// <returns></returns> public string GetWeekOfYear(DateTime today) { int days = today.DayOfYear; ; ) ); else + ); } -------------上面