07 2013 档案

Delphi Format中的换行符号是什么
摘要：Delphi Format中的换行符号是什么vars,s1,s2,s3:string;begins:='Hello';s1:=' World';s2:=format('%s%s%s',[s,#13#10,s1]);s3:=Format('%s'#13#10'%s',[s,s1]);ShowMessage(s2);ShowMessage(s3);end;#13#10两边都是有单引号的#13#10在这里不能用\n无效ShowMessage( Format('%s,%s,%s',['hello&# 阅读全文
posted @ 2013-07-07 14:25 XE2011 阅读(886) 评论(0) 推荐(0) 编辑
myNote
摘要：源码地址 ：http://450640526.ys168.com/编辑器是WEBBWOSER制作的 你的Internet Explorer的版本至少要是8.0的否则用不了还有很多BUG 很多功能没有完成Delphi版本:Delphi XE4 update1来自为知笔记(Wiz) 阅读全文
posted @ 2013-07-07 13:47 XE2011 阅读(620) 评论(2) 推荐(0) 编辑
提取一个字符串左边，或右变或中间的字符串
摘要：uses StrUtils;c:\program files\embarcadero\rad studio\11.0\SOURCE\RTL\SYS\System.SysUtils.pasfunctionTrim(constS:string):string;functionTrimLeft(constS:string):string;functionTrimRight(const... 阅读全文
posted @ 2013-07-01 21:38 XE2011 阅读(534) 评论(0) 推荐(0) 编辑
往另外1个ListView中添加当前选中的项目
摘要：//往另外1个ListView中添加当前选中的项目 function AddSelItems(listview1:TListView;ListView2:TListView):Boolean;vars: string;I: Integer;beginResult:=False;if listview1.Selected =nil thenexit;for ... 阅读全文
posted @ 2013-07-01 19:26 XE2011 阅读(150) 评论(0) 推荐(0) 编辑
重命名文件 或文件夹
摘要：默认的重命名是这样的MoveFile(PChar('C:\1.txt'),PChar('C:\ABC.txt'));现在修改成这样的__RenameFile('C:\1.txt','abc');//重命名文件//重命名文件 或文件夹function __RenameFile(OldName:string;Title:string):Boolean;varNewName:string;beginNe... 阅读全文
posted @ 2013-07-01 18:13 XE2011 阅读(261) 评论(0) 推荐(0) 编辑
判断字符串是否包含以下字符
摘要：//判断字符串是否包含以下字符functionIsIllegalChar(Text:string):Boolean;constillegalChar:setofChar=['\','/',':','?','"','','|'];vari:Integer;beginfori:=1toLength(Text)dobegin... 阅读全文
posted @ 2013-07-01 17:46 XE2011 阅读(139) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示