Ћекции.ќрг


ѕоиск:




 атегории:

јстрономи€
Ѕиологи€
√еографи€
ƒругие €зыки
»нтернет
»нформатика
»стори€
 ультура
Ћитература
Ћогика
ћатематика
ћедицина
ћеханика
ќхрана труда
ѕедагогика
ѕолитика
ѕраво
ѕсихологи€
–елиги€
–иторика
—оциологи€
—порт
—троительство
“ехнологи€
“ранспорт
‘изика
‘илософи€
‘инансы
’ими€
Ёкологи€
Ёкономика
Ёлектроника

 

 

 

 


≤V-й спос≥б




1. ¬≥дкрийте програмний проект дл€ попереднього вар≥анту.  омандами File/Save as та File/Save Project as запиш≥ть файли Unit1.cpp та Project1.bpr у папку дл€ ≤V-го вар≥анту програми.

2.  омпоненти Label4, RadioGroup1 та ListBox2 вилуч≥ть, а зам≥сть них розташуйте таблицю р€дк≥в StringGrid (стор≥нка Additional пал≥три компонент) з такими значенн€ми дл€ властивостей:

ColCount Ч 3 (к-сть стовпц≥в)

RowCount Ч 4 (к-сть р€дк≥в)

FixedCols Ч 0 (к-сть ф≥ксованих стовпц≥в зл≥ва)

FixedRows Ч 1 (к-сть ф≥ксованих р€дк≥в зверху)

‘орма вигл€датиме таким чином:

3. «аповнимо таблицю даними (назви валют, курс продажу та куп≥вл≥) п≥д час запуску програми скориставшись под≥Їю OnCreate дл€ форми:

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

int I;

StringGrid1->Cells[0][0]="Ќазви валют";

StringGrid1->Cells[1][0]=" уп≥вл€";

StringGrid1->Cells[2][0]="ѕродаж";

for (I=1; I<=K; I++)

{

StringGrid1->Cells[0][I]=Nv[I-1];

StringGrid1->Cells[1][I]=FloatToStr(Kv[I-1][0]);

StringGrid1->Cells[2][I]=FloatToStr(Kv[I-1][1]);

}

}

«наченн€ ком≥рок таблиц≥ StringGrid1 збер≥гаютьс€ у властивост≥ Cells, €ка Ї двом≥рним масивом, нумерац≥€ р€дк≥в та стовпц≥в у ньому розпочинаЇтьс€ з нул€ (спочатку вказуЇтьс€ номер стовпц€, а пот≥м номер р€дка). ћасиви Nv та Kv (назви валют та курси валют) опишемо у розд≥л≥ implementation таким чином:

const K=3;

char *Nv[K]={"USD", "Euro", "RusRuble"};

const double Kv[K][2]={5.05,5.15,6.1,6.2,0.15,0.16};

4. ћетоди дл€ опрацюванн€ под≥њ OnClick дл€ RadioButton1 та RadioButton2 залишимо у такому вигл€д≥:

void __fastcall TForm1::RadioButton1Click(TObject *Sender)

{

Label3->Caption="купуЇте";

Label7->Caption="до оплати";

 

}

//-------------------------------------------------------------------

 

void __fastcall TForm1::RadioButton2Click(TObject *Sender)

{

Label3->Caption="продаЇте";

Label7->Caption="до видач≥";

}

5. ќпрацюванн€ под≥њ OnClick дл€ Edit2 зд≥йснимо таким чином:

void __fastcall TForm1::Edit2Change(TObject *Sender)

{

if (RadioButton1->Checked)

Edit3->Text=FloatToStr(StrToInt(Edit2->Text)*

Kv[StringGrid1->Row-1][0]);

else

Edit3->Text=FloatToStr(StrToInt(Edit2->Text)*

Kv[StringGrid1->Row-1][1]);

}

¬ластив≥сть Row компонента StringGrid1 ф≥ксуЇ номер вибраного р€дка таблиц≥.

6. ¬иконайте програму ≥з середовища C++ Builder. ‘орма програми на етап≥ виконанн€ вигл€датиме таким чином:

«авантажте в≥дпов≥дний exe-файл ≥з середовища ќ— Widows.

 

«авданн€ дл€ самост≥йноњ роботи

” вс≥х вар≥антах програми при вилученн≥ числового значенн€ ≥з пол€ Edit2 або при введенн≥ в нього недопустимого символу буде зТ€вл€тис€ помилка Сis not a valid integer valueТ. «Т€суйте, в чому причина такоњ помилки та виправте њњ.

 





ѕоделитьс€ с друзь€ми:


ƒата добавлени€: 2015-10-01; ћы поможем в написании ваших работ!; просмотров: 340 | Ќарушение авторских прав


ѕоиск на сайте:

Ћучшие изречени€:

¬ моем словаре нет слова Ђневозможної. © Ќаполеон Ѕонапарт
==> читать все изречени€...

1255 - | 1228 -


© 2015-2024 lektsii.org -  онтакты - ѕоследнее добавление

√ен: 0.008 с.