mainunit.dfm

来自「OPC服务器及客户端编程」· DFM 代码 · 共 82 行

object Form1: TForm1
  Left = 659
  Top = 350
  Width = 203
  Height = 129
  Caption = 'Wizzy Client'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 120
  TextHeight = 16
  object WidthShrinkButton: TSpeedButton
    Left = 16
    Top = 32
    Width = 23
    Height = 22
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      8888088888888888888000888888888888000008888888888000000088888888
      0000000008888880000000000088880000000000000880000000000000088000
      0000000000888800000000000888888000000000888888880000000888888888
      8000008888888888880008888888888888808888888888888888}
    OnClick = WidthShrinkButtonClick
  end
  object WidthGrowButton: TSpeedButton
    Left = 64
    Top = 32
    Width = 23
    Height = 22
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      8888888888088088888888888008800888888888000880008888888000088000
      0888880000088000008880000008800000080000000880000000000000088000
      0000800000088000000888000008800000888880000880000888888800088000
      8888888880088008888888888808808888888888888888888888}
    OnClick = WidthGrowButtonClick
  end
  object HeightShrinkButton: TSpeedButton
    Left = 40
    Top = 56
    Width = 23
    Height = 22
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00800000000000
      0008880000000000008888800000000008888888000000008888888880000008
      8888888888000088888888888880088888888888888888888888888888888888
      8888888888800888888888888800008888888888800000088888888800000000
      8888888000000000088888000000000000888000000000000008}
    OnClick = HeightShrinkButtonClick
  end
  object HeightGrowButton: TSpeedButton
    Left = 40
    Top = 8
    Width = 23
    Height = 22
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888800888
      8888888888000088888888888000000888888888000000008888888000000000
      0888880000000000008880000000000000088888888888888888888888888888
      8888800000000000000888000000000000888880000000000888888800000000
      8888888880000008888888888800008888888888888008888888}
    OnClick = HeightGrowButtonClick
  end
end