GitHub-Mirror/x2cl
1
0
Fork 0
mirror of synced 2024-11-14 15:03:50 +00:00
Code Issues Projects Releases Wiki Activity

Delphi XE2 compatibility

Browse Source
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); procedure TfrmMenuBarEditor.FormCreate(Sender: TObject);
begin begin
{$IFDEF VER180} {$IF CompilerVersion >= 18}
// Delphi (BDS) 2006 // Delphi (BDS) 2006
tbMenu.EdgeBorders := []; tbMenu.EdgeBorders := [];
tbMenu.DrawingStyle := dsGradient; tbMenu.DrawingStyle := dsGradient;
{$ELSE} {$ELSE}
tbMenu.Flat := True; tbMenu.Flat := True;
{$ENDIF} {$IFEND}
end; end;