Ver Mensaje Individual
  #4  
Antiguo 16-08-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
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
Cita:
Empezado por giocatore Ver Mensaje
buenas noches, quisiera me orienten con la siguiente duda:

Accedo a las columnas de una tabla Ado de la siguiente forma
Código Delphi [-]
Adotable1['Enero'];
pero quisiera que el nombre de la columna provenga de una variable que yo controle ej:
Código Delphi [-]
var
mes:=combobox1.text; // el combobox con los 12 meses
y quisiera saber si existe una manera de acceder a la columna con los datos de la variable, intenté esto
Código Delphi [-]
adotable1[mes];
pero dá error espero puedan ayudarme
Hola giocatore.

La sintáxis es correcta, no hay inconveniente en usar: ADOTable[variable_string].

El problema es que no creo que el nombre del campo sea 'Enero' pienso que mas bién se debe llamar 'Mes' o algo similar.
Es más, me jugaría entero a que el error es: "ADOTable1:Campo 'Enero' no encontrado."...

Para que salgas de toda duda hacé la prueba con este simple código:
Código Delphi [-]
...
implementation

procedure TForm1.FormCreate(Sender: TObject);
var
  i: Integer;
begin
  ADOTable1.Open;
  for i:= 0 to ADOTable1.FieldCount-1 do
    ComboBox1.Items.Add(ADOTAble1.Fields[i].FieldName);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  if ComboBox1.ItemIndex <> -1 then
    ShowMessage(ADOTable1[ComboBox1.Text]);
end;

Saludos.
__________________
Daniel Didriksen

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