Версия для печати темы Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > как обьявить TEdit(Findcomponents) в процедуре ?

Автор: Mepcuk 18.10.2006, 13:15

не знаю как правельно написать в процедуре присвоение значений полей EDITxxx массиву ! Если этот код перекинуть на событие procedure Button1Click то всё работает !    Код Procedure input_random_data(); var n:integer;   edi_name:string;   begin for n:=1 to neiro_q do     begin       edi_name:='Edit'+IntToStr(n);       neiron_data[1,n]:= TEdit(FindComponent(edi_name)).text       //  ShowMessage(input_data[z]);      //test ar SMS     end; Добавлено @ 13:16  массив глобальная пременная

Автор: Snowy 18.10.2006, 13:20

Form1.FindComponent

Автор: Mepcuk 18.10.2006, 13:33

Огромное спасибо !!

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)