Cause of sometimes 'invalid floating point' message

2005-03-23 13:28:13 +00:00
parent c9b167ae79
commit b53b214b20
3 changed files with 38 additions and 17 deletions
--- a/2.02g/Source/Adjust.dfm
+++ b/2.02g/Source/Adjust.dfm
@ -57,6 +57,9 @@ object AdjustForm: TAdjustForm
    BevelOuter = bvLowered
    Color = clAppWorkSpace
    TabOrder = 0
+    DesignSize = (
+      162
+      122)
    object PreviewImage: TImage
      Left = 1
      Top = 1
@ -312,7 +315,6 @@ object AdjustForm: TAdjustForm
    end
  end
  object ColorDialog: TColorDialog
-    Ctl3D = True
    Options = [cdFullOpen]
    Left = 376
    Top = 8