DefFont.FontHeight = -11
git-svn-id: https://svn.code.sf.net/p/kolmck/code@15 91bb2d04-0c0c-4d2d-88a5-bbb6f4c1fa07
This commit is contained in:
2
KOL.pas
2
KOL.pas
@@ -2347,7 +2347,7 @@ function Color2Color15( Color: TColor ): WORD;
|
||||
//[DefFont VARIABLE]
|
||||
var // New TFont instances are intialized with the values in this structure:
|
||||
DefFont: TGDIFont = (
|
||||
Height: 0;
|
||||
Height: -11;
|
||||
Width: 0;
|
||||
Escapement: 0;
|
||||
Orientation: 0;
|
||||
|
@@ -165,8 +165,7 @@
|
||||
<VersionInfoKeys Name="ProductName"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
|
||||
<VersionInfoKeys Name="Comments"></VersionInfoKeys>
|
||||
</VersionInfoKeys>
|
||||
<Excluded_Packages>
|
||||
</VersionInfoKeys> <Excluded_Packages>
|
||||
<Excluded_Packages Name="d:\Portable\TurboDelphi\Projects\Bpl\dclusr100.bpl">Borland User Components</Excluded_Packages>
|
||||
<Excluded_Packages Name="d:\Portable\TurboDelphi\Bin\dclsmp100.bpl">Borland Sample Components</Excluded_Packages>
|
||||
</Excluded_Packages>
|
||||
|
@@ -1,3 +1,4 @@
|
||||
{$IFNDEF INPACKAGE}
|
||||
type
|
||||
TKOLProject = Pointer;
|
||||
TKOLApplet = Pointer;
|
||||
@@ -47,3 +48,4 @@ type
|
||||
//TKOLActionList = PActionList;
|
||||
//TKOLAction = PAction;
|
||||
TKOLScrollBar = PControl;
|
||||
{$ENDIF}
|
@@ -1,3 +1,8 @@
|
||||
-------------------------------------------------------------------
|
||||
19.08.09
|
||||
-------------------------------------------------------------------
|
||||
DefFont.FontHeight := -11;
|
||||
|
||||
-------------------------------------------------------------------
|
||||
9.08.09
|
||||
-------------------------------------------------------------------
|
||||
|
Reference in New Issue
Block a user