Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.034 c