Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

считать все значения edit с формы [D7, XP]

belmol © (2009-07-23 13:20:00)
Доброго времени суток, что то не могу сообразить как сделать подобное в цикле (на форме около 100 edit-ов).
примерно вот так.
for i:=0 to form1.ComponentCount-1 do
if (pos('Edit',form1.Components[i].name)>0) then
memo.Lines.Add( тут как указать текст находящийся в поле edit-a);
может это что называется через одно место, но как по другому не могу сообразить.

oldman (2009-07-23 17:50:00) [1]

> считать все значения edit с формы [D7, XP]
>
> belmol (23.07.09 13:20)
> Доброго времени суток, что то не могу сообразить как сделать
> подобное в цикле (на форме около 100 edit-ов).

Завести массив со значениями едитов.
При изменении едита менять значение массива.
При необходимости обрабатывать массов.

Bruth (2009-07-23 14:48:00) [2]
Удалено модератором

Palladin (2009-07-23 14:39:00) [3]
угу... ValueListEditor например...

TIF (2009-07-23 14:11:00) [4]
> есть едиты (так получилось)))

Да уже видно, что получилось...
Если бы было чётко описано, нафик их столько надо, наверняка нашёлся бы один стандартный чудо-компонент, заменивший эту сотню :)

belmol (2009-07-23 13:43:00) [5]
спасибо.

Юрий Зотов (2009-07-23 13:37:00) [6]
> как указать текст находящийся в поле edit

for i := 0 to ComponentCount - 1 do
if Components[i] is TEdit then
Memo.Lines.Add(TEdit(Components[i]).Text);

belmol (2009-07-23 13:29:00) [7]
так получается PageControl с несколькими листами, на каждом есть едиты (так получилось))) и они уникальны..

clickmaker (2009-07-23 13:28:00) [8]
может, это тест? из 100 вопросов. Тогда это еще не много

TIF (2009-07-23 13:26:00) [9]
Нескромный вопрос - зачем столько Edit-ов?

clickmaker (2009-07-23 13:21:00) [10]
> на форме около 100 edit-ов

жестко.

for i:=0 to form1.ControlCount-1 do
if (Control[i] is TEdit) then

Наверх

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