Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.23;
Скачать: CL | DM;

Вниз

Label1.caption - переменная вместо 1   Найти похожие ветки 

 
Сергей Б.   (2003-10-09 17:37) [0]

У меня очень важный вопрос, и был бы очень благодарен получить ответ.
Собственно в чём дело? Есть функция на пример: Label1.caption.
Как мне написать, что-бы вместо 1 я писал перименную.
Заранее благодарю, Сергей.
P.S.Извините за ошибки!:)


 
panov ©   (2003-10-09 17:39) [1]

function FindComponent(const AName: string): TComponent;


 
clickmaker ©   (2003-10-09 17:39) [2]

И давно это Label1.caption стал функцией ?


 
Fredericco ©   (2003-10-09 17:40) [3]

TLabel(FindComponent("Label"+IntToStr(1))).Caption


 
Юрий Федоров ©   (2003-10-09 17:43) [4]

Во первых это не функция а свойство.
Во вторых,если я проавильно понял(что довольно сложно), то тебе нужно приблизительно это :
var N : Integer;
Label: Tlabel;
begin
N:=1;
Label:=TLabel(FindComponent("label"+IntToStr(N)));
if Assigned(Label) then
Label.caption:="caption - это не функция а свойство";



Страницы: 1 вся ветка

Текущий архив: 2003.10.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.03 c
14-74373
The
2003-10-06 16:38
2003.10.23
IntelliMouse


1-74175
ORMADA
2003-10-10 12:15
2003.10.23
Определение длины стринга


3-74018
StarCon
2003-09-29 13:12
2003.10.23
Список серверов в combo-box


1-74177
Slym
2003-10-10 08:06
2003.10.23
Как и откуда вытащить все имена процедур, функций и констант VBA


1-74202
LDE
2003-10-07 13:49
2003.10.23
Чтение строк из файла