ULiveDraw.dfm
上传用户:raido2005
上传日期:2022-06-22
资源大小:5044k
文件大小:1k
- object Form4: TForm4
- Left = 204
- Top = 114
- Width = 480
- Height = 335
- Caption = 'Live Drawing'
- 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 Panel1: TPanel
- Left = 0
- Top = 0
- Width = 100
- Height = 301
- Align = alLeft
- BorderWidth = 2
- TabOrder = 0
- object RGType: TRadioGroup
- Left = 3
- Top = 3
- Width = 94
- Height = 84
- Align = alTop
- Caption = 'Type'
- ItemIndex = 0
- Items.Strings = (
- 'Line'
- 'Rectangle'
- 'Ellipse')
- TabOrder = 0
- end
- end
- object Flash: TFlashCanvasControl
- Left = 100
- Top = 0
- Width = 372
- Height = 301
- Align = alClient
- TabOrder = 1
- OnMouseMove = FlashMouseMove
- OnMouseUp = FlashMouseUp
- OnMouseDown = FlashMouseDown
- FrameNum = -1
- Playing = True
- Quality = 1
- ScaleMode = 3
- AlignMode = 5
- BackgroundColor = -1
- Loop = True
- WMode = 'Window'
- SAlign = 'LT'
- Menu = True
- Scale = 'NoScale'
- DeviceFont = False
- EmbedMovie = False
- Quality2 = 'High'
- AllowScriptAccess = 'always'
- end
- end