Как присвоить значение сразу нескольким переменным? (обьектам ?)

← →
HMT (2004-02-21 19:52) [0]

Есть несколько полей ввода (Tedit)..их значению text, при нажатии кнопки надо присвоить одно значение.

edit1.text:="text"; edit2.text:="text"; edit3.text:="text";

Это можно сделать иным способом ?

Заранее спасибо

← →
Max003 (2004-02-21 19:56) [1]

for i:=1 to 5 do
edit+i:="text";

← →
Юрий Зотов © (2004-02-21 20:04) [2]

> Max003 (21.02.04 19:56) [1]

Вы не могли бы пояснить, что же означает странная запись вида:
edit+i:="text"

> HMT (21.02.04 19:52)

Можно сделать через список Components, можно через список Controls, можно через FindComponent, но если Edit"ов всего несколько штук, то лучше оставьте, как есть. Будет намного эффективнее.

← →
Gero © (2004-02-21 20:05) [3]

> edit+i:="text";

Умно.

← →
HMT (2004-02-21 20:06) [4]

пробую вот так
var i:integer; begin for i:=1 to 5 do edit+i.text:="text"; end;

В ответ он мне вот так ругнулся:

[Error] Unit1.pas(32): Undeclared identifier: "edit"

← →
HMT (2004-02-21 20:08) [5]

Gero

>Умно.

угу..

← →
Игорь Шевченко © (2004-02-21 20:08) [6]

HMT (21.02.04 20:06)

> пробую вот так

Не надо так пробовать. Не все ответы, к сожалению, бывают правильными.

← →
HMT (2004-02-21 20:09) [7]

Юрий Зотов, поясните пожалуйста как это сделать через Controls ?

← →
Max003 (2004-02-21 20:10) [8]

А в паскале проходило :) попробуй edit[i]...

Если хочешь по уму - сделай массив TEdit, при onShow главной формы делай из Create, выставляй их параметры: Visible, Parent, Width, left... и обращайся как к массиву.
P.S. Недавно на форуму был идентичный пример. Ищите...

← →
HMT (2004-02-21 20:19) [10]

спасибо, щас поищу..

Max003 (21.02.04 20:10)

> А в паскале проходило :)

Не надо обманывать :)

← →
Max003 (2004-02-21 20:32) [12]

Как присвоить значение сразу нескольким переменным? (обьектам ?) Найти похожие ветки