С++, ошибки в коде из примера

[Dima-91]

TForm1 *Form1;
AnsiString reg[8] = {"Москва","Московская обл.","Санкт-Петербург",
 "Нижний Новгород", "Ленинградская обл.", "Ростов-на-Дону",
 "Самара","Мурманск"};
 float Kt[8] = {1.8,1.6,1.8,1.3,1.1,1.1};
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{
  int i,n;
  n = sizeof (Kt)/ sizeof (float);
  for (	i = 0; i < n; i++) {
   ComboBox1->Items->Add(reg[i]);
   ComboBox1->OnChange = Change; // E2451 Undefined symbol 'Change'
   ComboBox2->OnChange = Change;
   ComboBox3->OnChange = Change;
   ComboBox4->OnChange = Change;
   Edit1->OnChange = Change;
   Edit2->OnChange = Change;
   Edit3->OnChange = Change;
  }
  int Cb[6][5] = {{1,-1,-1,-1,-1},   
		 {2,-1,-1,-1,-1},
		 {3,1,-1,-1,-1},
		 {4,1,-1,-1,-1},
		 {5,2,1,-1,-1},
		 {6,3,1,-1,-1}};
  float Kb[7] = {2.3,1.55,1.4,1,0.95,0.9};    
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
float aTb, aKt, aKb, aKvs, aKo, aKm, aKs;
int  pcb, ccb, nss;

aTb = StrToFloat (Edit3->Text);
aKt = Kt[ComboBox1->ItemIndex];
pcb = StrToInt (Edit1->Text);
nss = StrToInt (Edit2->Text);
ccb = Cb[pcb][nss];    // E2451 Undefined symbol 'Cb'
if (ccb != -1) {
	aKb = Kb[ccb]; // E2451 Undefined symbol 'Kb'
}
else aKb = 2.45;
aKb = Kb[ccb]   ;
switch (ComboBox2->ItemIndex) {
case 0: aKvs = 1.3; break;
case 1: aKvs = 1.2; break;
case 2: aKvs = 1.15; break;
case 3: aKvs = 1.0; break;
}

if (CheckBox1->Checked) {
 aKo = 1.0;
}
else aKo = 1.5;

switch (ComboBox3->ItemIndex) {
case 0: aKm = 0.5; break;
case 1: aKm = 0.7; break;
case 2: aKm = 1.0; break;
case 3: aKm = 1.3; break;
case 4: aKm = 1.5; break;
case 5: aKm = 1.7; break;
case 6: aKm = 1.9; break;
}
switch (ComboBox4->ItemIndex) {
case 0: aKs = 0.7; break;
case 1: aKs = 0.8; break;
case 2: aKs = 0.9; break;
case 3: aKs = 0.95; break;
case 4: aKs = 1.0; break;
}
float T;
AnsiString st;
T = аТЬ * aKt * aKb * aKvs * аКо * aKm *aKs;
st = "Базовая ставка тарифа: " + FloatToStrF (aTb, ffCurrency,5,2) +
"\nКоэф. тарифа: " + FloatToStrF (aKt, ffGeneral,2,2) +
"\nКээф. безаварийности: " + FloatToStrF (aKb,ffGeneral, 2,2) +
"\nКээф. водительского стажа: " + FloatToStrF (aKvs,ffGeneral, 2,2) +
"\nКээф. кол-ва лиц, допущенных к управлению: " + FloatToStrF (aKo,ffGeneral, 2,2) +
"\nКээф. мощности двигателя: " + FloatToStrF (aKm,ffGeneral, 2,2) +
"\nКээф. периода использования ТС: " + FloatToStrF (aKs,ffGeneral, 2,2) +
"\nТариф: " + FloatToStrF (T, ffCurrency,5,2)  ;
ShowMessage(st);
}
//---------------------------------------------------------------------------
 void __fastcall TForm1::Change(TObject *Sender) 
 {  //E2316 '_fastcall TForm1::Change(TObject *)' is not a member of 'TForm1'
 Button1->Enabled = (ComboBoxl->ItemIndex != -1) &&
 (ComboBox2->ItemIndex != -1) &&
 (ComboBox3->ItemIndex != -1) &&
 (ComboBox4->ItemIndex != -1) &&
 (Editl->Text.Length<) != 0) &&
 (Edit2->Text.Length() != 0) &&
 (Edit3->Text.Length() != 0);
 }

Помогите разобраться с кодом, пример взят из книги, но у меня не компилируется.
Использую C++ Builder XE8.

[Stilet]

Текст ошибки в студию )

[Artsiom]

Какая ошибка?

З.Ы. Меня опередили.

[BDA]

Cb и Kb объявлены локально в TForm1::TForm1, поэтому недоступны в TForm1::Button1Click. TForm1::Change нужно вписать в хеадере, где описывается класс TForm1.

[Dima-91]

Сообщение от BDA

Cb и Kb объявлены локально в TForm1::TForm1, поэтому недоступны в TForm1::Button1Click. TForm1::Change нужно вписать в хеадере, где описывается класс TForm1.

Получилось скомпилировать, спасибо за помощь с недочетами попробую справиться сам)

[Krasiosoft]

Обратите внимание на:

  int i,n;
  n = sizeof (Kt)/ sizeof (float);
  for (i = 0; i < n; i++) {
   ComboBox1->Items->Add(reg[i]);
   ComboBox1->OnChange = Change;
   ComboBox2->OnChange = Change;
   ComboBox3->OnChange = Change;
   ComboBox4->OnChange = Change;
   Edit1->OnChange = Change;
   Edit2->OnChange = Change;
   Edit3->OnChange = Change;
  }

Тут наверно нужно так:

  int i,n;
  n = sizeof (Kt)/ sizeof (float);
  ComboBox1->OnChange = Change;
  ComboBox2->OnChange = Change;
  ComboBox3->OnChange = Change;
  ComboBox4->OnChange = Change;
  Edit1->OnChange = Change;
  Edit2->OnChange = Change;
  Edit3->OnChange = Change;  
  for (i = 0; i < n; i++) ComboBox1->Items->Add(reg[i]);

[Dima-91]

Остался последний вопрос по этому разделу

 int Cb[6][5] = {{1,-1,-1,-1,-1},   
		 {2,-1,-1,-1,-1},
		 {3,1,-1,-1,-1},
		 {4,1,-1,-1,-1},
		 {5,2,1,-1,-1},
		 {6,3,1,-1,-1}};
//------------------
ccb = Cb[pcb][nss];   
if (ccb != -1) {
	aKb = Kb[ccb]; 
}
else aKb = 2.45;
aKb = Kb[ccb]   ;

aKb не считает в некоторых случаях, хотя если данные как в примере ввести все нормально) Думал что скобочек не хватает в else, но не помогло...
Всем спасибо, может завтра идея придет в голову, наверное массивом Cb[][] не правильно пользуюсь...

[Krasiosoft]

ccb = Cb[pcb][nss];   
if (ccb != -1) {
	aKb = Kb[ccb]; 
}
else aKb = 2.45;
aKb = Kb[ccb];   //  затирает результат if...else

[Dima-91]

Спасибо, Вам, понял.