![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как перебрать все объекты типа TEdit на форме?? [D7, WinXP]
Lamer666 © (2007-11-06 21:52:00)Подскажите пожалуйста Как перебрать все объекты типа TEdit на форме??
Спасибо!
Lamer666 (2007-11-07 14:51:00) [21]
> Reindeer Moss Eater © (07.11.07 14:49) [27]
> Skyle © (07.11.07 14:50) [28]
Ясно, теперь буд знать! Спасибо!
Skyle (2007-11-07 14:50:00) [22]
> Lamer666 (07.11.07 14:44) [26]
>
> > Привести найденный контрол к типу TEdit
>
> : ))
> Протите, а как?
> Controls[i].ClassType:=TEdit;
> ругаеться! : (
(Controls[I] as TEdit).MaxLength
Reindeer Moss Eater (2007-11-07 14:49:00) [23]Ругается потому что это не приведение, а присвоение.
Я тебе про приведение говорил.
Lamer666 (2007-11-07 14:44:00) [24]
> Привести найденный контрол к типу TEdit
: ))
Протите, а как?
Controls[i].ClassType:=TEdit;
ругаеться! : (
Reindeer Moss Eater (2007-11-07 14:04:00) [25]а как присвоить значение в свойство MaxLength?
Привести найденный контрол к типу TEdit
Anatoly Podgoretsky (2007-11-07 14:04:00) [26]> Ega23 (07.11.2007 13:53:21) [21]
Но тоже относится и к Components
Lamer666 (2007-11-07 13:59:00) [27]
> Тогда рекурсивная переборка всех контролов, ибо Edit может
> и на панели лежать, а панель уже на форме.
Есть и такое! : ((
Lamer666 (2007-11-07 13:57:00) [28]
> при поиске эдита лучше перебирать не компоненты а контролы
а как присвоить значение в свойство MaxLength? Его нет в списке свойств "контролов"
Ega23 (2007-11-07 13:53:00) [29]
> при поиске эдита лучше перебирать не компоненты а контролы
Тогда рекурсивная переборка всех контролов, ибо Edit может и на панели лежать, а панель уже на форме.
Reindeer Moss Eater (2007-11-07 13:51:00) [30]при поиске эдита лучше перебирать не компоненты а контролы
Lamer666 (2007-11-07 13:46:00) [31]Большое спасибо:Dib@zol,palva,DrPass,Kolan,Riply,Tmp,guav,Германн.
С уваженеим Lamer666ДА и еще хотел спросить, а если нужно обратиться к какому-нибудь свойству поля TEDIT, например MaxLength, в этом переборе?
Riply (2007-11-07 07:06:00) [32]>[17] Германн © (07.11.07 01:34)
> Но ответы всё же в ней должны быть более простыми или хотя бы должны сопровождаться объяснениями :-)
Ну вот. Все на меня бедную напали. И ты, Брут. Тьфу - Сергей. :)
За то, что я не учла, что у автора Delphi 7, я уже принесла извинения.
А какие пояснения нужны к этой процедуре, я до сих пор не вижу.
Или надо было нашпиговать три строчки кода фразами типа:
"перебираем компоненты", "проверяем не Edit-ли(не Frame- ли)", "выводим сообщение" ?
:)
Германн (2007-11-07 01:34:00) [33]
> Riply © (06.11.07 23:53) [5]
Когда ты задаёшь свои весьма "продвинутые" вопросы в этой конференции это я понимаю. Но ответы всё же в ней должны быть более простыми или хотя бы должны сопровождаться объяснениями :-)
Tmp (2007-11-07 01:16:00) [34]
> Riply © (07.11.07 00:32) [9]
> Как вызываешь ?
Если это вопрос мне(что скорее всего) то:
Я никак ее не вызывал, просто посмотрел на "написание" кода и сделал вывод о не работоспособности этого кода в D7
;)
Riply (2007-11-07 00:56:00) [35]> [14] guav © (07.11.07 00:51)
<off>
> Riply ©
>ICQ включить можешь ?
Сейчас нет. :(
У меня многое "похоронено" под Убунтей :)
Я вхожу с др. компьютера.
</off>
guav (2007-11-07 00:51:00) [36]<off>
> Riply ©
ICQ включить можешь ?
</off>
Riply (2007-11-07 00:45:00) [37]> [12] DrPass © (07.11.07 00:43)
> У парня ж Delphi 7. Не издевайся над человеком
Sorry... Не знала...
Надо заменить
for EnumComp in aComp do
на
for i:=0 to ComponentCount-1 do
DrPass (2007-11-07 00:43:00) [38]
> Riply © (06.11.07 23:53) [5]
У парня ж Delphi 7. Не издевайся над человеком
Riply (2007-11-07 00:42:00) [39]> [10] guav © (07.11.07 00:35)
Привет !
> скорее нету фор ич в компиляторе :)
Ну так заменить тогда на for i := 0 to
P.S.
> [10] guav
По Вашему заданию сижу и собираю нестандартные случаи :)
guav (2007-11-07 00:35:00) [40]> [9] Riply © (07.11.07 00:32)
> Может у тебя на форме Edit`ов нет ? :)
скорее нету фор ич в компиляторе :)