69 lines
2.8 KiB
C++
69 lines
2.8 KiB
C++
// CodeGear C++Builder
|
|
// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
|
|
// All rights reserved
|
|
|
|
// (DO NOT EDIT: machine generated header) 'iexThemes.pas' rev: 37.00 (Windows)
|
|
|
|
#ifndef iexThemesHPP
|
|
#define iexThemesHPP
|
|
|
|
#pragma delphiheader begin
|
|
#pragma option push
|
|
#if defined(__BORLANDC__) && !defined(__clang__)
|
|
#pragma option -w- // All warnings off
|
|
#pragma option -Vx // Zero-length empty class member
|
|
#endif
|
|
#pragma pack(push,8)
|
|
#include <System.hpp>
|
|
#include <SysInit.hpp>
|
|
#include <Vcl.Forms.hpp>
|
|
#include <Winapi.Messages.hpp>
|
|
#include <Vcl.Controls.hpp>
|
|
#include <Winapi.Windows.hpp>
|
|
#include <Vcl.Themes.hpp>
|
|
#include <Vcl.Graphics.hpp>
|
|
|
|
//-- user supplied -----------------------------------------------------------
|
|
|
|
namespace Iexthemes
|
|
{
|
|
//-- forward type declarations -----------------------------------------------
|
|
class DELPHICLASS TImageEnStyleHook;
|
|
//-- type declarations -------------------------------------------------------
|
|
class PASCALIMPLEMENTATION TImageEnStyleHook : public Vcl::Forms::TScrollingStyleHook
|
|
{
|
|
typedef Vcl::Forms::TScrollingStyleHook inherited;
|
|
|
|
private:
|
|
void __fastcall UpdateColors();
|
|
|
|
protected:
|
|
virtual void __fastcall WndProc(Winapi::Messages::TMessage &Message);
|
|
|
|
public:
|
|
__fastcall virtual TImageEnStyleHook(Vcl::Controls::TWinControl* AControl);
|
|
public:
|
|
/* TScrollingStyleHook.Destroy */ inline __fastcall virtual ~TImageEnStyleHook() { }
|
|
|
|
};
|
|
|
|
|
|
enum DECLSPEC_DENUM TIEThemePart : unsigned char { ietpControlBackground, ietpControlBackgroundDisabled, ietpControlBackgroundGradientEnd, ietpControlBorder, ietpThumbCellBackground, ietpThumbCellBackgroundSelected, ietpThumbCellBackgroundDisabledSelected, ietpThumbCellBorder, ietpThumbCellBorderSelected, ietpThumbCellBorderDisabled, ietpThumbCellFont, ietpThumbCellFontSelected, ietpThumbCellFontDisabled, ietpRuler, ietpRulerBackground, ietpRulerText, ietpRulerBorder, ietpRulerGripFill, ietpRulerGripBorder, ietpPanel };
|
|
|
|
//-- var, const, procedure ---------------------------------------------------
|
|
static _DELPHI_CONST int clExplorer_Selection_Background_Color = int(0xfceada);
|
|
static _DELPHI_CONST int clExplorer_Selection_Border_Color = int(0xcea27d);
|
|
extern DELPHI_PACKAGE System::Uitypes::TColor __fastcall GetThemeColor(TIEThemePart Part, System::Uitypes::TColor DefaultColor, bool ForceThemed = false);
|
|
extern DELPHI_PACKAGE Vcl::Themes::TCustomStyleServices* __fastcall IEStyleServices(void);
|
|
extern DELPHI_PACKAGE bool __fastcall IEStyleServices_Enabled(void);
|
|
} /* namespace Iexthemes */
|
|
#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_IEXTHEMES)
|
|
using namespace Iexthemes;
|
|
#endif
|
|
#pragma pack(pop)
|
|
#pragma option pop
|
|
|
|
#pragma delphiheader end.
|
|
//-- end unit ----------------------------------------------------------------
|
|
#endif // iexThemesHPP
|