Объектно-ориентированное программирование на языке С++
Курсовой проект - Компьютеры, программирование
Другие курсовые по предмету Компьютеры, программирование
trings[6]));
++Bcount;;3:[Tcount] = new TRACK
(INFO->Strings[0].c_str(),>Strings[1].c_str(),(INFO->Strings[2]),(INFO->Strings[3]),(INFO->Strings[4]),>Strings[5].c_str());
++Tcount;
}
}void FIND (String value, int pole)
{*INFO = new TStringList();=0;
BFcount=0;=0;
/// поиск значения по массиву автомобилей
for (int i = 0; i <Ccount; i++)
{[i]->GET(INFO);(value == INFO->Strings[pole])
{[CFcount]= CARArray[i];++;
}>Clear();
}
/// поиск значения по массиву автобусы
for (int i = 0; i <Bcount; i++)
{[i]->GET(INFO);(value == INFO->Strings[pole])
{[BFcount]= BUSArray[i];++;
}>Clear();
}
/// поиск значения по массиву автобусы
for (int i = 0; i <Tcount; i++)
{[i]->GET(INFO);(value == INFO->Strings[pole])
{[TFcount]= TRACKArray[i];++;
}>Clear();
}
}
};baza;__fastcall TFirst: FormActivate (TObject *Sender)
{
{->Clear();->Lines->Add (Автомобили);->Lines->Add(============);->Clear();->Lines->Add (Автобусы);->Lines->Add(===========);->Clear();->Lines->Add (Грузовики);->Lines->Add(===========);*avto;*INFO = new TStringList();. ReadFileBase();
//// вывод информации о машинах(int i = 0; i <=baza. Ccount-1; i++)
PRINT(INFO);->Lines->AddStrings(INFO);>Clear();1->Lines->Add(**************);">{= baza.CARArray[i];->PRINT(INFO);->Lines->AddStrings(INFO);>Clear();1->Lines->Add(**************);
}
//// вывод информации об автобусах
for (int i = 0; i <=baza. Bcount-1; i++)
PRINT(INFO);->Lines->AddStrings(INFO);>Clear();->Lines->Add(**************);">{= baza.BUSArray[i];->PRINT(INFO);->Lines->AddStrings(INFO);>Clear();->Lines->Add(**************);
}
//// вывод информации о грузовиках
for (int i = 0; i <=baza. Tcount-1; i++)
PRINT(INFO);->Lines->AddStrings(INFO);>Clear();->Lines->Add(****************);">{= baza.TRACKArray[i];->PRINT(INFO);->Lines->AddStrings(INFO);>Clear();->Lines->Add(****************);
}
}(EConvertError*)
{(0, Чтение файла!, Ошибка!, MB_ICONERROR);
}
}
// -
__fastcall TFirst: BitBtn1Click (TObject *Sender)
{
try
{ /// Добавление и вывод нового объекта
if (transport->Text == Автомобили)
{((marka->Text==)||(model->Text==)||
(god_vipuska->Text==)||(power->Text==)||
(vmestimost->Text==)||(tip_kuzova->Text==)||
(class_avto->Text==))(0, Заполните все поля!!!, Ошибка!!!, MB_ICONWARNING); else
{.CARArray [baza. Ccount] = new CAR
(marka->Text.c_str(),>Text.c_str(),(god_vipuska->Text),(power->Text),(vmestimost->Text),_kuzova->Text.c_str(),_avto->Text.c_str());
++ baza. Ccount;
MessageBoxA (0, Выполнено успешно!, Добавление данных!, mbYes);
PRINT(INFO);->Lines->AddStrings(INFO);>Clear();->Lines->Add(**************************************************************************);">AVTO *avto;*INFO = new TStringList();= baza.CARArray [baza. Ccount-1];->PRINT(INFO);->Lines->AddStrings(INFO);>Clear();->Lines->Add(**************************************************************************);
}
};
}(EConvertError*)
{(0, Проверьте правильность введенных данных!, Ошибка!, MB_ICONERROR);
}
try
{ /// Добавление и вывод нового объекта
if (transport->Text == Автобусы)
{((marka->Text==)||(model->Text==)||
(god_vipuska->Text==)||(power->Text==)||
(vmestimost->Text==)||(naznachenie->Text==)||
(gab_dlinna->Text==))(0, Заполните все поля!!!, Ошибка!!!, MB_ICONWARNING); else
{.BUSArray [baza. Bcount] = new BUS
(marka->Text.c_str(),>Text.c_str(),(god_vipuska->Text),(power->Text),(vmestimost->Text),>Text.c_str(),(gab_dlinna->Text));
++ baza. Bcount;
MessageBoxA (0, Выполнено успешно!, Добавление данных!, mbYes);
PRINT(INFO);->Lines->AddStrings(INFO);>Clear();->Lines->Add(**************************************************************************);">AVTO *avto;*INFO = new TStringList();= baza.BUSArray [baza. Bcount-1];->PRINT(INFO);->Lines->AddStrings(INFO);>Clear();->Lines->Add(**************************************************************************);
}
};
}(EConvertError*)
{(0, Проверьте правильность введенных числовых данных!, Ошибка!, MB_ICONERROR);
}
try
{ /// Добавление и вывод нового объекта
if (transport->Text == Грузовики)
{((marka->Text==)||(model->Text==)||
(god_vipuska->Text==)||(power->Text==)||
(gruzopodemnost->Text==)||(tip_gruzovika->Text==))(0, Заполните все поля!!!, Ошибка!!!, MB_ICONWARNING); else
{.TRACKArray [baza. Tcount] = new TRACK
(marka->Text.c_str(),>Text.c_str(),(god_vipuska->Text),(power->Text),(gruzopodemnost->Text),_gruzovika->Text.c_str());
++ baza. Tcount;
MessageBoxA (0, Выполнено успешно!, Добавление данных!, mbYes);
PRINT(INFO);->Lines->AddStrings(INFO);>Clear();->Lines->Add(**************************************************************************);">AVTO *avto;*INFO = new TStringList();= baza.BUSArray [baza. Tcount-1];->PRINT(INFO);->Lines->AddStrings(INFO);>Clear();->Lines->Add(**************************************************************************);
}
};
}(EConvertError*)
{(0, Проверьте правильность введенных числовых данных!, Ошибка!, MB_ICONERROR);
}
}
// -__fastcall TFirst:transportChange (TObject *Sender)
{(transport->Text == Автомобили)
{->Caption = transport->Text;>Visible = true;_kuzova->Visible = true;_avto->Visible = true;->Visible = true;>Visible = false;_dlinna->Visible = false;_gruzovika->Visible = false;>Visible = false;->Visible = false;->Visible = false;
}(transport->Text == Автобусы)
{->Caption = transport->Text;>Visible = true;>Visible = true;_dlinna->Visible = true;->Visible = true;_kuzova->Visible = false;_avto->Visible = false;_gruzovika->Visible = false;>Visible = false;->Visible = false;->Visible = false;
}(transport->Text == Грузовики)
{->Caption = transport->Text;_gruzovika->Visible = true;>Visible = true;
dat3->Visible = true;
vmestimost->Visible = false;>Visible = false;_dlinna->Visible = false;_kuzova->Visible = false;_avto->Visible = false;->Visible = false;->Visible = false;
}
}
// -
__fastcall TFirst:TFirst (TComponent* Owner)
: TForm(Owner)
{
}
// -__fastcall TFirst:N5Click (TObject *Sender)
{>Close();
}
// -__fastcall TFirst: BitBtn5Click (TObject *Sender)
{
{*avto;*INFO = new TStringList();
/// Добавление и вывод нового объекта(transport->Text == Автомобили)
{(int i = 0; i <= baza. Ccount-1; i++)
GET(INFO);">{= baza.CARArray[i];>GET(INFO);
SaveToFile(car_info.txt);">}>SaveToFile (car_info.txt);
INFO->Clear();
}
/// Добавление и вывод нового объекта
if (transport->Text == Автобусы)
{(int i = 0; i <= baza. Bcount-1; i++)
GET(INFO);">{= baza.BUSArray[i];>GET(INFO);
SaveToFile(bus_info.txt);">}>SaveToFile (bus_info.txt);
INFO->Clear();
}
/// Добавление и вывод нового объекта
if (transport->Text == Грузовики)
{(int i = 0; i <= baza. Tcount-1; i++)
GET(INFO);">{= baza.TRACKArray[i];>GET(INFO);
SaveToFile(track_info.txt);>Clear();">}>SaveToFile (track_info.txt);>Clear();
}
}(EConvertError*)
{(0, Сохр?/p>