GitHub-Mirror
/
x2cl
mirror of
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Delphi XE2 compatibility

This commit is contained in:
Mark van Renswoude 2013-12-06 13:08:57 +00:00
parent 78f2b65e9c
commit 9ffd13c06e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Packages/X2CLMenuBarEditor.pas
View File

@ -120,13 +120,13 @@ end;
procedure TfrmMenuBarEditor.FormCreate(Sender: TObject);
begin
{$IFDEF VER180}
{$IF CompilerVersion >= 18}
// Delphi (BDS) 2006
tbMenu.EdgeBorders := [];
tbMenu.DrawingStyle := dsGradient;
{$ELSE}
tbMenu.Flat := True;
{$ENDIF}
{$IFEND}
end;