Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.01.2008, 02:32   #1
celovec
Форумчанин
 
Регистрация: 15.06.2007
Сообщений: 182
По умолчанию for функция и Label

Есть for цикл проходящий 10 раз, в нем есть строчка:

Код:
Label[i].Caption:=s;
где i это номер Label - но почему-то эта строчка не проходит компиляцию. Подскажите как правельно писать переменную в таком случае?
celovec вне форума Ответить с цитированием
Старый 28.01.2008, 02:36   #2
vitalik007
Дельфист
Форумчанин
 
Аватар для vitalik007
 
Регистрация: 14.08.2007
Сообщений: 317
По умолчанию

по твоему коду я вижу что у тебя label-массив Tlabel;
если ты так хотел
то напиши для каждого елемента label[i]:=Tlabel.create(self);
ICQ-465033557
WINDOWS CE THE BEST
vitalik007 вне форума Ответить с цитированием
Старый 28.01.2008, 02:41   #3
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Цитата:
Подскажите как правельно писать переменную в таком случае?
Правильно будет так:
Код:
var tmp: TComponent;
     i: integer;
begin
for i:=1 to 10 do
begin
tmp:=FindComponent('Label'+IntToStr(i));
if tmp<>nil then
(tmp as TLabel).Caption:=s;
end;
end;
mihali4 вне форума Ответить с цитированием
Старый 28.01.2008, 02:46   #4
vitalik007
Дельфист
Форумчанин
 
Аватар для vitalik007
 
Регистрация: 14.08.2007
Сообщений: 317
По умолчанию

если у тебя label-массив используй мой код
если label1,label2....-компоненты то оиспользуй код mihali4
ICQ-465033557
WINDOWS CE THE BEST
vitalik007 вне форума Ответить с цитированием
Старый 28.01.2008, 08:35   #5
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

А если это всетки массив, то мона перед for отключить оптимизацию : {$o-} а после for-а включить ее {$o+}
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Label artemavd Общие вопросы Delphi 2 11.07.2008 11:15
label dmitrymoskva Общие вопросы Delphi 7 24.10.2007 18:54
одна функция потока, а другая функция - член класса запускающего этот поток Дмитрий_Ч Общие вопросы C/C++ 2 27.09.2007 08:50
Label PROGR Компоненты Delphi 3 18.05.2007 22:25
Вопрос по label. Как сделать так чтобы label была прозрачной. Lonix Компоненты Delphi 2 01.04.2007 06:23