Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.69/16: Рейтинг темы: голосов - 16, средняя оценка - 4.69
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571

Создание универсального конвертора!!

16.01.2010, 13:00. Показов 3208. Ответов 20
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здраствуйте все, я разработал конвертер. Но мне нужно ваша помощь!!!

http://p23a.at.ua/sayt/hjhj.jpg
(Скриншот программы)

Помогите доделать так, чтобы когда выбираешь из какой валюты в какую, результат выводило в Label2.

http://p23a.at.ua/sayt/hjhj.png
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
16.01.2010, 13:00
Ответы с готовыми решениями:

Создание универсального автозагрузчика
Нашёл код на данном форуме для программы, которая добавляет сама себя в автозагрузку. Но, надо было сделать его универсальным т.е....

Создание универсального триггера
Добрый вечер. Есть вопрос по Transact-SQL Итак, есть задание написать триггер на некоторую таблицу, например, Bank. Есть два условия:...

Создание универсального стека
Прошу помощи в создании универсального стека. Вообще в реализации стека хранящего определенный тип (например : integer, char и т.д.) нет ни...

20
 Аватар для Otaka
1857 / 714 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
16.01.2010, 13:31
Я бы тебе предложил прочесть вот эту темку:
Связь с интернетом
2
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
16.01.2010, 15:00  [ТС]
Otaka, слышеш? мне нужно чтобы з интернета не брало

Добавлено через 6 минут
Otaka, Вот на моей форме есть две панели в которых по 6 валют, и мне нужно когда я выбераю валюту в первой и второй панели -> ввестинеобходимую суму в Edit1 и чтобы при нажатии Конвертувати в Libel1 выводило результат!!!
0
 Аватар для VorteX
172 / 96 / 12
Регистрация: 29.05.2009
Сообщений: 341
16.01.2010, 15:06
Label1->Caption=результат;

Мне кажеться что сначало тебе нужно поучить С++, и разобраться в билдере, прежде чем программы писать( судя по твоему вопросу...)
0
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
16.01.2010, 15:54  [ТС]
Falen, Label1->Caption=результат; вот єтоя я знаю мне нужно запрограмировать кнопку

Добавлено через 13 минут
Это код Edit1 - xnj,s njkmrj wbahb vj;yj ,skj ddjlbnm
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
if ((Key >= '0') && (Key <= '9'))
return;
if (Key == DecimalSeparator)
{
if ((Edit1->Text).Pos(DecimalSeparator) != 0)
Key = 0;
return;
if (Key == VK_BACK)
return;}
Key =0 ;
}
Добавлено через 8 минут
Мне просто нужно чтобы при виборе какой валюти на какую валюту. Оно знало что на что множить

Добавлено через 17 минут
Ребята подскажите очень надо!!!
0
 Аватар для Otaka
1857 / 714 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
16.01.2010, 16:00
Сначала Все приводишь к чему то одному, например к гривне, а потом с гривны переводишь во все остальное.
0
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
16.01.2010, 19:57  [ТС]
Otaka, помоги мне, еле не занят. У нас препад не нечего не обесняет по борланду

Добавлено через 30 секунд
Otaka, Приходетса самому както думать, и у когото спрашывать!!!

Добавлено через 3 часа 54 минуты
Otaka, навиди хотябы пример!!!! Плиз
0
 Аватар для russich
48 / 47 / 13
Регистрация: 02.12.2009
Сообщений: 144
16.01.2010, 21:18
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 String S;
 int curs;
 switch (RadioGroup1->ItemIndex)
 {
   case 0:curs=8; //курс доллара
          curs*=StrToInt(Edit1->Text);//с математикой у меня слабовато, помоему тут нужно разделить, но мысль моя думаю понятна.
          S=String(curs);
          ;
      break;
   case 1: ;//все как в case 0, только поменять курс
   break;
   //и так на все валюты
 }
 
 Label1->Caption=S;
}
Может это поможет, удачи.
1
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
16.01.2010, 23:27  [ТС]
russich, Спасибо но у меня ошыбка

Добавлено через 4 минуты
Я исполюзую ети обекты:
http://p23a.at.ua/sayt/fgfg.png

Добавлено через 1 час 46 минут
ребята у меня 2 ошибки выбивает
[C++ Ошибка] Unit1.cpp(41): E2451 Undefined symbol 'RadioGroup1'
[C++ Ошибка] Unit1.cpp(44): E2096 Illegal structure operation

Добавлено через 48 секунд
Я использую обэкт GroupBox1 а не RadioGroup1

Добавлено через 47 секунд
не знает что такое ItemIndex

Добавлено через 10 минут
Otaka, Слышеш наведи пример того что ты говорил а дальше я сам!
0
 Аватар для Otaka
1857 / 714 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
16.01.2010, 23:32
Все описано по той ссылке которую я тебе дал. У тебя есть курс всех валют к гривне. Вот ты и сначала переводишь любую валюту в гривну(заметь, что гривна к гривне относится как 1:1) с помощью умножения суммы на текущий курс выбранной валюты. После того как ты получил сумму в гривне, делишь её на текущий курс выбранной валюты или на единицу, если цель-гривна.
0
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
17.01.2010, 00:12  [ТС]
Otaka, понемаеш у тебя тот конвертер зделан базой данных, по той ссылке не чего такого путьового нету что мне нужно.

Добавлено через 28 минут
russich, там ошибка не знает что такое ItemIndex
0
 Аватар для Otaka
1857 / 714 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
17.01.2010, 11:49
Замени свой GroupBox с кучей радиокнопок на RadioGroup. Будет потом гораздо проще все подсчитывать.
0
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
17.01.2010, 18:22  [ТС]
Привет всем, ка можно из ComboBox1 виводить информацию на Label1?
Например первую строку из ComboBox1 в Label1 но не то што в сьтоке той. Например я вибераю цену в Label1 должно вывести что это долар..

Добавлено через 1 час 16 минут
Пацаны мне нужно при виборе строки в обэкте ComboBox1 в Label1 отображалась типа подсказка строки каторую я выбрал!!!! Подскажите как так можно запрограмировать!!

Добавлено через 22 минуты
В обекте Label1 нужно отобразить позсказку строки обекта ComboBox1. Можно ли както это запрграмировать?

Добавлено через 2 часа 13 минут
Ребята яз тем разобрался

Добавлено через 23 минуты
помгите запрограмировать ComboBox1 так штоби при випадания списка, например:
Долар
Евро
мы видели ети надписи, но скрыто они должни быть равани своему курсу!!!!! Помогити,

Добавлено через 56 минут
Otaka, может ты знаеш?

Добавлено через 45 минут
Otaka, Знаеш?
0
 Аватар для Otaka
1857 / 714 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
17.01.2010, 18:26
В массиве у тебя курсы валют, по событию GroupBox OnChange смотришь какой элемент выделен(ItemIndex),и берешь соответствующий курс из массива.
0
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
18.01.2010, 23:04  [ТС]
Я запрограмировал GroupBox так чтобі он мне віводил в Label1 подсказку
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
switch(ComboBox1->ItemIndex){
case 0:
Label1->Caption="USD 1$ = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";break;
case 1:
Label1->Caption="EUR 1E = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
Label1->Caption="USD 1$ = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 2:
Label1->Caption="RUB 1руб. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 3:
Label1->Caption="DKK 1дат. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 4:
Label1->Caption="CHF 1фрн. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 5:
Label1->Caption="TMM 1ман. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 6:
Label1->Caption="TRL 1лир = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 7:
Label1->Caption="PLN 1злот. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 8:
Label1->Caption="NOK 1крон = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 9:
Label1->Caption="GBP 1стер. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
}}
Добавлено через 2 минуты
Otaka, Я немного по другому делал. У меня 2 ComboBox, 2 RadioButton, 4 Edit, 2 Button и 4 Label.

Добавлено через 37 секунд
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
//---------------------------------------------------------------------------
 
#include <vcl.h>
#include <math.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
exit(1);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
float f4;
if (RadioButton1->Checked)
f4=ComboBox2->Text*Edit3->Text;
else
f4=ComboBox1->Text*Edit3->Text;
Edit4->Text=FloatToStr(f4)+" грн.";
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::RadioButton2Click(TObject *Sender)
{
Label3->Caption="р";
Edit3->SetFocus();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::RadioButton1Click(TObject *Sender)
{
Label3->Caption="п";
Edit3->SetFocus();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
switch(ComboBox1->ItemIndex){
case 0:
Label1->Caption="USD 1$ = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";break;
case 1:
Label1->Caption="EUR 1E = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
Label1->Caption="USD 1$ = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 2:
Label1->Caption="RUB 1руб. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 3:
Label1->Caption="DKK 1дат. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 4:
Label1->Caption="CHF 1фрн. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 5:
Label1->Caption="TMM 1ман. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 6:
Label1->Caption="TRL 1лир = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 7:
Label1->Caption="PLN 1злот. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 8:
Label1->Caption="NOK 1крон = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
case 9:
Label1->Caption="GBP 1стер. = "+
(ComboBox1->Items->Strings[ComboBox1->ItemIndex])+" грн.";
break;
}}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::ComboBox2Change(TObject *Sender)
{
switch(ComboBox2->ItemIndex){
case 0:
Label1->Caption="USD 1$ = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";break;
case 1:
Label1->Caption="EUR 1E = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";
break;
Label1->Caption="USD 1$ = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";
break;
case 2:
Label1->Caption="RUB 1руб. = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";
break;
case 3:
Label1->Caption="DKK 1дат. = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";
break;
case 4:
Label1->Caption="CHF 1фрн. = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";
break;
case 5:
Label1->Caption="TMM 1ман. = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";
break;
case 6:
Label1->Caption="TRL 1лир = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";
break;
case 7:
Label1->Caption="PLN 1злот. = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";
break;
case 8:
Label1->Caption="NOK 1крон = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";
break;
case 9:
Label1->Caption="GBP 1стер. = "+
(ComboBox2->Items->Strings[ComboBox2->ItemIndex])+" грн.";
break;
}}
//---------------------------------------------------------------------------
Добавлено через 21 минуту
Otaka, Ну так што поможеш?

Добавлено через 19 минут
Otaka, http://p23a.at.ua/sayt/ghfhgf.png

Добавлено через 17 часов 51 минуту
Ребята помогите запрограмировать последний момент

Добавлено через 2 минуты
Я хочу запрограмировать строки ComboBox-са так чтоби випадающем списке были названия валюты Но при этом чтобы эти валюты были ровны своему курсу

Добавлено через 9 минут
http://p23a.at.ua/sayt/65656.png

Добавлено через 45 секунд
подскажите пожалуста код, плиз

Добавлено через 9 часов 44 минуты
Otaka, Ти знаеш как ето можно зделать?
0
 Аватар для Otaka
1857 / 714 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
18.01.2010, 23:08
Ну, я ведь тебе уже говорил несколько раз. Из комбобокса берешь itemIndex(текущий выделенный элемент), а потом у тебя должен быть массив с курсами валют. Из него ты по этому индексу и выбираешь необходимое значение.
1
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
19.01.2010, 16:30  [ТС]
Пацані подскажите как можно число округлить з Edit4 к сотим 0,01

Добавлено через 11 минут
Otaka, слышеш подскажы как можно округлить в едете число к сотим после комы
0
 Аватар для Otaka
1857 / 714 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
19.01.2010, 22:08
Как-то так, наверное.
C++
1
2
3
float b=45.98988;
string s;
Edit1->Text=s.sprintf("%.2f",b);
0
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
25.01.2010, 20:43  [ТС]
Спасибо всем но я немного по своему, по простому зделал конвертора, хто хочет могу кинуть
0
 Аватар для gorin
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
27.01.2010, 16:19  [ТС]
Ребята подскаите как мне можно запрограмировать кнопку так. Например я создал 6 Edit-тов, и мне нужно чтоби я ввел в какойто из них число и оно мне вичисляло остальные Edit. Например такого http://alpha-610.narod.ru/trance.html

Добавлено через 16 секунд
Подскажите пожалусто!!!!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
27.01.2010, 16:19
Помогаю со студенческими работами здесь

Создание универсального шаблона
Не понимаю програмную реализацию задания. Создайте класс MyClass&lt;T&gt;, содержащий статический фабричный метод - T FacrotyMethod(), который...

Создание универсального окна с календарем.
Простая ситуация: Есть поле на форме с датой и кнопкой рядом. По нажатии на кнопку вызываеться красивое окно с календарем (типа как...

Создание универсального обработчика форм
Есть задача сделать универсальную обработку форм, то есть - есть набор функции которые обрабатывают форму и страницу шаблон, на выходе...

Создание универсального образа системы Windows
Доброе время суток! я занимаюсь ремонтом компьютеров. ну и чаще всего возникает банальная задача пере установить windows. Чистая...

Создание универсального HTML элемента/виджета
Вопрос такой. Хочу сверстать виджет(или не знаю как назвать), который бы мог вставляться на любой сайт в сети. Хотелось бы, чтобы он был...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
Влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru