|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#31
|
|||
|
|||
Бли-и-и-и-ин...
Ну для простоты примера написал цикл... Что мешает передавать по элементу??? Код:
Sources[1] := Dmin; Sources[2] := lnas; ... PS. Да, ягляжу, что у тебя числа не целые. Соответсвенно, надо поменять типа на Double... PPS. Кстати, через RTTI можно попробовать и через цикл передать... что-то типа Код:
For I := Low(Sources) To High(Sources) Do Sources[i] := StrToFloat((FindComponent('Edit'+IntToStr(I)) As TEdit).Text); |