unit1.~dfm

弹出式提示

object Form1: TForm1
  Left = 252
  Top = 150
  BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  BorderStyle = bsDialog
  Caption = 'Form1'
  ClientHeight = 348
  ClientWidth = 536
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton
    Left = 144
    Top = 56
    Width = 73
    Height = 22
    Caption = 'rolldown'
    OnClick = SpeedButton1Click
  end
  object Button1: TButton
    Left = 144
    Top = 160
    Width = 75
    Height = 25
    Caption = 'popup'
    TabOrder = 0
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 144
    Top = 112
    Width = 75
    Height = 25
    Caption = 'rollupmsg'
    TabOrder = 1
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 144
    Top = 200
    Width = 75
    Height = 25
    Caption = 'hide'
    TabOrder = 2
    OnClick = Button3Click
  end
  object Memo1: TMemo
    Left = 240
    Top = 56
    Width = 201
    Height = 201
    Lines.Strings = (
      '---- '#28216#26631#25552#20379#20102#23545#29305#23450#38598#21512#20013#36880#34892#25195#25551
      #30340#25163#27573#65292#19968#33324#20351#29992#28216#26631#36880#34892#36941#21382#25968#25454
      #65292#26681#25454#21462#20986#30340#25968
      #25454#19981#21516#26465#20214#36827#34892#19981#21516#30340#25805#20316#12290#23588#20854#23545
      #22810#34920#21644#22823#34920#23450#20041#30340#28216#26631#65288#22823#30340#25968#25454#38598
      #21512#65289#24490#29615#24456#23481#26131#20351
      #31243#24207#36827#20837#19968#20010#28459#38271#30340#31561#29305#29978#33267#27515#26426#65292)
    TabOrder = 3
  end
  object a: TLincoPopupMsg
    Interval = 50
    Left = 48
    Top = 32
  end
end