|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
DBGrid доступ к строкам
есть данные полученные с помощью ADOQuery1
они выводятся в DBGrid1 все никак не могу найти способ как обратится к записям в этой DBGrid1 нету свойств Row или Cell надо всего лишь заполнить ListBox1 значениями первого столбца |
#2
|
||||
|
||||
Этих свойств нету у TDBGrid, но есть у TCustomGrid (они protected и можно их вытащить в классе-наследнике).
Можно попробовать это: Код:
{ Код улучшенного TDBGrid, имеющего свойства Col, Row и Canvas и метод CellRect. Это чрезвычайно полезно в случае, если вы, к примеру, хотите получить выпадающий список на месте редактируемой пользователем ячейки. } unit VUBComps; interface uses SysUtils, WinTypes, WinProcs, Messages, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, Menus; type TDBGridVUB = class(TDBGrid) private { Private declarations } protected { Protected declarations } public property Canvas; function CellRect(ACol, ARow: Longint): TRect; property Col; property Row; procedure Register; implementation procedure Register; begin RegisterComponents('VUBudget', [TDBGridVUB]); end; function TDBGridVUB.CellRect(ACol, ARow: Longint): TRect; begin Result := inherited CellRect(ACol, ARow); end; end. ©Drkb::03050 Взято с http://delphiworld.narod.ru - Товарищ прапорщик!!! Остановите поезд!!! - Поезд СТОЙ! РАЗ! ДВА! Последний раз редактировалось Viajero, 25.07.2011 в 20:50. |
#3
|
||||
|
||||
ну так оставь в DBGrid1 только первый столбец тогда и ListBox1 не нужен)
Пишу программы за еду. __________________ |
#4
|
|||
|
|||
нашел ehlib 5.3 (http://rghost.ru/4706141)
но совершенно не знаю как устанавливать можете подсказать что делать с этими файлами? |
#5
|
||||
|
||||
Файлы dpk нужно запустить, а вообще ещё руководство к нему есть (отдельно в интернете можно найти). Кстати этот пакет какой-то неполный. У меня был 5.2 с руководством и с exe инстоллером. A чем не устроил VUBComps?
- Товарищ прапорщик!!! Остановите поезд!!! - Поезд СТОЙ! РАЗ! ДВА! |
#6
|
|||
|
|||
Цитата:
потом ошибка : E2065 Unsatisfied forward or external declaration 'TDBGridVUB.Register' |
#7
|
|||
|
|||
а не, END надо поставить перед Register , тогда нет ошибок.
Как теперь вытащить компонент на панель инструментов? Последний раз редактировалось yurayura, 26.07.2011 в 13:46. |