|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Вопрос по заданию параметров с формы.
Всем привет! Вопрос собственно вот в чем:
Для получения данных с АЦП используется шаблон кода на Делфи.. Параметры платы указываются как константы Код:
const BOARD_NAME = 'LA2USB'; BASE_ADDRESS = 1; DRQ_NUMBER = 0; GET_SIZE =15000 ; MAIN_SIZE = 1; {кол-во блоков по 1024} ch = 24; Const arr1 :array[0..1] of char =(#13, #10); NUMBER_OF_MEASURES = 1; Massive_Size = GET_SIZE; pic = 625 ; Так вот, как сделать так , чтобы потом прямо из формы можно было задавать эти параметры? Спасибо. Последний раз редактировалось Admin, 18.05.2009 в 10:53. |
#2
|
||||
|
||||
Так и сделайте. Накидайте на форму кучку TEdit и используйте свойство EditN.Text вместо ваших констант, только незабудьте, где это необходимо преобразовывать текст в число StrToInt(EditN.Text)
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#3
|
|||
|
|||
Так в том то и дело , что преобразование идет StrToInt, а параметры платы указаны как const, и он начинает ругаться на несоответствие типов..
|
#4
|
||||
|
||||
Конкретно покажите место вашего кода, где он ругается.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#5
|
||||
|
||||
Цитата:
|
#6
|
|||
|
|||
TOJluK: попробую сделать как вы сказали,но дело в том , что основной шаблон связан еще с отдельными модулями , где описывается подключение проги к драйверу АЦП , получение его интерфейса и тд. Наверняка , эти параметры АЦП также должны быть прописаны в этих отдельных модулях, тогда придется и эти модули переворачивать и все изменять. Во вторник будет возможность все проверить и тогда и отпишусь получилось или нет..
|
#7
|
||||
|
||||
Вариантов много, конечно. Не видя код, остается только гадать. Объяви их в разделе Public или сделай свой Type.
|