procedure TForm1.ListBox1Click(Sender: TObject);
begin
edit1.Text:=listbox1.Items.Strings[listbox1.itemindex];
end;
begin
edit1.Text:=listbox1.Items.Strings[listbox1.itemindex];
end;
解决方案 »
- 在表單Form還沒顯示出來時取消?
- 如何取得Recordset的KeyField字段
- 如何更改DBNavigator的显示的图标为其他图片???????谢谢帮忙
- ▲疯▼ 两天找一个怪错误:关于 TFrame 和 TActionList.
- 求解:监听ICMP包。500分送上(可连续给分)。
- 提问
- WebServices分布在不同机上运行的问题
- fastReport组件设计界面只要放一个ADODatabase,退出设计界面回到delphi界面f9调试运行就会报错
- 伴水兄,小新师傅,Kingron大哥请进!
- 怎样提高访问数据库的速度!!
- **************急!急!急!一定高分答谢各位*****关于delphi第三方控件
- 一个很水的问题。
begin
edit1.text:=listbox1.Items[listbox1.itemindex]
end;