请问可以用delphi给定的控建，编出那些帮助的风格吗?

[324swf]

我也想问一个类似的问题，就是在listbox里面怎样通过编程使某一行处于被选中的状态啊?（而不是要用鼠标去点击），其实我是想用listbox做一点平常那些帮助的效果，thx

其实就是想在一个地方输入查询的关键词，然后在listbox里面自动选中近似的line

[shadowfish]

procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i := 0 to listbox1.Count - 1 do
begin
if listbox1.Items.Strings[i] = trim(edit1.text) then
begin
listbox1.Selected[i+1];
listbox1.SetFocus;
end;
end;
end;

[324swf]

listbox1.Selected[i+1]; 不是只是返回一个boolean值吗？就是说如果第i行处于被选中的状态，返回true，否则false？？？