git-svn-id: https://svn.code.sf.net/p/kolmck/code@61 91bb2d04-0c0c-4d2d-88a5-bbb6f4c1fa07

This commit is contained in:
dkolmck
2010-04-15 13:00:34 +00:00
parent f5b39b5a0a
commit e8fdcb7c63
3 changed files with 8 additions and 21 deletions

View File

@ -1,4 +1,5 @@
unit KOLCCtrls; unit KOLCCtrls;
{$UNDEF UNICODE}
interface interface

View File

@ -340,7 +340,7 @@ begin
if Result then if Result then
begin begin
DeleteObject(Font.Handle); DeleteObject(Font.Handle);
Font.Handle := CreateFontIndirect(TMPLogFont); Font.Handle := CreateFontIndirectA(TMPLogFont);
Font.Color := Color; Font.Color := Color;
end; end;
end; end;

View File

@ -1,6 +1,7 @@
package addons_D2010; package addons_D2010;
{$R addons.res} {$R *.res}
{$R 'addons.res'}
{$R 'mckCCtrls.dcr'} {$R 'mckCCtrls.dcr'}
{$R 'mckHTTPDownload.dcr'} {$R 'mckHTTPDownload.dcr'}
{$R 'mckQProgBar.dcr'} {$R 'mckQProgBar.dcr'}
@ -24,11 +25,12 @@ package addons_D2010;
{$VARSTRINGCHECKS ON} {$VARSTRINGCHECKS ON}
{$WRITEABLECONST OFF} {$WRITEABLECONST OFF}
{$MINENUMSIZE 1} {$MINENUMSIZE 1}
{$IMAGEBASE $400000} {$IMAGEBASE $8400000}
{$DESCRIPTION 'KOLADDONS_D2010'} {$DESCRIPTION 'KOLADDONS_D2010'}
{$DESIGNONLY} {$DESIGNONLY}
{$IMPLICITBUILD ON} {$IMPLICITBUILD ON}
{$DEFINE INPACKAGE} {$DEFINE INPACKAGE}
{$DEFINE unicode_ctrls}
requires requires
rtl, rtl,
@ -40,26 +42,17 @@ requires
designide; designide;
contains contains
KOLCCtrls in 'KOLCCtrls.pas',
mckCCtrls in 'mckCCtrls.pas',
KOLHashs in 'KOLHashs.PAS', KOLHashs in 'KOLHashs.PAS',
mckHashs in 'mckHashs.pas', mckHashs in 'mckHashs.pas',
KOLFontEditor in 'KOLFontEditor.pas', KOLFontEditor in 'KOLFontEditor.pas',
KOLmhxp in 'KOLmhxp.pas', KOLmhxp in 'KOLmhxp.pas',
MCKMHXP in 'MCKMHXP.pas', MCKMHXP in 'MCKMHXP.pas',
mckTCPSocket in 'mckTCPSocket.pas',
mckSocket in 'mckSocket.pas',
mckListEdit in 'mckListEdit.pas', mckListEdit in 'mckListEdit.pas',
KOLSocket in 'KOLSocket.pas',
Objects in 'Objects.pas', Objects in 'Objects.pas',
kolTCPSocket in 'kolTCPSocket.pas',
mckCProgBar in 'mckCProgBar.pas', mckCProgBar in 'mckCProgBar.pas',
mckRarInfoBar in 'mckRarInfoBar.pas', mckRarInfoBar in 'mckRarInfoBar.pas',
mckRarProgBar in 'mckRarProgBar.pas', mckRarProgBar in 'mckRarProgBar.pas',
mckHTTP in 'mckHTTP.pas', mckHTTP in 'mckHTTP.pas',
mckRAS in 'mckRAS.pas',
KOLRas in 'KOLRas.pas',
RAS in 'RAS.pas',
UStr in 'UStr.pas', UStr in 'UStr.pas',
UWrd in 'UWrd.pas', UWrd in 'UWrd.pas',
KOLHTTP in 'KOLHTTP.pas', KOLHTTP in 'KOLHTTP.pas',
@ -81,17 +74,10 @@ contains
KOLPrinters in 'KOLPrinters.pas', KOLPrinters in 'KOLPrinters.pas',
mckXPMenus in 'mckXPMenus.pas', mckXPMenus in 'mckXPMenus.pas',
XPMenus in 'XPMenus.pas', XPMenus in 'XPMenus.pas',
MCKGRushSplitterEditor in 'MCKGRushSplitterEditor.pas',
MCKGRushButtonEditor in 'MCKGRushButtonEditor.pas',
MCKGRushCheckBoxEditor in 'MCKGRushCheckBoxEditor.pas',
MCKGRushControls in 'MCKGRushControls.pas',
MCKGRushImageCollectionEditor in 'MCKGRushImageCollectionEditor.pas',
MCKGRushPanelEditor in 'MCKGRushPanelEditor.pas',
MCKGRushProgressBarEditor in 'MCKGRushProgressBarEditor.pas',
MCKGRushRadioBoxEditor in 'MCKGRushRadioBoxEditor.pas',
tinyPNG in 'tinyPNG.pas', tinyPNG in 'tinyPNG.pas',
tinyJPGGIFBMP in 'tinyJPGGIFBMP.pas', tinyJPGGIFBMP in 'tinyJPGGIFBMP.pas',
MZLib in 'MZLib.pas', MZLib in 'MZLib.pas',
KOLGRushControls in 'KOLGRushControls.pas'; mckWebBrowser in 'mckWebBrowser.pas',
mckDHTML in 'mckDHTML.pas';
end. end.