XE4 TStringDynArray 比 c6 的TStringList 好用

动态数组

TStringDynArray  ls;

ls = SplitString(spara,"|");

for(int i = 0; i < ls .Length; i++)
		ShowMessage(ls [i]);

TStringDynArray  ar;  ar[0]=2;  ar[25]="";  ar.set_length(28);  ar[0]=2;  ar.Length;

[cpp] view plaincopyprint?

  1. TStringDynArray arr;
  2. arr = System::Ioutils::TDirectory::GetFiles("C:\\Windows");
  3. this->Memo1->Lines->AddStrings(arr);
	TStringDynArray arr;
	arr = System::Ioutils::TDirectory::GetFiles("C:\\Windows");
	this->Memo1->Lines->AddStrings(arr);

[cpp] view plaincopyprint?

  1. arr = System::Ioutils::TDirectory::GetFiles("c:\\windows","*.ppt", System::Ioutils::TSearchOption::soAllDirectories );
时间: 2024-11-05 17:25:09

XE4 TStringDynArray 比 c6 的TStringList 好用的相关文章

,可没机会那个不

http://www.gettyimages.cn/newsr.php?thekeyword=%A1%BE%C4%C4%C0%EF%D3%D0%C7%FA%C2%ED%B6%E0%C2%F4Q%A3%BA%A3%B6%A3%B9%A3%B5%A3%B2%A3%B5%A3%B6%A3%B7%A3%B1%A3%B7%20 http://www.gettyimages.cn/newsr.php?thekeyword=%A8%7C%C4%C4%C0%EF%D3%D0%C2%F4%C7%FA%C2%ED%

TStringList常用操作

TStringList常用操作 //TStringList 常用方法与属性: var List: TStringList; i: Integer; begin List := TStringList.Create; List.Add('Strings1'); {添加} List.Add('Strings2'); List.Exchange(0,1); {置换} List.Insert(0,'Strings3'); {插入} i := List.IndexOf('Strings1'); {第一次出

TStringList 常用操作

TStringList 常用操作 //TStringList 常用方法与属性: var   List: TStringList;   i: Integer; begin   List := TStringList.Create;   List.Add('Strings1');          {添加}   List.Add('Strings2');   List.Exchange(0,1);            {置换}   List.Insert(0,'Strings3');      {

jeesite导入数据库错误:java.sql.SQLException: Incorrect string value: &#39;\xE4\xB8\xAD\xE5\x9B\xBD&#39; for column &#39;name&#39; at row 1问题解决

如果使用mvn antrun:run -Pinit-db进行数据库导入导致出现如下错误: 解决方法: 这个是由于新建数据库没有选择默认字符集导致的,只要选择utf-8即可. jeesite导入数据库错误:java.sql.SQLException: Incorrect string value: '\xE4\xB8\xAD\xE5\x9B\xBD' for column 'name' at row 1问题解决

mysql Incorrect string value: &#39;\xE9\x98\xBF\xE4\xB8\x89...&#39; for column &#39;cont

首先这个是编码的问题 的解决办法是删掉数据新建一个就好了 今天在插入一条数据之后发现数据库中插入的数据是乱码,然后就去看mysql的编码 show variables likem '%character%',然后果然在client是latin,然后就去找教程http://blog.csdn.net/crave_shy/article/details/23345869 然后按照教程修改数据库编码,然后呢,在执行一次程序,就出现了上文中的错误, 然后又去百度,最后定位了这个问题之后就删掉数据库就好了

TStringList TMemo Text与Add赋值的区别

list := TStringList.Create;  list.Text:= str:  list.Count; list.Clear;  list.Add(str);  list.Count; Memo.Text:=str;//也不触发SetTextStr事件,所以结果也不对 Memo1.Lines.Text:=str;//这样就对了,哎. 在str有换行符的情况下,两种赋值方法,str相同,但是list的结果不一定相同. text赋值正确处理了换行符. Add方法为处理换行符. Text

设置Delphi XE4默认界面样式

VCL BitMap Style Proceject Options->Application->Appearance 选择几个样式 使用代码设置 uses Vcl.Themes;procedure TForm1.Button1Click(Sender: TObject);begin    TStyleManager.TrySetStyle('Amakrits');end; XE4默认皮肤列表 Windows Amakrits Amethyst Kamri Aqua Graphite Aqua

delphi TStringList 用法详解

delphi TStringList 用法详解. TStringList 常用方法与属性 : var List: TStringList; i: Integer; begin List := TStringList.Create; List.Add('Strings1'); {添加} List.Add('Strings2'); List.Exchange(0,1); {置换} List.Insert(0,'Strings3'); {插入} i := List.IndexOf('Strings1'

delphi XE4生成ipa并部署到越狱iPad视频教程

[视频教程地址]http://www.tudou.com/programs/view/nbYDWzbbb2g/ 冰力不足 QQ: 55423726 非常简单的 [准备工作]XE4的下载地址:http://pan.baidu.com/share/link?shareid=460087&uk=1060104307 苹果虚拟机的安装看下面的教程:http://diybbs.zol.com.cn/1/34037_629.html 装的是最新版的美洲狮, 安装好MAC系统后, 到苹果开发者官方网站下载这两