Set DGrid1.DataSource = rs
' rs — это наш рекордсет
все было намана, а сейчас в Датасорсе грида пусто и ничегоне помогает
Создаю рядом грид пишу:

Set DGrid2.DataSource = rs

и все работает.... Паубивау бы...

Мот кто сталкивался ?