Logo Море(!) аналитической информации!
IT-консалтинг Software Engineering Программирование СУБД Безопасность Internet Сети Операционные системы Hardware
Архив форумов ЦИТФорума
Море(!) вопросов - Море(!) ответов
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 
Как правильно задавать вопросы

Вопрос по Дельфям

 
Перейти:  
Этот форум закрыт, вы не можете писать новые сообщения и редактировать старые.   Эта тема закрыта, вы не можете писать ответы и редактировать сообщения.    Список форумов Архив форумов ЦИТФорума -> Программирование
Предыдущая тема :: Следующая тема  
Автор Сообщение
kocherman



Зарегистрирован: 06.01.2006
Сообщения: 88
Откуда: Обнинск

СообщениеДобавлено: Сб Янв 21 2006 03:43    Заголовок сообщения: Вопрос по Дельфям Ответить с цитатой

Значит есть трудность... возьмем тупой пример...

Эта строка написана не правильно:
Form1.FindComponent('Label1').Caption:='sometext';

Что и как я использую не правильно?..
как мне реализовать подобную операцию? кроме:
Lable1.Caption:='text';

допустим у меня есть 15000 лабелов... и к каждому нада обращаться Sad(
поэтому стоит задуматься о том, как обращаться к компонентам через строку
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
Wladimir



Зарегистрирован: 02.03.2005
Сообщения: 150
Откуда: Ставропольский край

СообщениеДобавлено: Сб Янв 21 2006 11:16    Заголовок сообщения: Ответить с цитатой

(Form1.FindComponent('Label1') as TLabel).Caption:='sometext';

Цитата:
допустим у меня есть 15000 лабелов

Ты крут, мужик!..

Вообще, 15000 лабелов можно генерировать в цикле и запоминать указатели на них допустим в TList.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
kocherman



Зарегистрирован: 06.01.2006
Сообщения: 88
Откуда: Обнинск

СообщениеДобавлено: Сб Янв 21 2006 11:54    Заголовок сообщения: Ответить с цитатой

ну это я образно выражался... тем самым хотел подчеркнуть, что мне просто неизбежно использование этой вещи...
большое спасибо
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
sniper::p



Зарегистрирован: 04.10.2005
Сообщения: 237
Откуда: rus/73

СообщениеДобавлено: Пн Янв 23 2006 01:35    Заголовок сообщения: Ответить с цитатой

Wladimir писал(а):
(Form1.FindComponent('Label1') as TLabel).Caption:='sometext';

А как подобная конструкция выглядит в Билдере?
_________________
Нет предела совершенствованию
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
Wladimir



Зарегистрирован: 02.03.2005
Сообщения: 150
Откуда: Ставропольский край

СообщениеДобавлено: Пн Янв 23 2006 22:02    Заголовок сообщения: Ответить с цитатой

(dynamic_cast <TLabel *> (Form1->FindComponent("Label1")))->Caption = "sometext";
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
sniper::p



Зарегистрирован: 04.10.2005
Сообщения: 237
Откуда: rus/73

СообщениеДобавлено: Пн Янв 23 2006 23:29    Заголовок сообщения: Ответить с цитатой

Wladimir писал(а):
(dynamic_cast <TLabel *> (Form1->FindComponent("Label1")))->Caption = "sometext";

Динамическое приведение отнимает много ресурсов? По сути, FindComponent возвращает указатель на TComponent, который наследуется всеми и вся, если без этого сделать...
_________________
Нет предела совершенствованию
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
Wladimir



Зарегистрирован: 02.03.2005
Сообщения: 150
Откуда: Ставропольский край

СообщениеДобавлено: Вт Янв 24 2006 22:25    Заголовок сообщения: Ответить с цитатой

Цитата:
Динамическое приведение отнимает много ресурсов?

Да нет, с чего бы.

Цитата:
если без этого сделать

Да вроде незачем.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Показать сообщения:   
Этот форум закрыт, вы не можете писать новые сообщения и редактировать старые.   Эта тема закрыта, вы не можете писать ответы и редактировать сообщения.    Список форумов Архив форумов ЦИТФорума -> Программирование Часовой пояс: GMT + 3
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Powered by phpBB © 2001, 2002 phpBB Group
Русская поддержка phpBB

 

IT-консалтинг Software Engineering Программирование СУБД Безопасность Internet Сети Операционные системы Hardware

Информация для рекламодателей PR-акции, размещение рекламы — adv@citforum.ru,
тел. +7 495 6608306, ICQ 232284597
Пресс-релизы — pr@citforum.ru
Послать комментарий
Информация для авторов
This Web server launched on February 24, 1997
Copyright © 1997-2000 CIT, © 2001-2006 CIT Forum
Внимание! Любой из материалов, опубликованных на этом сервере, не может быть воспроизведен в какой бы то ни было форме и какими бы то ни было средствами без письменного разрешения владельцев авторских прав. Подробнее...