查询数据后（paradex数据库），列出结果在listbox,如何使鼠标双击某条结果后，弹出相关Form, (100分)

  • 主题发起人 主题发起人 fk_frank
  • 开始时间 开始时间
F

fk_frank

Unregistered / Unconfirmed
GUEST, unregistred user!
查询数据后（paradex数据库），列出结果在listbox,如何使鼠标双击某条结果后，弹出相关Form,
 
你的问题可大了
只能给你个提示
query.sql.clear;
query.sql.add('select * from xx where ...');
query.open;
query1.first;
whilt not query1.eof do
begin
listbox.items.add(query.fieldbyname('xx').asstrng);
query1.next;
end;

onListBox1doubleClick(Sender: TObject);事件
begin
listbox.items.strings;//对应的字段内容
form.show;
end;
 
<font color=red>KAO,一直发不上来！！！！！！！！！</font>
procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
ShowMessage(ListBox1.Items[ListBox1.ItemIndex]);
end;
如法炮制就行了。
 
必须有一个listbox与form的对应关系表

procedure TForm1.ListBox1DblClick(Sender: TObject);
var
tmpstr:string;
begin
tmpstr:=ListBox1.Items[ListBox1.ItemIndex];
if tmpstr=... then
对应的form.showmodal;
end
 
在listbox1.ondbclick事件中输入
 
在ListBox1DblClick中输入
showmessage(ListBox1.Items[ListBox1.ItemIndex]);
或form2.show;并在form2中放个label只类的控件显示要输出的内容。
 
一、ListBox列出结果方法，同意Tyrael的。
二、弹出相关Form。
Case ListBox1.ItemIndex of
1:Form1.Show;
2:Form2.Show;
....
End;
 
在LISTBOX的双击事件中
填写代码,把相应的参数传递给要显示的FORM,
然后显示该FORM即可.
祝你好运
 
每次查询结果都不一样，如何得知在双击某一项时就打开form1。。。。。。。
所以应该在双击后，通过代码，把相应的参数设置正确，
在打开新form时，在onCreate事件中使用参数，格式化新form.
 
多人接受答案了。
 
您必须登录或注册才可回复。

Similar threads

H
如何在查询结果中继续搜索数据(100分)
回复
11
查看
144
holyszq
H
山
急！如何把查询结果(Access) 存为 DBF ?(300分)
回复
15
查看
100
山泉
山
S
用SQL语句查询数据库后,如何判断结果是否为空?(20分)
回复
7
查看
506
拾荒者
拾
Z
请教大家一个问提?如何把数据查询结果的值附值给一个图片的高度?(50分)
回复
7
查看
115
zjycpic
Z
C
如何把DBGRID里查询出来的结果发送到MEMO里(40分)
回复
4
查看
95
coolcat3000
C
后退
顶部