2012 年 10月 8 日随笔档案 - del88

2012年10月8日

摘要： listbox删除删除选中的某个： procedure TForm1.Button1Click(Sender: TObject); var i:integer; begin i:=0; while i<listbox1.Count do//删除掉前一个后，下一个会上移，所以用while if li 阅读全文

posted @ 2012-10-08 20:39 del88 阅读(14) 评论(0) 推荐(0) 编辑

获取ListBox选中的值与删除当前选中的

摘要：方法一： if listbox1.itemindex <> -1 then showmessage(listbox1.items.strings[listbox1.itemindex]); 不知道是不是能解决你的问题方法二： ListBox1.Items[ListBox1.ItemIndex] 不阅读全文

posted @ 2012-10-08 20:37 del88 阅读(9) 评论(0) 推荐(0) 编辑

delphi 用combox 来模仿百度的下拉框输入提示

摘要：若是你需要实现此功能我并不建议你使用TListBox。而是使用TComboBox，因为ComboBox 直接实现了此类功能，你在主窗口中放置一个 ComboBox。将它Style设置成 csSimple。这时就可以调整ComboBox的高度了。你可以像TListBox 一样设置Items，并通过阅读全文

posted @ 2012-10-08 20:21 del88 阅读(9) 评论(0) 推荐(0) 编辑