-------------------------------__fastcall TMainForm :: Label32Click (TObject * Sender)
{(Handle, NULL, LinkLocale [1]. c_str (), NULL, NULL, SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------__fastcall TMainForm :: Button4Click (TObject * Sender)
{(ExportDialog-> Execute ())
{
/ / Основні=new TIniFile(ExportDialog->FileName);>WriteString(«Main»,«ExtrasDir1»,EditDir1->Text);>WriteString(«Main»,«ExtrasDir2»,EditDir2->Text);>WriteString(«Main»,«ExtrasDir3»,EditDir3->Text);>WriteString(«Main»,«OrbitPathSamplePoints»,Edit2->Text);>WriteString(«Main»,«RingSystemSections»,Edit3->Text);Temp;(RadioButton1->Checked==true)=«crosshair»;(RadioButton2->Checked==true)=«inverting_crosshair»;(RadioButton3->Checked==true)=«arrow»;>WriteString(«Main»,«Cursor»,Temp);>WriteString(«Main»,«ScriptScreenshotDirectory»,EditScreenDir->Text);>WriteInteger(«Main»,«ScriptSystemAccessPolicy»,ComboBox1->ItemIndex);>WriteString(«Main»,«InitScript»,EditStartScript->Text);>WriteString(«Main»,«DemoScript»,EditDemoScript->Text);>WriteString(«Main»,«RotateAcceleration»,Edit5->Text);>WriteString(«Main»,«MouseRotationSensitivity»,Edit1->Text);
/ / Об'єкти і время>WriteBool(«ObjectsTime»,«SunFlares»,CheckBox1->State);>WriteBool(«ObjectsTime»,«JupiterRings»,CheckBox2->State);>WriteBool(«ObjectsTime»,«MarsSurfaceFeatures»,CheckBox10->State);>WriteBool(«ObjectsTime»,«KuiperBelt»,CheckBox17->State);>WriteBool(«ObjectsTime»,«JupiterClouds»,CheckBox18->State);>WriteBool(«ObjectsTime»,«IoVolcanoes»,CheckBox19->State);>WriteBool(«ObjectsTime»,«SpaceLift»,CheckBox20->State);>WriteBool(«ObjectsTime»,«OortCloud»,CheckBox61->State);>WriteBool(«ObjectsTime»,«HighlightSaturnRings»,CheckBox62->State);
/ / Космічні аппараты>WriteBool(«Spacecrafts»,«Mir»,CheckBox9->State);>WriteBool(«Spacecrafts»,«Galileo»,CheckBox3->State);>WriteBool(«Spacecrafts»,«CassiniHuygens»,CheckBox23->State);>WriteB...
