Показать сообщение отдельно
  #5  
Старый 19.04.2010, 20:29
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Про обращение никто не говорил в начале темы
В этом случае уже нельзя так создавать элементы. Придется сначала определить массив для классовых переменных а уже потом создавать:
Код:
var
  I : Integer;
  s:string;
  Labels: Array[1..100] of TLabel;
begin
  For I := 1 To 100 
  Do begin
      Labels[i] := TLabel.Create(Self) 
      With Labels[i] 
      Do Begin
          Parent := Self;
          Top := I * 10;
          Left := 100
          Caption := 'label' + IntToStr(I);
         End; 
      end;
 ***  
 s:=labels[i].caption;//как это правильно прописать
end;
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием