unit1.~dfm

《Delphi 7应用编程150例》源码（全）

object frmMain: TfrmMain
  Left = 192
  Top = 107
  Width = 497
  Height = 210
  Caption = 'GIF'
  Color = cl3DLight
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 16
  object WebBrowser1: TWebBrowser
    Left = 8
    Top = 8
    Width = 473
    Height = 129
    ParentShowHint = False
    ShowHint = False
    TabOrder = 0
    ControlData = {
      4C000000E3300000550D00000000000000000000000000000000000000000000
      000000004C000000000000000000000001000000E0D057007335CF11AE690800
      2B2E126209000000000000004C0000000114020000000000C000000000000046
      8000000000000000000000000000000000000000000000000000000000000000
      00000000000000000100000000000000000000000000000000000000}
  end
  object btnOpen: TButton
    Left = 8
    Top = 144
    Width = 113
    Height = 33
    Caption = #25171#24320
    TabOrder = 1
    OnClick = btnOpenClick
  end
  object OpenDialog1: TOpenDialog
    Filter = 'GIF'#21160#30011#25991#20214'(*.gif)|*.gif'
    Left = 200
    Top = 64
  end
end