轻
轻音乐
Unregistered / Unconfirmed
GUEST, unregistred user!
例：
procedure TForm1.DBLookupListBox1DblClick(Sender: TObject);
begin
edit1.Text:= DBLookupListBox1.SelectedItem;
end;
procedure TForm1.Edit2Change(Sender: TObject);
begin
DBLookupListBox1.ListFieldIndex:= strtoint(edit2.text);
end;
不管怎么改ListFieldIndex都无效，即使超界也不报错。
procedure TForm1.DBLookupListBox1DblClick(Sender: TObject);
begin
edit1.Text:= DBLookupListBox1.SelectedItem;
end;
procedure TForm1.Edit2Change(Sender: TObject);
begin
DBLookupListBox1.ListFieldIndex:= strtoint(edit2.text);
end;
不管怎么改ListFieldIndex都无效，即使超界也不报错。