jvcl: Fix compilation on non-Windows OS (unit uxThemes not needed), issue #33476

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6265 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2018-03-23 08:46:50 +00:00
parent c3a0621532
commit 244eca2cc8
6 changed files with 9 additions and 20 deletions

View File

@ -25,26 +25,17 @@ Known Issues:
unit JvThemes;
{$mode objfpc}{$H+}
{$DEFINE JVCLThemesEnabled}
{$DEFINE JVCLThemesEnabled}
{$DEFINE COMPILER7_UP}
(*
{$I jvcl.inc}
{$IFDEF JVCLThemesEnabled}
{$I windowsonly.inc}
{$ENDIF JVCLThemesEnabled}
*)
interface
uses
{
Windows, Messages, CommCtrl,
}
Types, SysUtils, Classes, Contnrs,
{$IFDEF JVCLThemesEnabled}
Themes, UxTheme,
Themes,
{$ENDIF JVCLThemesEnabled}
Controls, Forms, Graphics, Buttons;

View File

@ -109,9 +109,9 @@ unit JvHtControls;
interface
uses
SysUtils, Classes,
{LMessages,} Graphics, {Contnrs,} Controls, StdCtrls, Dialogs,
JvJVCLUtils, {JvDataSourceIntf,} Types, LCLType{, JvExStdCtrls};
LCLType, {LMessages,} Types,
SysUtils, Classes, Graphics, {Contnrs,} Controls, StdCtrls, Dialogs,
JvJVCLUtils {JvDataSourceIntf, JvExStdCtrls} ;
const
DefaultSuperSubScriptRatio: Double = 2/3;

View File

@ -184,7 +184,7 @@ function ReplaceAllStr(const Str, SearchFor, ReplaceWith: string;
implementation
uses
SysUtils, Types, //LazFileUtils,
SysUtils, Types,
JvJCLUtils, JvThemes;
function ReplaceAllStr(const Str, SearchFor, ReplaceWith: string;

View File

@ -32,7 +32,6 @@ interface
uses
LCLIntf, LCLType, LMessages, Types,
// Windows, Messages,
Graphics, Controls, Forms, ImgList, Menus, Buttons,
ExtCtrls, SysUtils, Classes, Contnrs, Themes;

View File

@ -32,9 +32,7 @@ unit JvMarkupLabel;
interface
uses
//Messages,
Graphics, Controls,
SysUtils, Classes,
Graphics, Controls, SysUtils, Classes,
JvMarkupCommon;
type

View File

@ -9,7 +9,8 @@ uses
{$IFDEF UNITVERSIONING}
JclUnitVersioning,
{$ENDIF UNITVERSIONING}
SysUtils, LCLProc, LCLType, LResources, LCLIntf, LMessages, Classes, Controls, Graphics, Forms, dialogs;
SysUtils, LCLProc, LCLType, LResources, LCLIntf, LMessages,
Classes, Controls, Graphics, Forms, dialogs;
type
TDesignerDCFlag = (