Обращение ко всем компонентам DBGrid

@Alexartun · Регистрация: 01.10.2015

Author24 — интернет-сервис помощи студентам

Доброго времени суток !
Столкнулся со следующей проблемой.
На форме "FormKarta" расположено 9 компонентов DBGrid. На этой же форме в разделе "Public" я создал переменную "table" класса TDBGrid.
На основной форме "MainForm" я уже делаю основные действия.
На рисунке показан код. Смысл в том, что я не хочу обращаться по отдельности к каждому DBGrid-у, а хочу сразу ко всем, обращаясь через его класс TDBGrid.
Смысл в том, что код написал, а выдает ошибку. Не понимаю в чем дело. Хотел обращаться на прямую через класс, но он не видит когда пишу "FormKarta.TDBGrid".
Подскажите, пожалуйста. Код и ошибка в изображении

@D1973 · 30.06.2016, 09:10

Вот кто бы еще что-то мог разглядеть на твоей фотографии...
Обратиться к каждому компоненту DBGrid на форме можно, например так...

Delphi

for i := 0 to ControlCount - 1 do
 if Controls[i] is TDBGrid
   then begin
          //Тут делаешь то, что тебе надо, например: 
          (Controls[i] as TDBGrid).ReadOnly := true;
         end;

@qwertehok · 30.06.2016, 09:18

Сообщение от Alexartun

На форме "FormKarta" расположено 9 компонентов DBGrid. На этой же форме в разделе "Public" я создал переменную "table" класса TDBGrid.

проблема это когда ты не понимаешь зачем ты это делаешь

Сообщение от Alexartun

На рисунке показан код

это не код

А ошибка в том что ты используешь переменные, которые не объявлены

@Alexartun · 30.06.2016, 09:19 **[ТС]**

У меня DBGrid находятся на другой форме. Когда обращаюсь FormKarta.TDBGrid, он не видит класс

@qwertehok · 30.06.2016, 09:19

Сообщение от Alexartun

Когда обращаюсь FormKarta.TDBGrid

а кто тебя учил так делать?

@Alexartun · 30.06.2016, 09:24 **[ТС]**

переменная Table у меня объявлена на форме FormKarta, и класс у нее TDBGrid

@qwertehok · 30.06.2016, 09:28

Сообщение от qwertehok

А ошибка в том что ты используешь переменные, которые не объявлены

ты с вот этим проблему решил?

Сообщение от Alexartun

переменная Table у меня объявлена на форме FormKarta, и класс у нее TDBGrid

да пофиг какой у нее класс

если в uses есть тот модуль где объявлена глобальная переменная, то доступ к ней есть, указывай только имя формы

зачем тебе 9 таблиц на форме? это же ужас

@Alexartun · 30.06.2016, 09:33 **[ТС]**

9 таблиц, т.к. база глобальная, и вывожу все на форме.
Я прописываю имя формы, ставлю точку, и после нее только компоненты. Когда ставлю просто класс TDBGrid, он подчеркивает ее красным цветом

@qwertehok · 30.06.2016, 09:35

Сообщение от Alexartun

т.к. база глобальная

какая какая?

Сообщение от Alexartun

он подчеркивает ее красным цветом

даже странно если бы это было не так

@Alexartun · 30.06.2016, 09:48 **[ТС]**

Глобальная )
В том смысле, что база разработана для предприятия.
И содержит очень много таблиц и информации. Разработана в Access.
И поэтому столько таблиц.

@qwertehok · 30.06.2016, 09:56

Сообщение от Alexartun

В том смысле, что база разработана для предприятия.

Сообщение от Alexartun

Разработана в Access.

печально

Сообщение от Alexartun

И поэтому столько таблиц.

а вы думаете для каждой таблицы нужно свой Connection\Table\Query и тд?

@Alexartun · 30.06.2016, 11:03 **[ТС]**

Нет. У меня 1 connection. И для каждой таблицы свой adotable
Иначе как я все выведу ?

@qwertehok · 30.06.2016, 11:19

Сообщение от Alexartun

Иначе как я все выведу ?

у Table есть свойство - TableName. меняешь и выводишь
но обычно все не выводят - зачем пользователю 100 таблиц в каждой по 1000 строк?

Добавлено через 7 минут
и вообще - на дворе 21 век, сейчас ADOTable не используют

@krapotkin · 30.06.2016, 11:24

сразу нет
или лучше так НЕЕЕЕЕЕЕТ....
не надо помогать так, как не надо делать
Access только для примитивных лабораторных работ. никакого предприятия
9 гридов на форме - тоже сразу нет
лучше объясните исходную задачу, вам помогут решить ее, а не задачу "как выстрелить себе в ногу, а то не достаю"

непосредственно по мотивам поста
представьте, что у вас 10000 поездов (товаров, заказов и т.п.) и вам нужно найти один
вы загружаете к себе в датасет 10000 записей и выбираете одну. понятно, что компьютеры сейчас дешевые, а мозги дорогие, но если кроме вас зайдет еще 50 сотрудников, то в сумме вы скачаете 500000 записей
и это ведь не единственная таблица БД, да?

единственная нормальная схема - запросить у сервера только нужные записи

@Alexartun · 30.06.2016, 13:04 **[ТС]**

Ладно)
Тогда другой вопрос
Провожу поиск записей в DBgride по параметрам, которые я забиваю
Он останавливается на первой найденной и заносит в Memo, но суть в том, что по таким параметрам есть еще записи. Как продолжить поиск ?

@D1973 · 30.06.2016, 13:25

1.

Сообщение от Alexartun

Провожу поиск записей в DBgride

Поиск записей ты проводишь не в DBGride, а в каком-то наборе данных, который DBGrid просто отображает...
2.

Сообщение от Alexartun

по таким параметрам есть еще записи. Как продолжить поиск ?

Использовать запрос и отображать в гриде сразу все найденные записи

@krapotkin · 30.06.2016, 13:29

чтение документации не наш конек
как-то так?
http://docwiki.embarcadero.com... t.FindNext

@Alexartun 1 / 1 / 0 Регистрация: 01.10.2015 Сообщений: 127
	30.06.2016, 11:03 [ТС]	12
	Нет. У меня 1 connection. И для каждой таблицы свой adotable Иначе как я все выведу ? 0

@krapotkin 5859 / 4588 / 1447 Регистрация: 14.04.2014 Сообщений: 20,351 Записей в блоге: 20
	30.06.2016, 11:24	14
	сразу нет или лучше так НЕЕЕЕЕЕЕТ.... не надо помогать так, как не надо делать Access только для примитивных лабораторных работ. никакого предприятия 9 гридов на форме - тоже сразу нет лучше объясните исходную задачу, вам помогут решить ее, а не задачу "как выстрелить себе в ногу, а то не достаю" непосредственно по мотивам поста представьте, что у вас 10000 поездов (товаров, заказов и т.п.) и вам нужно найти один вы загружаете к себе в датасет 10000 записей и выбираете одну. понятно, что компьютеры сейчас дешевые, а мозги дорогие, но если кроме вас зайдет еще 50 сотрудников, то в сумме вы скачаете 500000 записей и это ведь не единственная таблица БД, да? единственная нормальная схема - запросить у сервера только нужные записи 0

@krapotkin 5859 / 4588 / 1447 Регистрация: 14.04.2014 Сообщений: 20,351 Записей в блоге: 20
	30.06.2016, 13:29	17
	чтение документации не наш конек как-то так? http://docwiki.embarcadero.com... t.FindNext 0

@Alexartun 1 / 1 / 0 Регистрация: 01.10.2015 Сообщений: 127
		1
	Обращение ко всем компонентам DBGrid 30.06.2016, 08:51. Показов 1533. Ответов 16 Метки нет (Все метки) Доброго времени суток ! Столкнулся со следующей проблемой. На форме "FormKarta" расположено 9 компонентов DBGrid. На этой же форме в разделе "Public" я создал переменную "table" класса TDBGrid. На основной форме "MainForm" я уже делаю основные действия. На рисунке показан код. Смысл в том, что я не хочу обращаться по отдельности к каждому DBGrid-у, а хочу сразу ко всем, обращаясь через его класс TDBGrid. Смысл в том, что код написал, а выдает ошибку. Не понимаю в чем дело. Хотел обращаться на прямую через класс, но он не видит когда пишу "FormKarta.TDBGrid". Подскажите, пожалуйста. Код и ошибка в изображении Миниатюры 0

@qwertehok 5486 / 4401 / 1076 Регистрация: 29.08.2013 Сообщений: 27,577 Записей в блоге: 3
	30.06.2016, 09:18	3
	Сообщение от Alexartun На форме "FormKarta" расположено 9 компонентов DBGrid. На этой же форме в разделе "Public" я создал переменную "table" класса TDBGrid. проблема это когда ты не понимаешь зачем ты это делаешь Сообщение от Alexartun На рисунке показан код это не код А ошибка в том что ты используешь переменные, которые не объявлены 0

@Alexartun 1 / 1 / 0 Регистрация: 01.10.2015 Сообщений: 127
	30.06.2016, 09:19 [ТС]	4
	У меня DBGrid находятся на другой форме. Когда обращаюсь FormKarta.TDBGrid, он не видит класс 0

@qwertehok 5486 / 4401 / 1076 Регистрация: 29.08.2013 Сообщений: 27,577 Записей в блоге: 3
	30.06.2016, 09:19	5
	Сообщение от Alexartun Когда обращаюсь FormKarta.TDBGrid а кто тебя учил так делать? 0

@Alexartun 1 / 1 / 0 Регистрация: 01.10.2015 Сообщений: 127
	30.06.2016, 09:24 [ТС]	6
	переменная Table у меня объявлена на форме FormKarta, и класс у нее TDBGrid 0

@qwertehok 5486 / 4401 / 1076 Регистрация: 29.08.2013 Сообщений: 27,577 Записей в блоге: 3
	30.06.2016, 09:28	7
	Сообщение от qwertehok А ошибка в том что ты используешь переменные, которые не объявлены ты с вот этим проблему решил? Сообщение от Alexartun переменная Table у меня объявлена на форме FormKarta, и класс у нее TDBGrid да пофиг какой у нее класс если в uses есть тот модуль где объявлена глобальная переменная, то доступ к ней есть, указывай только имя формы зачем тебе 9 таблиц на форме? это же ужас 0

@Alexartun 1 / 1 / 0 Регистрация: 01.10.2015 Сообщений: 127
	30.06.2016, 09:33 [ТС]	8
	9 таблиц, т.к. база глобальная, и вывожу все на форме. Я прописываю имя формы, ставлю точку, и после нее только компоненты. Когда ставлю просто класс TDBGrid, он подчеркивает ее красным цветом 0

@qwertehok 5486 / 4401 / 1076 Регистрация: 29.08.2013 Сообщений: 27,577 Записей в блоге: 3
	30.06.2016, 09:35	9
	Сообщение от Alexartun т.к. база глобальная какая какая? Сообщение от Alexartun он подчеркивает ее красным цветом даже странно если бы это было не так 0

@Alexartun 1 / 1 / 0 Регистрация: 01.10.2015 Сообщений: 127
	30.06.2016, 09:48 [ТС]	10
	Глобальная ) В том смысле, что база разработана для предприятия. И содержит очень много таблиц и информации. Разработана в Access. И поэтому столько таблиц. 0

@qwertehok 5486 / 4401 / 1076 Регистрация: 29.08.2013 Сообщений: 27,577 Записей в блоге: 3
	30.06.2016, 09:56	11
	Сообщение от Alexartun В том смысле, что база разработана для предприятия. Сообщение от Alexartun Разработана в Access. печально Сообщение от Alexartun И поэтому столько таблиц. а вы думаете для каждой таблицы нужно свой Connection\Table\Query и тд? 0

@qwertehok 5486 / 4401 / 1076 Регистрация: 29.08.2013 Сообщений: 27,577 Записей в блоге: 3
	30.06.2016, 11:19	13
	Сообщение от Alexartun Иначе как я все выведу ? у Table есть свойство - TableName. меняешь и выводишь но обычно все не выводят - зачем пользователю 100 таблиц в каждой по 1000 строк? Добавлено через 7 минут и вообще - на дворе 21 век, сейчас ADOTable не используют 0

@Alexartun 1 / 1 / 0 Регистрация: 01.10.2015 Сообщений: 127
	30.06.2016, 13:04 [ТС]	15
	Ладно) Тогда другой вопрос Провожу поиск записей в DBgride по параметрам, которые я забиваю Он останавливается на первой найденной и заносит в Memo, но суть в том, что по таким параметрам есть еще записи. Как продолжить поиск ? 0

@D1973 Модератор 9459 / 6212 / 2420 Регистрация: 21.01.2014 Сообщений: 26,489 Записей в блоге: 3
	30.06.2016, 13:25	16
	1. Сообщение от Alexartun Провожу поиск записей в DBgride Поиск записей ты проводишь не в DBGride, а в каком-то наборе данных, который DBGrid просто отображает... 2. Сообщение от Alexartun по таким параметрам есть еще записи. Как продолжить поиск ? Использовать запрос и отображать в гриде сразу все найденные записи 0