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

Вниз

Нужно выдрать значение Text из всех TLabeledEdit ов на форме   Найти похожие ветки 

 
AlexNO   (2002-08-06 12:09) [0]

Нужно выдрать значение Text из всех TLabeledEdit"ов на форме в цикле.
Их больше 100 и тупо их сливать не хочется ;)
Как это сделать? Вот кусок кода:


procedure TForm1.Save_Dat();
var ss : TStringList;
i : integer;
begin
ss:=TStringList.Create;
for i:=0 to Form1.ComponentCount-1 do
if UpperCase(Form1.Components[i].ClassName) = "TLABELEDEDIT" then
ss.Add(Нужно выдрать значение в этом контроле);
showmessage(ss.Text);
end;


 
ЮЮ ©   (2002-08-06 12:14) [1]

ss.Add(TLABELEDEDIT(Form1.Components[i]).Text)


 
Skier ©   (2002-08-06 12:15) [2]

>AlexNO
А цель твоя какая ?


 
AlexNO   (2002-08-06 12:24) [3]

ЮЮ: Сенкс ;)



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
6-60791
Valeriy
2002-05-31 22:44
2002.08.19
Проверка почты


4-60910
MARcoDEN
2002-06-10 20:28
2002.08.19
Как узнать хэндл другой программы?


4-60887
[BAD]Angel
2002-06-12 16:49
2002.08.19
Люди, помогите ПЛЗ!!!!


7-60863
Timon
2002-06-03 14:28
2002.08.19
Свободная память


7-60879
urich
2002-06-06 11:41
2002.08.19
Как добавить принтер в систему?