Código Delphi [-] ShowMessage(query1.fields.Fields[0].Name);
ShowMessage(query1.fields.Fields[0].Name);