Traer un valor de un campo de la Tabla (Access) incluso si esta vacia

[ecfisa]

Empezado por nefore

Vaya, es lo que estaba buscando (en VB 6.0 tenia el Adotable.Columns) y no sabia como hacer algo parecido aca en Delphi. Lo probrare. Muchas gracias por tus respuestas me han ayudado mucho

Hola nefore.

En Delphi tenes más de una forma de acceder a las columnas de una tabla:

• El campo persistente. (doble click sobre ADOTable->click derecho->Add fields/Add all fields)
• La función FieldByName.
• La propiedad vectorial Fields (mediante el índice de posición de la columna en el TDataSet).
• La propiedad vectorial FieldValues.

Un ejemplo en que se muestra el valor de un mismo campo de los modos anteriores:

Código Delphi [-]
  with ListBox1.Items do
  begin
    Add(ADOTable1Field1.AsString);  // campo persistente
    Add(ADOTable1.FieldByName('Field1').Value); 
    Add(ADOTable1.Fields[0].AsString);
    Add(ADOTable1.FieldValues['Field1']); //(*)
  end;

(*) FieldValues es la propiedad vectorial por omisión (default), por lo que se puede escribir:

Código Delphi [-]
   ...
   Add(ADOTable1['Field1']);

Al ser un Variant no es necesario especificar el tipo.

Saludos.