昨天写 Scala 的时候，使用 match（相当于 switch）时，运行结果很奇怪。var i: Int = 0while (i println("offset: " + items(i)) case logSize => println("logSize: " + items(i)) c...
分类：
其他好文 时间：
2014-07-31 12:11:36
阅读次数：
219
启动memcached:./memcached -d -m 10 -l 127.0.0.1 -p 11211 -u root连接memcached:telnet 127.0.0.1 11211查看memcached所有key:stats items结果： STAT items:16:number ....
分类：
其他好文 时间：
2014-07-30 00:19:32
阅读次数：
329
//TListView列表拒绝添加重复信息
procedure TForm1.Button1Click(Sender: TObject);vari: Integer;beginif (Trim(Edit1.Text)'') thenbeginfor i := 0 to ListView1.Items...
分类：
其他好文 时间：
2014-07-29 21:41:42
阅读次数：
300
如何防止ListView控件闪烁
beginupdate()和endupdate()之间写代码 ListView1.Items.BeginUpdate;ListView1.Items.Add('AAA');ListView1.Items.EndUpdate; 来自为知笔记(Wiz)
分类：
其他好文 时间：
2014-07-29 21:35:12
阅读次数：
241
添加项目
TreeView1.Items.Add(nil,'ABC'); 删除选中的节点
TreeView1.Selected.Delete; 删除鼠标右键选中的节点 var node1:TTreeNode; procedureTForm1.TreeView1MouseMove(Sender:TOb...
分类：
其他好文 时间：
2014-07-29 21:33:43
阅读次数：
222
ListView返回选中的多项目 procedure TForm1.Button3Click(Sender: TObject);vars: string;I: Integer;beginfor i := 0 to listview1.items.count - 1 dobeginif listvie...
分类：
其他好文 时间：
2014-07-29 21:31:22
阅读次数：
322
//返回ListBox选中的多项目 procedure TForm1.Button2Click(Sender: TObject);vari:Integer;s:string;beginfor i:=0 to ListBox1.Items.Count-1 doif ListBox1.Selected[...
分类：
其他好文 时间：
2014-07-29 21:25:42
阅读次数：
235
有问题
//ListBox选中的项目移动到第1位 Listbox1.Items.Move(ListBox1.ItemIndex,0); //ListView选中的项目移动到第1位 procedure TForm1.Button5Click(Sender: TObject);varsel:String...
分类：
其他好文 时间：
2014-07-29 21:19:32
阅读次数：
229
//获取一个文件夹下的所有文件
//不包括文件夹里面的文件
//ListBox1.Items:=searchfile('Z:\'); //注意,path后面要有'\'; functionSearchfile(path:string):TStringList; var SearchRec:TSearc...
分类：
其他好文 时间：
2014-07-29 20:36:32
阅读次数：
469
添加项目 procedure TForm1.Button1Click(Sender: TObject);beginwith listview1.Items dobeginAdd.Caption:='1111111';Add.Caption:='2111111';Add.Caption:='31111...
分类：
其他好文 时间：
2014-07-29 20:34:52
阅读次数：
197
