DBLookupListBox的问题：自动选择

Question

DBLookupListBox在onformCreat自动选择第一条item，怎么实现？

Answer 1

AdoQuery1.sql.text := 'select ......'再打开

Answer 2

：）
都是希奇古怪的问题，Borland的工程师看到这样的问题会怎么想？

Answer 3

很古怪吗？我查找了一个月之前的帖子有人问过这个问题，但是没有回答。我是想建立form的时候和执行update等sql之后DBLookupListBox可以自动选择某一条，因为有与之相连的edit1.text需要读出那个被选择的记录值

Answer 4

自己在AfterInsert里面写进去把第一个字段插入进去。
有lookUp的字段全部这样就可以了，就是有点罗嗦！

Answer 5

在哪里呢呢？例如我在buttononclick后写:
ADOQuery1.AfterInsert:=然后写什么呢？

Answer 6

给我悟大误撞成功了，哈哈
procedure TEMform1.FormShow(Sender: TObject);
begin
DBLookupListBox1.SetFocus;
DBLookupListBox1.OnClick(self);
end;但还有一点点不足，我想要被选择的记录变成蓝色的，SetFocus只能做到虚线框选中，还有谁有更换的方法？