GeneralSettings.cpp 1.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  4. #include "GeneralSettings.h"
  5. #include <Common.h>
  6. #include <Configuration.h>
  7. #include <CoreMain.h>
  8. #include "CustomWinConfiguration.h"
  9. //---------------------------------------------------------------------------
  10. #pragma package(smart_init)
  11. #pragma resource "*.dfm"
  12. //---------------------------------------------------------------------------
  13. __fastcall TGeneralSettingsFrame::TGeneralSettingsFrame(TComponent* Owner)
  14. : TFrame(Owner)
  15. {
  16. }
  17. //---------------------------------------------------------------------------
  18. void __fastcall TGeneralSettingsFrame::CommanderClick(TObject * /*Sender*/)
  19. {
  20. CommanderInterfaceButton->SetFocus();
  21. }
  22. //---------------------------------------------------------------------------
  23. void __fastcall TGeneralSettingsFrame::ExplorerClick(TObject * /*Sender*/)
  24. {
  25. ExplorerInterfaceButton->SetFocus();
  26. }
  27. //---------------------------------------------------------------------------
  28. void __fastcall TGeneralSettingsFrame::SaveConfiguration()
  29. {
  30. assert(CustomWinConfiguration);
  31. CustomWinConfiguration->Interface = CommanderInterfaceButton->Checked ?
  32. ifCommander : ifExplorer;
  33. }
  34. //---------------------------------------------------------------------------
  35. void __fastcall TGeneralSettingsFrame::LoadConfiguration()
  36. {
  37. assert(CustomWinConfiguration);
  38. switch (CustomWinConfiguration->Interface) {
  39. case ifCommander: CommanderInterfaceButton->Checked = True; break;
  40. case ifExplorer: ExplorerInterfaceButton->Checked = True; break;
  41. default: assert(false); break;
  42. }
  43. }