| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Всем вопросам вопрос. А как получить значения подписи полей в Acc [D7, Access]

antoxa2005 ©   (2005-09-19 04:14:00) 

А как получить значения подписи полей в Access. Т.е. При создании таблицы путем конструктора Access видно три стотбца |Имя поля|Тип поля|Примечание так вот, как считать это самое примечание из программы?

---

DiamondShark   (2005-09-20 13:39:00) [1]

Можно и через ADO.

const
  ConnStr = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Nwind.mdb';
var
  cat: OleVariant;
begin
  cat := CreateOleObject('ADOX.Catalog');
  cat.ActiveConnection := ConnStr;
  ShowMessage(cat.Tables.Item['Categories'].Columns.Item['CategoryID'].Properties.Item['Description'].Value);
end;


---

antoxa2005   (2005-09-20 10:43:00) [2]

А ч-з ADO и без установленного Office, как?

---

DiamondShark   (2005-09-19 12:24:00) [3]

Импортировать библиотеку типов DAO.

var
 eng: DBEngine;
 db: Database;
begin
 eng := CoDBEngine.Create;
 db := eng.OpenDatabase('nwind.mdb', EmptyParam, EmptyParam, EmptyParam);
 ShowMessage(db.TableDefs[0].Fields[0].Properties['Description'].Value);
end;

---

HEXO4YXA   (2005-09-19 11:45:00) [4]

че сказал ?

---

Наверх