Ver Mensaje Individual
  #3  
Antiguo 09-10-2012
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.293
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Otra opción es utilizar el puntero del segundo parámetro para almacenar un entero. De esa forma aprovechas ese valor. Piensa que al final el puntero no es más que un número.

Puede añadir los valores al combobox de esta forma:

Código Delphi [-]
  // en tu caso en segundo valor serían los valores del ID
  ComboBox1.AddItem('Lunes', Pointer(1234));
  ComboBox1.AddItem('Martes', Pointer(34));
  ComboBox1.AddItem('Miercoles', Pointer(9999));

Para recuperar los valores del ID, del elemento seleccionado puedes hacer lo siguiente:

Código Delphi [-]
  // Hay algo seleccionado
  if (ComboBox1.ItemIndex <> -1) then begin
    // puntero al objeto del elemento seleccionado
    p := Pointer(ComboBox1.Items.Objects[ComboBox1.ItemIndex]);
    // Obtenemos el entero almacenado
    i := Integer(p);
    // lo pintamos en un label
    Label1.Caption := IntToStr(i);
  end;

Un saludo.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita