Главная страница
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.009 c
14-60845
vads
2002-07-25 08:25
2002.08.19
Срочно понадобилась процедура получения суммы прописью


1-60680
Сергей Б.
2002-08-01 16:04
2002.08.19
Сохранение данных в оригинальном формате.


14-60829
Lamer86
2002-07-24 21:35
2002.08.19
Игра по модему. База данных игроков


7-60877
Sergey Geraschenko
2002-06-05 20:14
2002.08.19
программа работающая только под win98/me


1-60566
snoup
2002-08-06 20:01
2002.08.19
Кто-нибудь знаете как можно с эмулировать командную строку как эт