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

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

два грида на TNotebook, как сделать with или присвоение [D6, IB6.x, MSSQL, MySQL, Paradox]

КомофОнСамый ©   (2004-02-10 13:55:00) 

дело в том что есть кнопочка Подсчет, и так как реализация подсчета одинакова нужно сделать следующее

procedure TForm1.mnCountClick(Sender:TObject);
var
myGridPtr:TDBGrid;
begin
if(Notebook.ActivePage="Doc")then myGridPtr:=DBGridDoc
else myGridPtr:=DBGridTurn;
with(myGridPtr)do
begin
...//далее реализация поиска.


но почему то так не получается :(

---

КомофОнСамый   (2004-02-10 14:11:00) [1]

ой. сорри - оказся ошибка была в другом.

---

Deniz   (2004-02-10 14:04:00) [2]

Что не получается?

---

Наверх