PDA

Ver la Versión Completa : ImageComboBox


nicolasdom
21-09-2004, 15:14:54
Tengo un Hermosos ImageComboBox para el login de los usuarios que lo lleno con datos de un query hecho a la BD. Ustedes diran para que el ImageComboBox... Lo que queria hacer es que aparesca al lado de cada nombre de usuario una carita de usuario (en este caso para todos igual)... es decir: (les dibujo el combo)

:) ndomin |V|
:) imarco
:) .....

Hasta ahi de maravillas... El autocompletar me anda fantastico... el tema es que cuando elijo algo del combobox no me lo toma, es decir que siempre me queda el primero. si escribo imarco (me lo va autocompletando) y cuando le doy enter o click no me lo toma y queda ndomin.

les paso el codigo....




procedure TFormLogin.FormShow(Sender: TObject);
var
Items: TcxImageComboBoxItems;
Item: TcxImageComboBoxItem;
begin
FormBD.IBDatabase.Connected:=True;
FormBD.IBTransaction1.Active:=True;
IBQuery1.SQL.Clear;
IBQuery1.SQL.Add('SELECT nombre_usuario FROM PERMISOS;');
IBQuery1.Open;
Items:= Usuario.Properties.Items;
Items.BeginUpdate;
try
Items.Clear;
while not IBQuery1.Eof do begin
Item:= Items.Add as TcxImageComboBoxItem; // Add a new item
Item.Description:= IBQuery1.Fields[0].AsString; // Set the item's description
Item.ImageIndex:= 0; // Set the item's image index
IBQuery1.Next;
end;
IBQuery1.Close;
finally
Items.EndUpdate;
end;
Usuario.ItemIndex:=0;
end;



Si alguien esta dispuesto a gastar polvora en chimangos... que me ayude jeje...

MIL GRACIAS!!!:D