Código Delphi [-] strOrigen:=ADOQuery1.Fields[0].Origin; //O podria ser strOrigen:=ADOQuery1.FieldByname('ID'].Origin;
strOrigen:=ADOQuery1.Fields[0].Origin; //O podria ser strOrigen:=ADOQuery1.FieldByname('ID'].Origin;