Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   ImageComboBox (https://www.clubdelphi.com/foros/showthread.php?t=14455)

nicolasdom 21-09-2004 15:14:54

"Urgente!" ImageComboBox
 
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....


Código:


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


La franja horaria es GMT +2. Ahora son las 08:58:15.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi