搜索edit内容,发现一个','就立即截取前段,并add到listbox的item中,
很简单的算法
很简单的算法
解决方案 »
- 字符串替换的问题请教
- 怎么同一个窗口Adoquery添加纪录后,用Adotable取数据,在窗口没关闭之前Table的数据没有更新:??????????
- 从Mouse.CursorPos转为某控件中的坐标 有什么好的方法?
- 高分求Object Pascal的文法列表!!!
- 子MDI的DataField怎么老是连不上怎么回事啊?
- TBatchMove控件的batAppend模式总是出错,而batcopy则正常
- 怎样求两个时间差!急,在线等待!
- delphi 循环问题
- 急!!!请求各位的帮助,感激不尽!!多谢!!关于计算器!!
- 如何检查快捷方式是否正确
- 初学delphi,怎样使没有安装delphi的机子也能运行程序
- 寻寻觅觅,生成GIF动画的控件在何方?(可另给分)
i:integer;
begin
for i:=1 to 8 do
begin
Listbox.items.add(Tedit(findcomponent('Edit'+inttost(i))).Text);
end;
end;