david
3b29f73ece
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@8 05c56307-c608-d34a-929d-697000501d7a
39 lines
1.4 KiB
C++
39 lines
1.4 KiB
C++
//---------------------------------------------------------------------------
|
|
|
|
#include <vcl.h>
|
|
#pragma hdrstop
|
|
|
|
#include "RibbonNotepadDemoOptions.h"
|
|
//---------------------------------------------------------------------------
|
|
#pragma package(smart_init)
|
|
#pragma resource "*.dfm"
|
|
TRibbonDemoOptionsForm *RibbonDemoOptionsForm;
|
|
//---------------------------------------------------------------------------
|
|
__fastcall TRibbonDemoOptionsForm::TRibbonDemoOptionsForm(TComponent* Owner)
|
|
: TForm(Owner)
|
|
{
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
bool __fastcall TRibbonDemoOptionsForm::GetOptions(String &AColorSchemeName, TScreenTipOptions &AScreenTipOptions)
|
|
{
|
|
cbColorScheme->ItemIndex = cbColorScheme->Items->IndexOf(AColorSchemeName);
|
|
if (AScreenTipOptions.ShowScreenTips)
|
|
if (AScreenTipOptions.ShowDescripitons)
|
|
cbScreenTipStyle->ItemIndex = 0;
|
|
else
|
|
cbScreenTipStyle->ItemIndex = 1;
|
|
else
|
|
cbScreenTipStyle->ItemIndex = 2;
|
|
|
|
bool Result = ShowModal() == mrOk;
|
|
|
|
if (Result)
|
|
{
|
|
AColorSchemeName = cbColorScheme->Text;
|
|
AScreenTipOptions.ShowScreenTips = (cbScreenTipStyle->ItemIndex != 2);
|
|
AScreenTipOptions.ShowDescripitons = (cbScreenTipStyle->ItemIndex == 0);
|
|
};
|
|
return (Result);
|
|
}
|
|
//---------------------------------------------------------------------------
|