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

Изменение имени TextEdit в цикле   Найти похожие ветки 

← →
Андрей Воркин   (2010-07-01 13:17) [0]

Мастера, помогите. Как написать цикл для трех Эдитов с возможностью их перебора по имени. Edit1, Edit2 и Edit3.

---

← →
RWolf ©   (2010-07-01 13:22) [1]

var i:Integer;c:TComponent;
begin
for i:=1 to 3 do begin
 c:=FindComponent("Edit"+inttostr(i));
 if c<>nil then
   with c as TEdit do
     Text:=Text+"x";
end;
end;


---

← →
Андрей Воркин   (2010-07-01 13:32) [2]

а в VisualBasic так можно сделать? Спасибо.

---

← →
Anatoly Podgoretsky ©   (2010-07-01 13:43) [3]

> Андрей Воркин  (01.07.2010 13:32:02)  [2]

А в VisualBasic нет Дельфийских компонент.

---

← →
Андрей Воркин   (2010-07-01 13:44) [4]

я знаю. это для общего развития ))

---

← →
MsGuns ©   (2010-07-01 19:46) [5]

Идея, убитая на всю голову по своей сути :)

---

← →
Leonid Troyanovsky ©   (2010-07-01 23:02) [6]

> MsGuns ©   (01.07.10 19:46) [5]

> Идея, убитая на всю голову по своей сути :)

Забитый молотком шуруп держится лучше гвоздя,
завернутого ответкой.

--
Regards, LVT.

---

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

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



Память: 0.46 MB
Время: 0.005 c