Ver Mensaje Individual
  #2  
Antiguo 12-01-2010
Avatar de ElKurgan
[ElKurgan] ElKurgan is offline
Miembro Premium
 
Registrado: nov 2005
Posts: 1.242
Reputación: 22
ElKurgan Va camino a la fama
Cita:
Empezado por Ledian_Fdez Ver Mensaje

La chapa se guarda sin problema.
En la Fecha se me guarda todo los SubItems. (solo quiero guardar el contenido de la fecha)
Y en el Tipo ni siquiera se como podría guardarlo.

Aquí esta el código.
Código Delphi [-]procedure TRegistroForm.ListVehicSelectItem(Sender: TObject;
Item: TListItem; Selected: Boolean);
begin
if Selected then
begin
//Guardo la chapa
TextCH := Item.Caption;
// Quiero guardar el contenido seleccionado de la columna Fecha
TextFecha := Item.SubItems.Text;
// Quiero guardar el contenido seleccionado de la columna Tipo
//TextTipo := ?
end;
end;


Deberías hacer esto:

Código Delphi [-]
procedure TRegistroForm.ListVehicSelectItem(Sender: TObject;
  Item: TListItem; Selected: Boolean);
begin
 if Selected then
 begin
 //Guardo la chapa
 TextCH := Item.Caption;
 // Guarda el contenido seleccionado de la columna Fecha
 TextFecha := Item.SubItems[1];
 // Guarda el contenido seleccionado de la columna Tipo
 //TextTipo := Item.SubItems[2];
end;
end;

Un saludo
Responder Con Cita