paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-01 02:00:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

AJ: Initial TUpDown, minor property additions to improve reading Delphi created forms.

Browse Source 
git-svn-id: trunk@2675 -
This commit is contained in:
lazarus 2002-08-18 04:56:40 +00:00
parent d13856fc47
commit 7c8126d01e
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/graphics.pp
View File

@ -893,6 +893,7 @@ end;
initialization
RegisterIntegerConsts(TypeInfo(TColor), @IdentToColor, @ColorToIdent);
RegisterIntegerConsts(TypeInfo(TFontCharset), @IdentToCharset, @CharsetToIdent);
finalization
GraphicsFinalized:=true;
@ -905,6 +906,9 @@ end.
{ =============================================================================
$Log$
Revision 1.48 2002/10/01 18:00:03 lazarus
AJ: Initial TUpDown, minor property additions to improve reading Delphi created forms.
Revision 1.47 2002/09/27 20:52:21 lazarus
MWE: Applied patch from "Andrew Johnson" <aj_genius@hotmail.com>