home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 April / Chip_1997-04_cd.bin / prezent / cb / data.z / MAINFORM.DFM / MAINFORM.txt
Text File  |  1997-01-16  |  2KB  |  84 lines
  1. object Form1: TForm1
  2.   Left = 200
  3.   Top = 114
  4.   AutoScroll = False
  5.   Caption = 'Message Map'
  6.   ClientHeight = 319
  7.   ClientWidth = 342
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   Position = poScreenCenter
  13.   OnResize = FormResize
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object Label1: TLabel
  17.     Left = 35
  18.     Top = 176
  19.     Width = 50
  20.     Height = 19
  21.     Caption = 'Width:'
  22.     Font.Charset = ANSI_CHARSET
  23.     Font.Color = clBlack
  24.     Font.Height = -16
  25.     Font.Name = 'Arial'
  26.     Font.Style = [fsBold]
  27.     ParentFont = False
  28.   end
  29.   object Label3: TLabel
  30.     Left = 35
  31.     Top = 208
  32.     Width = 56
  33.     Height = 19
  34.     Caption = 'Height:'
  35.     Font.Charset = ANSI_CHARSET
  36.     Font.Color = clBlack
  37.     Font.Height = -16
  38.     Font.Name = 'Arial'
  39.     Font.Style = [fsBold]
  40.     ParentFont = False
  41.   end
  42.   object Label2: TLabel
  43.     Left = 112
  44.     Top = 176
  45.     Width = 27
  46.     Height = 19
  47.     Caption = '350'
  48.     Font.Charset = ANSI_CHARSET
  49.     Font.Color = clBlack
  50.     Font.Height = -16
  51.     Font.Name = 'Arial'
  52.     Font.Style = [fsBold]
  53.     ParentFont = False
  54.   end
  55.   object Label4: TLabel
  56.     Left = 112
  57.     Top = 208
  58.     Width = 27
  59.     Height = 19
  60.     Caption = '350'
  61.     Font.Charset = ANSI_CHARSET
  62.     Font.Color = clBlack
  63.     Font.Height = -16
  64.     Font.Name = 'Arial'
  65.     Font.Style = [fsBold]
  66.     ParentFont = False
  67.   end
  68.   object Memo1: TMemo
  69.     Left = 18
  70.     Top = 24
  71.     Width = 305
  72.     Height = 121
  73.     Lines.Strings = (
  74.       'This example uses the message map macros defined in '
  75.       'VCL\SYSDEFS.H to trap the WM_GETMINMAXINFO '
  76.       'message.  Look at the TForm1 class definition in MAINFORM.H '
  77.       'for the message map.  The WM_GETMINMAXINFO is mapped '
  78.       'to the RestrictSize() function, which forces the Width and '
  79.       'Height of the form to remain between 300 and 400.')
  80.     ReadOnly = True
  81.     TabOrder = 0
  82.   end
  83. end
  84.