Реферат Створення менеджера конфігурації Celestia

or=«,»;

}

//---------------------------------------------------------------------------__fastcall TMainForm :: Edit1Change (TObject * Sender)

{-> Color=clWindow; -> Font-> Color=clWindowText;

}

//---------------------------------------------------------------------------__fastcall TMainForm :: Edit1Click (TObject * Sender)

{-> Color=clWindow; -> Font-> Color=clWindowText;

}

//---------------------------------------------------------------------------__fastcall TMainForm :: Edit4Change (TObject * Sender)

{-> Color=clWindow; -> Font-> Color=clWindowText;

}

//---------------------------------------------------------------------------__fastcall TMainForm :: Edit4Click (TObject * Sender)

{-> Color=clWindow; -> Font-> Color=clWindowText;

}

//---------------------------------------------------------------------------__fastcall TMainForm :: Edit4KeyPress (TObject * Sender, char & Key)

{(Key>=«0» && Key <= «9» | | Key == VK_BACK);=0;

}

//---------------------------------------------------------------------------__fastcall TMainForm :: CheckBox16Click (TObject * Sender)

{(CheckBox16-&gt;Checked)-&gt;Caption=StringsLocale[9];-&gt;Caption=StringsLocale[10];

}

//---------------------------------------------------------------------------__fastcall TMainForm :: Button2Click (TObject * Sender)

{(PlayerDialog-> Execute ())

{

PlayerEdit-> Text=PlayerDialog-> FileName;

}

}

//---------------------------------------------------------------------------__fastcall TMainForm :: CheckBox22Click (TObject * Sender)

{(CheckBox22-> Checked == true) (true); (false);

}

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

/ / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /// / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /

/ / НОВІ ФУНКЦІЇ / /

/ / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /// / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /

/ / Перевірка вкладки Об'єкти і времяTMainForm :: ObjectProv (String PodFolder, String Folder, String SSC, TCheckBox * Check)

{(FileExists(ExtractFilePath(Application-&gt;ExeName)+PodFolder+Folder+&laquo;"+SSC) | | FileExists (ExtractFilePath (Application-> ExeName) + »temp « + Folder + »" + SSC))

{&gt;Enabled=true;(FileExists(ExtractFilePath(Application-&gt;ExeName)+PodFolder+Folder+""+SSC))&gt;Checked=true;&gt;Checked=false;

}

{> Checked=false;> Enabled=false;

/ / Додає...