Ver Mensaje Individual
  #3  
Antiguo 07-03-2018
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: Dec 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.099
Reputación: 30
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Ejemplo:
Código PHP:
...
class 
ClassStr {
public:
  
AnsiString Cadena;
};

ClassStr *cStr;


// Cargar unos pares de cadenas
void __fastcall TForm1::FormCreate(TObject *Sender)
{
 for(
int i=0;i<10;i++) {
  
cStr = new ClassStr;
  
cStr->Cadena "AnsiString " IntToStr(i);
  
ComboBox1->Items->AddObject("Item "+IntToStr(i), ((TObject*)cStr));
 }
}

// Mostrar ambas cadenas
void __fastcall TForm1::ComboBox1Click(TObject *Sender)
{
  
int inx ComboBox1->ItemIndex;

  if ( 
inx != -) {
    
AnsiString cadena1 ComboBox1->Text;
    
AnsiString cadena2 = ((ClassStr*)(ComboBox1->Items->Objects[inx]))->Cadena;
    
ShowMessage(cadena1 '\n' cadena2);
  }

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita