From 72b1bbfb8854af206bcb01ab4aab9737088fdcca Mon Sep 17 00:00:00 2001 From: dkolmck Date: Wed, 19 Aug 2009 08:53:11 +0000 Subject: [PATCH] DefFont.FontHeight = -11 git-svn-id: https://svn.code.sf.net/p/kolmck/code@15 91bb2d04-0c0c-4d2d-88a5-bbb6f4c1fa07 --- KOL.pas | 2 +- KOLMCK10.bdsproj | 333 ++++++++++++++++++++--------------------- MCKfakeClasses200x.inc | 4 +- whatsnew.txt | 5 + 4 files changed, 175 insertions(+), 169 deletions(-) diff --git a/KOL.pas b/KOL.pas index 4f4e70c..c76aa3c 100644 --- a/KOL.pas +++ b/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; diff --git a/KOLMCK10.bdsproj b/KOLMCK10.bdsproj index 50ca35a..e6dc644 100644 --- a/KOLMCK10.bdsproj +++ b/KOLMCK10.bdsproj @@ -1,172 +1,171 @@  - - - - - - - - - - KOLMCK10.dpk - - - 7.0 - - - 8 - 0 - 1 - 1 - 0 - 0 - 1 - 1 - 1 - 0 - 0 - 1 - 0 - 1 - 1 - 1 - 0 - 0 - 0 - 0 - 0 - 1 - 0 - 1 - 1 - 1 - True - True - WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; - - False - - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - False - False - False - True - True - True - True - True - True - - - - 0 - 0 - False - 1 - False - False - False - 16384 - 1048576 - 4194304 - KOLMCK10 - - - - D2006 - - - - - INPACKAGE - - False - - - - - - False - - - True - False - - - True - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 1049 - 1251 - - - - - 1.0.0.0 - - - - - - 1.0.0.0 - - - + + + + + + + + + + KOLMCK10.dpk + + + 7.0 + + + 8 + 0 + 1 + 1 + 0 + 0 + 1 + 1 + 1 + 0 + 0 + 1 + 0 + 1 + 1 + 1 + 0 + 0 + 0 + 0 + 0 + 1 + 0 + 1 + 1 + 1 + True + True + WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; + + False + + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + True + False + False + False + True + True + True + True + True + True + + + + 0 + 0 + False + 1 + False + False + False + 16384 + 1048576 + 4194304 + KOLMCK10 + + + + D2006 + + + + + INPACKAGE + + False + + + + + + False + + + True + False + + + True + False + 1 + 0 + 0 + 0 + False + False + False + False + False + 1049 + 1251 + + + + + 1.0.0.0 + + + + + + 1.0.0.0 + + Borland User Components Borland Sample Components diff --git a/MCKfakeClasses200x.inc b/MCKfakeClasses200x.inc index aeca756..53aed52 100644 --- a/MCKfakeClasses200x.inc +++ b/MCKfakeClasses200x.inc @@ -1,3 +1,4 @@ +{$IFNDEF INPACKAGE} type TKOLProject = Pointer; TKOLApplet = Pointer; @@ -46,4 +47,5 @@ type TKOLColorDialog = PColorDialog; //TKOLActionList = PActionList; //TKOLAction = PAction; - TKOLScrollBar = PControl; \ No newline at end of file + TKOLScrollBar = PControl; +{$ENDIF} \ No newline at end of file diff --git a/whatsnew.txt b/whatsnew.txt index 665530f..4d768a0 100644 --- a/whatsnew.txt +++ b/whatsnew.txt @@ -1,3 +1,8 @@ +------------------------------------------------------------------- +19.08.09 +------------------------------------------------------------------- +DefFont.FontHeight := -11; + ------------------------------------------------------------------- 9.08.09 -------------------------------------------------------------------