Форум программистов, компьютерный форум, киберфорум
C++ Builder
Форум программистов и сисадминов Киберфорум > Форум программистов > C/C++ > C++ > C++ Builder
Войти
Регистрация
Восстановить пароль
Правила Карта форума Темы раздела Блоги Социальные группы Поиск Сообщения за день  
 
1 из 2 1 2 »
 
Рейтинг 4.64/14: Рейтинг темы: голосов - 14, средняя оценка - 4.64
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
1

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

16.01.2010, 13:00. Показов 2821. Ответов 20
Метки нет (Все метки)
Студворк — интернет-сервис помощи студентам
Здраствуйте все, я разработал конвертер. Но мне нужно ваша помощь!!!

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

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

http://p23a.at.ua/sayt/hjhj.png
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 16.01.2010, 13:00
Ответы с готовыми решениями:

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

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

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

Создание универсального шаблона
Не понимаю програмную реализацию задания. Создайте класс MyClass<T>, содержащий статический...

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

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

Мне кажеться что сначало тебе нужно поучить С++, и разобраться в билдере, прежде чем программы писать( судя по твоему вопросу...)
0
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
16.01.2010, 15:54  [ТС] 5
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
1856 / 713 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
16.01.2010, 16:00 6
Сначала Все приводишь к чему то одному, например к гривне, а потом с гривны переводишь во все остальное.
0
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
16.01.2010, 19:57  [ТС] 7
Otaka, помоги мне, еле не занят. У нас препад не нечего не обесняет по борланду

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

Добавлено через 3 часа 54 минуты
Otaka, навиди хотябы пример!!!! Плиз
0
48 / 47 / 13
Регистрация: 02.12.2009
Сообщений: 144
16.01.2010, 21:18 8
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
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
16.01.2010, 23:27  [ТС] 9
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
1856 / 713 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
16.01.2010, 23:32 10
Все описано по той ссылке которую я тебе дал. У тебя есть курс всех валют к гривне. Вот ты и сначала переводишь любую валюту в гривну(заметь, что гривна к гривне относится как 1:1) с помощью умножения суммы на текущий курс выбранной валюты. После того как ты получил сумму в гривне, делишь её на текущий курс выбранной валюты или на единицу, если цель-гривна.
0
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
17.01.2010, 00:12  [ТС] 11
Otaka, понемаеш у тебя тот конвертер зделан базой данных, по той ссылке не чего такого путьового нету что мне нужно.

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

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

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

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

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

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

Добавлено через 45 минут
Otaka, Знаеш?
0
1856 / 713 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
17.01.2010, 18:26 14
В массиве у тебя курсы валют, по событию GroupBox OnChange смотришь какой элемент выделен(ItemIndex),и берешь соответствующий курс из массива.
0
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
18.01.2010, 23:04  [ТС] 15
Я запрограмировал 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
1856 / 713 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
18.01.2010, 23:08 16
Ну, я ведь тебе уже говорил несколько раз. Из комбобокса берешь itemIndex(текущий выделенный элемент), а потом у тебя должен быть массив с курсами валют. Из него ты по этому индексу и выбираешь необходимое значение.
1
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
19.01.2010, 16:30  [ТС] 17
Пацані подскажите как можно число округлить з Edit4 к сотим 0,01

Добавлено через 11 минут
Otaka, слышеш подскажы как можно округлить в едете число к сотим после комы
0
1856 / 713 / 55
Регистрация: 11.12.2008
Сообщений: 1,019
19.01.2010, 22:08 18
Как-то так, наверное.
C++
1
2
3

float b=45.98988;
string s;
Edit1->Text=s.sprintf("%.2f",b);
0
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
25.01.2010, 20:43  [ТС] 19
Спасибо всем но я немного по своему, по простому зделал конвертора, хто хочет могу кинуть
0
209 / 16 / 4
Регистрация: 18.08.2009
Сообщений: 571
27.01.2010, 16:19  [ТС] 20
Ребята подскаите как мне можно запрограмировать кнопку так. Например я создал 6 Edit-тов, и мне нужно чтоби я ввел в какойто из них число и оно мне вичисляло остальные Edit. Например такого http://alpha-610.narod.ru/trance.html

Добавлено через 16 секунд
Подскажите пожалусто!!!!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
 27.01.2010, 16:19
Помогаю со студенческими работами здесь

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

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

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

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


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

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
1 из 2 1 2 »
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru