|
Вопрос # 2 817/ вопрос открыт / |
|
Здравствуйте, эксперты!
Мне необходимо создать программу для обмена валют.
Нужно 4 компонента edit, при вписывании значения в любой из них должны соответственно менять значения и в остальных. Не подскажите, как это сделать? Прилагаю картинку похожей программы, работающей по такому же принципу.
К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)
 |
Вопрос задал: Fenix_ (статус: Посетитель)
Вопрос отправлен: 20 мая 2009, 11:37
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: Вадим К
Здравствуйте, Fenix_!
Надо обрабатывать метод OnChange у edit. Но здесь есть несколько подводных камней.
- поле ввода может быть пустое. try except спасет, либо StrToFloatTry.
- если для всех едитов прописать подбный обработчик, то они будут в цикле вызывать друг дружку и программа зависнет. Поэтому в самое начало обработчика следует вставить код вида
if sender <> ActiveControl then exit;
Ну а собственно пересчёт валют я думаю не такая большая проблема - умножить и/или разделить на число.
 |
Ответ отправил: Вадим К (статус: Академик)
Время отправки: 20 мая 2009, 12:31
Оценка за ответ: 5
|
Мини-форум вопроса
Всего сообщений: 2; последнее сообщение — 20 мая 2009, 21:29; участников в обсуждении: 2.
|
|
Fenix_ (статус: Посетитель), 20 мая 2009, 21:05 [#1]:
извините пожалуйста, но у меня нет навыков в Delphi. Не могли бы вы помочь кодом программы?
|
|
|
Вадим К (статус: Академик), 20 мая 2009, 21:29 [#2]:
Написать код вида
Edit2.text := Floattostr(Strtofloat(Edit1.text)*kurs);
вообще никак?
Галочка "подтверждения прочтения" - вселенское зло.
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
