unit1.~dfm

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

object frmMain: TfrmMain
  Left = 192
  Top = 107
  Width = 216
  Height = 193
  Caption = 'ShellLink'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object btnDesktop: TButton
    Left = 24
    Top = 24
    Width = 161
    Height = 25
    Caption = #22312#26700#38754#19978#24314#31435#24555#25463#26041#24335
    TabOrder = 0
    OnClick = btnDesktopClick
  end
  object btnProgram: TButton
    Left = 24
    Top = 72
    Width = 161
    Height = 25
    Caption = #22312#31243#24207#32452#20013#24314#31435#24555#25463#26041#24335
    TabOrder = 1
    OnClick = btnProgramClick
  end
  object btnStartup: TButton
    Left = 24
    Top = 120
    Width = 161
    Height = 25
    Caption = #22312#21551#21160#33756#21333#20013#24314#31435#24555#25463#26041#24335
    TabOrder = 2
    OnClick = btnStartupClick
  end
end