Создание менеджера конфигурации Celestia

Обоснование и выбор программных средств обеспечения проектирования и разработки структуры классов. Математические методы и специальные алгоритмы решения задачи. Описание входной, выходной и промежуточной информации. Разработка экранного интерфейса.

Рубрика Программирование, компьютеры и кибернетика
Вид дипломная работа
Язык русский
Дата добавления 18.05.2014
Размер файла 1,2 M

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

CheckBox27->State=Settings->ReadBool("Spacecrafts","Salyut7",0);

CheckBox28->State=Settings->ReadBool("Spacecrafts","Mariner",0);

CheckBox29->State=Settings->ReadBool("Spacecrafts","VenusExpress",0);

CheckBox32->State=Settings->ReadBool("Spacecrafts","Herschel",0);

CheckBox34->State=Settings->ReadBool("Spacecrafts","NewHorizons",0);

CheckBox35->State=Settings->ReadBool("Spacecrafts","Spitzer",0);

CheckBox36->State=Settings->ReadBool("Spacecrafts","ISO",0);

CheckBox37->State=Settings->ReadBool("Spacecrafts","Envisat",0);

CheckBox39->State=Settings->ReadBool("Spacecrafts","Apollo",0);

CheckBox40->State=Settings->ReadBool("Spacecrafts","Dawn",0);

CheckBox41->State=Settings->ReadBool("Spacecrafts","DeepImpact",0);

CheckBox42->State=Settings->ReadBool("Spacecrafts","Giotto",0);

CheckBox43->State=Settings->ReadBool("Spacecrafts","Helios",0);

CheckBox44->State=Settings->ReadBool("Spacecrafts","ICE",0);

CheckBox46->State=Settings->ReadBool("Spacecrafts","LRO",0);

CheckBox47->State=Settings->ReadBool("Spacecrafts","Magellan",0);

CheckBox48->State=Settings->ReadBool("Spacecrafts","MarsExpress",0);

CheckBox52->State=Settings->ReadBool("Spacecrafts","Nozomi",0);

CheckBox54->State=Settings->ReadBool("Spacecrafts","Pioneers",0);

CheckBox55->State=Settings->ReadBool("Spacecrafts","Planck",0);

CheckBox56->State=Settings->ReadBool("Spacecrafts","Rosetta",0);

CheckBox57->State=Settings->ReadBool("Spacecrafts","Ulysses",0);

CheckBox58->State=Settings->ReadBool("Spacecrafts","Venera",0);

CheckBox59->State=Settings->ReadBool("Spacecrafts","Viking",0);

CheckBox60->State=Settings->ReadBool("Spacecrafts","Zond3",0);

BitBtn2->Click();

//LUA-инструменты

if(Label11->Visible==false) //если Lua-инструменты установлены

{

CheckBox4->State=Settings->ReadBool("LuaTools","ShowTools",0);

CheckBox5->State=Settings->ReadBool("LuaTools","Info",0);

CheckBox6->State=Settings->ReadBool("LuaTools","Coordinates",0);

CheckBox11->State=Settings->ReadBool("LuaTools","Magnification",0);

CheckBox12->State=Settings->ReadBool("LuaTools","HR",0);

CheckBox7->State=Settings->ReadBool("LuaTools","KeplerParam",0);

CheckBox13->State=Settings->ReadBool("LuaTools","VirtualPad",0);

CheckBox8->State=Settings->ReadBool("LuaTools","Compass",0);

CheckBox63->State=Settings->ReadBool("LuaTools","AsteroidBelt",0);

CheckBox14->State=Settings->ReadBool("LuaTools","LocalTime",0);

CheckBox15->State=Settings->ReadBool("LuaTools","CenterCompass",0);

CheckBox16->State=Settings->ReadBool("LuaTools","AltAzimuthal",0);

ComboBox2->ItemIndex=Settings->ReadInteger("LuaTools","DateFormat",0);

Edit4->Text=Settings->ReadString("LuaTools","GotoDuration","");

if(LuaTab->Caption.Pos("Lua Universal Tools"))

RadioGroup1->ItemIndex=Settings->ReadInteger("LuaTools","ColorScheme",0);

BitBtn3->Click();

}

AutoSave=false;

Application->MessageBox(MessegesLocale[9].c_str(), Application->Title.c_str(), MB_OK | MB_ICONINFORMATION);

}

}

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

void __fastcall TMainForm::Label32MouseMove(TObject *Sender, TShiftState Shift, int X,

int Y)

{

Label32->Font->Style = TFontStyles() << fsUnderline << fsBold;

}

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

void __fastcall TMainForm::Label32MouseLeave(TObject *Sender)

{

Label32->Font->Style = TFontStyles() >> fsUnderline << fsBold;

}

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

void __fastcall TMainForm::Label32Click(TObject *Sender)

{

ShellExecute(Handle, NULL, LinkLocale[1].c_str(), NULL, NULL, SW_SHOWNORMAL);

}

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

void __fastcall TMainForm::Button4Click(TObject *Sender)

{

if(ExportDialog->Execute())

{

//Основные

Settings = new TIniFile(ExportDialog->FileName);

Settings->WriteString("Main","ExtrasDir1",EditDir1->Text);

Settings->WriteString("Main","ExtrasDir2",EditDir2->Text);

Settings->WriteString("Main","ExtrasDir3",EditDir3->Text);

Settings->WriteString("Main","OrbitPathSamplePoints",Edit2->Text);

Settings->WriteString("Main","RingSystemSections",Edit3->Text);

String Temp;

if(RadioButton1->Checked==true)

Temp="crosshair";

if(RadioButton2->Checked==true)

Temp="inverting_crosshair";

if(RadioButton3->Checked==true)

Temp="arrow";

Settings->WriteString("Main","Cursor",Temp);

Settings->WriteString("Main","ScriptScreenshotDirectory",EditScreenDir->Text);

Settings->WriteInteger("Main","ScriptSystemAccessPolicy",ComboBox1->ItemIndex);

Settings->WriteString("Main","InitScript",EditStartScript->Text);

Settings->WriteString("Main","DemoScript",EditDemoScript->Text);

Settings->WriteString("Main","RotateAcceleration",Edit5->Text);

Settings->WriteString("Main","MouseRotationSensitivity",Edit1->Text);

//Объекты и время

Settings->WriteBool("ObjectsTime","SunFlares",CheckBox1->State);

Settings->WriteBool("ObjectsTime","JupiterRings",CheckBox2->State);

Settings->WriteBool("ObjectsTime","MarsSurfaceFeatures",CheckBox10->State);

Settings->WriteBool("ObjectsTime","KuiperBelt",CheckBox17->State);

Settings->WriteBool("ObjectsTime","JupiterClouds",CheckBox18->State);

Settings->WriteBool("ObjectsTime","IoVolcanoes",CheckBox19->State);

Settings->WriteBool("ObjectsTime","SpaceLift",CheckBox20->State);

Settings->WriteBool("ObjectsTime","OortCloud",CheckBox61->State);

Settings->WriteBool("ObjectsTime","HighlightSaturnRings",CheckBox62->State);

//Космические аппараты

Settings->WriteBool("Spacecrafts","Mir",CheckBox9->State);

Settings->WriteBool("Spacecrafts","Galileo",CheckBox3->State);

Settings->WriteBool("Spacecrafts","CassiniHuygens",CheckBox23->State);

Settings->WriteBool("Spacecrafts","Sputnik1",CheckBox24->State);

Settings->WriteBool("Spacecrafts","Sputnik2",CheckBox25->State);

Settings->WriteBool("Spacecrafts","Sputnik3",CheckBox26->State);

Settings->WriteBool("Spacecrafts","Salyut7",CheckBox27->State);

Settings->WriteBool("Spacecrafts","Mariner",CheckBox28->State);

Settings->WriteBool("Spacecrafts","VenusExpress",CheckBox29->State);

Settings->WriteBool("Spacecrafts","Herschel",CheckBox32->State);

Settings->WriteBool("Spacecrafts","NewHorizons",CheckBox34->State);

Settings->WriteBool("Spacecrafts","Spitzer",CheckBox35->State);

Settings->WriteBool("Spacecrafts","ISO",CheckBox36->State);

Settings->WriteBool("Spacecrafts","Envisat",CheckBox37->State);

Settings->WriteBool("Spacecrafts","Apollo",CheckBox39->State);

Settings->WriteBool("Spacecrafts","Dawn",CheckBox40->State);

Settings->WriteBool("Spacecrafts","DeepImpact",CheckBox41->State);

Settings->WriteBool("Spacecrafts","Giotto",CheckBox42->State);

Settings->WriteBool("Spacecrafts","Helios",CheckBox43->State);

Settings->WriteBool("Spacecrafts","ICE",CheckBox44->State);

Settings->WriteBool("Spacecrafts","LRO",CheckBox46->State);

Settings->WriteBool("Spacecrafts","Magellan",CheckBox47->State);

Settings->WriteBool("Spacecrafts","MarsExpress",CheckBox48->State);

Settings->WriteBool("Spacecrafts","Nozomi",CheckBox52->State);

Settings->WriteBool("Spacecrafts","Pioneers",CheckBox54->State);

Settings->WriteBool("Spacecrafts","Planck",CheckBox55->State);

Settings->WriteBool("Spacecrafts","Rosetta",CheckBox56->State);

Settings->WriteBool("Spacecrafts","Ulysses",CheckBox57->State);

Settings->WriteBool("Spacecrafts","Venera",CheckBox58->State);

Settings->WriteBool("Spacecrafts","Viking",CheckBox59->State);

Settings->WriteBool("Spacecrafts","Zond3",CheckBox60->State);

//LUA-инструменты

if(Label11->Visible==false) //если не установлены

{

Settings->WriteBool("LuaTools","ShowTools",CheckBox4->State);

Settings->WriteBool("LuaTools","Info",CheckBox5->State);

Settings->WriteBool("LuaTools","Coordinates",CheckBox6->State);

Settings->WriteBool("LuaTools","Magnification",CheckBox11->State);

Settings->WriteBool("LuaTools","HR",CheckBox12->State);

Settings->WriteBool("LuaTools","KeplerParam",CheckBox7->State);

Settings->WriteBool("LuaTools","VirtualPad",CheckBox13->State);

Settings->WriteBool("LuaTools","Compass",CheckBox8->State);

Settings->WriteBool("LuaTools","AsteroidBelt",CheckBox63->State);

Settings->WriteBool("LuaTools","LocalTime",CheckBox14->State);

Settings->WriteBool("LuaTools","CenterCompass",CheckBox15->State);

Settings->WriteBool("LuaTools","AltAzimuthal",CheckBox16->State);

Settings->WriteInteger("LuaTools","DateFormat",ComboBox2->ItemIndex);

Settings->WriteString("LuaTools","GotoDuration",Edit4->Text);

if(LuaTab->Caption.Pos("Lua Universal Tools"))

Settings->WriteInteger("LuaTools","ColorScheme",RadioGroup1->ItemIndex);

}

Temp=MessegesLocale[10]+" "+ExportDialog->FileName;

Application->MessageBox(Temp.c_str(), Application->Title.c_str(), MB_OK | MB_ICONINFORMATION);

}

}

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

void __fastcall TMainForm::Label8MouseLeave(TObject *Sender)

{

Label8->Font->Style = TFontStyles() >> fsUnderline;

}

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

void __fastcall TMainForm::Label8MouseMove(TObject *Sender, TShiftState Shift, int X,

int Y)

{

Label8->Font->Style = TFontStyles() << fsUnderline;

}

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

void __fastcall TMainForm::Label8Click(TObject *Sender)

{

ShellExecute(Handle, NULL, LinkLocale[6].c_str(), NULL, NULL, SW_SHOWNORMAL);

}

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

void __fastcall TMainForm::Label13MouseLeave(TObject *Sender)

{

Label13->Font->Style = TFontStyles() >> fsUnderline;

}

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

void __fastcall TMainForm::Label13MouseMove(TObject *Sender, TShiftState Shift, int X,

int Y)

{

Label13->Font->Style = TFontStyles() << fsUnderline;

}

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

void __fastcall TMainForm::Label13Click(TObject *Sender)

{

ShellExecute(Handle, NULL, LinkLocale[3].c_str(), NULL, NULL, SW_SHOWNORMAL);

}

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

void __fastcall TMainForm::Link1MouseLeave(TObject *Sender)

{

Link1->Font->Style = TFontStyles() >> fsUnderline << fsBold;

}

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

void __fastcall TMainForm::Link1MouseMove(TObject *Sender, TShiftState Shift, int X,

int Y)

{

Link1->Font->Style = TFontStyles() << fsUnderline << fsBold;

}

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

void __fastcall TMainForm::Link1Click(TObject *Sender)

{

ShellExecute(Handle, NULL, Link[1].c_str(), NULL, NULL, SW_SHOWNORMAL);

}

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

void __fastcall TMainForm::Link2MouseLeave(TObject *Sender)

{

Link2->Font->Style = TFontStyles() >> fsUnderline << fsBold;

}

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

void __fastcall TMainForm::Link2MouseMove(TObject *Sender, TShiftState Shift, int X,

int Y)

{

Link2->Font->Style = TFontStyles() << fsUnderline << fsBold;

}

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

void __fastcall TMainForm::Link2Click(TObject *Sender)

{

ShellExecute(Handle, NULL, Link[2].c_str(), NULL, NULL, SW_SHOWNORMAL);

}

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

void __fastcall TMainForm::Link3MouseLeave(TObject *Sender)

{

Link3->Font->Style = TFontStyles() >> fsUnderline << fsBold;

}

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

void __fastcall TMainForm::Link3MouseMove(TObject *Sender, TShiftState Shift, int X,

int Y)

{

Link3->Font->Style = TFontStyles() << fsUnderline << fsBold;

}

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

void __fastcall TMainForm::Link3Click(TObject *Sender)

{

ShellExecute(Handle, NULL, Link[3].c_str(), NULL, NULL, SW_SHOWNORMAL);

}

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

void __fastcall TMainForm::Link4MouseLeave(TObject *Sender)

{

Link4->Font->Style = TFontStyles() >> fsUnderline << fsBold;

}

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

void __fastcall TMainForm::Link4MouseMove(TObject *Sender, TShiftState Shift, int X,

int Y)

{

Link4->Font->Style = TFontStyles() << fsUnderline << fsBold;

}

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

void __fastcall TMainForm::Link4Click(TObject *Sender)

{

ShellExecute(Handle, NULL, Link[4].c_str(), NULL, NULL, SW_SHOWNORMAL);

}

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

void __fastcall TMainForm::Label15MouseLeave(TObject *Sender)

{

Label15->Font->Style = TFontStyles() >> fsUnderline;

}

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

void __fastcall TMainForm::Label15MouseMove(TObject *Sender, TShiftState Shift, int X,

int Y)

{

Label15->Font->Style = TFontStyles() << fsUnderline;

}

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

void __fastcall TMainForm::Label15Click(TObject *Sender)

{

ShellExecute(Handle, NULL, LinkLocale[5].c_str(), NULL, NULL, SW_SHOWNORMAL);

}

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

void __fastcall TMainForm::Label33MouseLeave(TObject *Sender)

{

Label33->Font->Style = TFontStyles() >> fsUnderline;

}

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

void __fastcall TMainForm::Label33MouseMove(TObject *Sender, TShiftState Shift, int X,

int Y)

{

Label33->Font->Style = TFontStyles() << fsUnderline;

}

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

void __fastcall TMainForm::Label33Click(TObject *Sender)

{

ShellExecute(Handle, NULL, LinkLocale[4].c_str(), NULL, NULL, SW_SHOWNORMAL);

}

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

void TMainForm::HSatRingsProv(String Path, TCheckBox *Check)

{

if (FileExists(ExtractFilePath(Application->ExeName)+Path))

{

TStringList *List = new TStringList;

List->LoadFromFile(ExtractFilePath(Application->ExeName)+Path);

if(List->Strings[10] == "diffuse 0.46 0.46 0.42" && List->Strings[11] == "opacity 0.008")

Check->Checked=false;

else

Check->Checked=true;

delete List;

}

else

{

Check->Checked=false;

Check->Enabled=false;

}

}

void TMainForm::HSatRingsSave(String Path, TCheckBox *Check)

{

if (FileExists(ExtractFilePath(Application->ExeName)+Path))

{

TStringList *List = new TStringList;

List->LoadFromFile(ExtractFilePath(Application->ExeName)+Path);

if(Check->Checked==true)

{

List->Strings[10] = "diffuse 1 0 0";

List->Strings[11] = "opacity 0.125";

}

else

{

List->Strings[10] = "diffuse 0.46 0.46 0.42";

List->Strings[11] = "opacity 0.008";

}

List->SaveToFile(ExtractFilePath(Application->ExeName)+Path);

delete List;

}

}

void __fastcall TMainForm::HlpClick(TObject *Sender)

{

String HelpFile = ExtractFilePath(Application->ExeName)+"manager\\help\\"+Language+".chm";

if(FileExists(HelpFile))

ShellExecute(Handle, NULL, HelpFile.c_str(), NULL, NULL, SW_SHOWNORMAL);

else

{

if(Application->MessageBox(StringsLocale[11].c_str(), Application->Title.c_str(), MB_YESNO | MB_ICONQUESTION)==IDYES)

{

HelpFile = ExtractFilePath(Application->ExeName)+"manager\\help\\English.chm";

ShellExecute(Handle, NULL, HelpFile.c_str(), NULL, NULL, SW_SHOWNORMAL);

}

}

}

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

Размещено на Allbest.ru


Подобные документы

  • Описание аппаратных и программных средств, операционной системы. Описание входной и выходной информации. Информационно-логическая модель данных. Схема взаимодействия входной и выходной информации. Расчет трудоемкости и стоимости обработки информации.

    курсовая работа [2,4 M], добавлен 05.07.2015

  • Формирование требований к системе. Описание входной и выходной информации. Концептуальное и логическое проектирование структуры и пользовательского интерфейса. Выбор средств реализации подсистемы. Реализация функциональности программного средства.

    курсовая работа [1,3 M], добавлен 28.08.2012

  • Анализ входной и выходной информации, особенности ее документационного обеспечения. Описание таблиц и их основное содержание. Методика и этапы разработки интерфейса программы и ее листинг, а также формирование инструкций пользователя и программиста.

    курсовая работа [682,7 K], добавлен 30.07.2015

  • Создание баз данных с использованием Database Desktop. Проведение автоматизации рабочего места кассира. Описание входной и выходной информации. Выбор среды реализации, состава и параметров технических средств. Проектирование интерфейса программы.

    курсовая работа [1021,5 K], добавлен 22.01.2015

  • Организационно-экономическая сущность задачи автоматизации библиотечной информационной системы. Режимы работы и информационная модель решения задачи, описание входной и выходной информации. Обоснование выбора языка программирования, алгоритм решения.

    дипломная работа [448,5 K], добавлен 08.11.2010

  • Анализ используемой системы обработки информации на предприятии, ее структура и анализ эффективности функционирования. Содержание и принципы организации входной и выходной информации. Аппаратные и программные средства обеспечения, описание интерфейса.

    дипломная работа [1,1 M], добавлен 24.08.2016

  • Создание Win-приложения для библиотеки, которое позволяло бы осуществлять операции выдачи и сдачи книг в соответствии со сроками. Выбор программных и технических средств реализации проекта. Разработка интерфейса системы, описание реализованных классов.

    курсовая работа [3,1 M], добавлен 14.08.2015

  • Создание официального сайта КРОО ПСЗЗ "Красштаб Здоровья". Основные требования к дизайну, интерфейсу и функциональности сайта. Состав технических средств, защита информации. Описание входной и выходной информации. Расчет себестоимости разработки.

    дипломная работа [1,4 M], добавлен 11.05.2017

  • Организационная структура предприятия. Функциональные задачи, подлежащие автоматизации. Выбор технических, программных средств и метода проектирования. Описание алгоритма решения задачи. Разработка технологического обеспечения. Инструкция пользователя.

    дипломная работа [5,3 M], добавлен 31.03.2009

  • Проектирование процесса автоматизации оформления продаж автомобилей в автосалоне. Описание бизнес-процессов учета автомобилей. Исследование информационных потоков. Анализ входной и выходной информации. Алгоритмы решения задачи и их машинная реализация.

    курсовая работа [2,9 M], добавлен 11.03.2014

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.