Ver Mensaje Individual
  #2  
Antiguo 24-03-2011
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
Hola gersonmaba.

No conozco el componente, pero creo que este código para TDBGrid debería funcionarte igualmente.

Código Delphi [-]
function TForm1.GetColumnFieldNames(DBGr: TDBGrid): TStrings;
var
  i: Integer;
begin
  Result:= TStringList.Create;
  for i:= 0 to DBGr.Columns.Count - 1 do
    Result.Add(DBGr.Columns[i].FieldName);
end;

Ejemplo de llamada:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  ListBox1.Items:= GetColumnFieldNames(DBGrid1);
end;
Te devuelve los nombres de los campos en el orden impuesto en el Grid.

Claro está, que debes cambiar las referecias a TDBGrid por TcxGrid.

Un saludo.
__________________
Daniel Didriksen

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

Última edición por ecfisa fecha: 24-03-2011 a las 02:08:44.
Responder Con Cita