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

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

Как перебрать все объекты типа TEdit на форме?? [D7, WinXP]


Страницы:   1 2 3

Lamer666 ©   (2007-11-06 21:52:00) 

Подскажите пожалуйста Как перебрать все объекты типа TEdit на форме??
Спасибо!


Lamer666   (2007-11-07 20:35:00) [1]


> А почему тогда не использовать DBEdit и в те поля, у которых
> ограничение, компонент не даст ввести больше?

Да же если и ИСПОЛЬЗОВАТЬ DBEdit, данные я загоняю черех ХРАНИМЫЕ процедуры, а не через Query!


> Не опасно.
> Впрочем, мне непонятны метания автора. Как он будет отличать
> нужный ему Edit от других? Или у него все такие, с ограничением
> на 12 символов?
> Ведь проще нужным поставить сразу, и всё...


Вот это я и реализовываю в ввиде функции (беру из SQL (syscolumns,....) данные о размераз полей которые нужно ограничить на ввод)

Можно было бы конечно дать и большие размеры, что ж я поделаю, если задача так поставленна!


Anatoly Podgoretsky   (2007-11-07 16:13:00) [2]

> Amoeba  (07.11.2007 16:06:47)  [47]

Учитывая ник возможно и больше.


Amoeba   (2007-11-07 16:06:00) [3]


> Автору охота потрахаться или он не умеет работаь с Инспектором
> объектов

Возможно, что всё вместе.


Sonia   (2007-11-07 15:52:00) [4]


> Автору охота потрахаться или он не умеет работаь с Инспектором
> объектов

Скорее всего второе :)


Anatoly Podgoretsky   (2007-11-07 15:46:00) [5]

> Ega23  (07.11.2007 15:36:43)  [43]

Автору охота потрахаться или он не умеет работаь с Инспектором объектов


Sonia   (2007-11-07 15:41:00) [6]


> Есть таблица в базе данных на MSSQL сервере, некоторые поля
> таблицы имеют ограницения, например 12 символов

А почему тогда не использовать DBEdit и в те поля, у которых ограничение, компонент не даст ввести больше?


Ega23   (2007-11-07 15:36:00) [7]


> но знаю что забить — оч. опасно…


Не опасно.
Впрочем, мне непонятны метания автора. Как он будет отличать нужный ему Edit от других? Или у него все такие, с ограничением на 12 символов?
Ведь проще нужным поставить сразу, и всё...


Kolan   (2007-11-07 15:32:00) [8]

> зачем для varchar такие ограничения

Я тут спорить не буду, так как не компетентен, но знаю что забить — оч. опасно…


Ega23   (2007-11-07 15:25:00) [9]


> Ну ты сказал… Люди будут пол дня вводить ничего не подозревая,
>  а сервер будет все резать…


А нефиг такое ограничение вводить.
Если честно, то я вообще не понимаю, зачем для varchar такие ограничения. Ну ставь varchar(255), какие проблемы?
Это же нуль-терминированная строка, реальной памяти отводится, вроде 4 байта, а остальное в куче сервера.


Kolan   (2007-11-07 15:23:00) [10]

> Забей болт.

Ну ты сказал… Люди будут пол дня вводить ничего не подозревая, а сервер будет все резать…


Ega23   (2007-11-07 15:21:00) [11]


> varchar(12)


Забей болт.


Ega23   (2007-11-07 15:20:00) [12]

Хотя без разницы. Сервер автоматом обрежет


Kolan   (2007-11-07 15:17:00) [13]

> На форме есть TEDIT-ы,


> некоторые поля таблицы имеют ограницения

Сколько же у тебя этих эдитов?


Lamer666   (2007-11-07 15:09:00) [14]

varchar(12)


Ega23   (2007-11-07 15:04:00) [15]


> Есть таблица в базе данных на MSSQL сервере, некоторые поля
> таблицы имеют ограницения, например 12 символов


Тип полей char(12) или varchar(12)?


Lamer666   (2007-11-07 15:02:00) [16]


> На 95 процентов я уверен что тебе ненадо проходится по всем
> контролам…
> Опеши задачу, мож наталкнём тебя на здравую мысль…

В общем задача такая:
1. На форме есть TEDIT-ы, на форме есть TabSheet-ы на них тоже есть TEDIT-ы.
2. Есть таблица в базе данных на MSSQL сервере, некоторые поля таблицы имеют ограницения, например 12 символов
Ну в общем что бы при выполнении хранимой процедуры не проверять длинну введенного в каждом поле значения, я просто хочу ограничить поля на длинну ввода! Вот!


Lamer666   (2007-11-07 14:55:00) [17]


> Ega23 ©   (07.11.07 14:53) [30]

: ))) Спасиб!


Skyle   (2007-11-07 14:55:00) [18]


> Ega23 ©   (07.11.07 14:53) [30]

Я так понял на тему if Controls[I] is TEdit говорили первые 25 постов, поэтому и не указал...


Kolan   (2007-11-07 14:54:00) [19]

> Ясно, теперь буд знать! Спасибо!

На 95 процентов я уверен что тебе ненадо проходится по всем контролам…
Опеши задачу, мож наталкнём тебя на здравую мысль…


Ega23   (2007-11-07 14:53:00) [20]


> (Controls[I] as TEdit).MaxLength


Если более правильно, то
if (Controls[i] is TEdit) then
 TEdit(Controls[i]).MaxLength ....


Страницы:   1 2 3

Наверх

Титульная страница Поиск, карта сайта Написать письмо