You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
52 lines
1.1 KiB
Plaintext
52 lines
1.1 KiB
Plaintext
object FSmiles: TFSmiles
|
|
Left = 311
|
|
Top = 230
|
|
BiDiMode = bdLeftToRight
|
|
BorderStyle = bsNone
|
|
Caption = 'Smiles'
|
|
ClientHeight = 271
|
|
ClientWidth = 387
|
|
Color = clBtnFace
|
|
Font.Charset = RUSSIAN_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = 'Arial'
|
|
Font.Style = [fsBold]
|
|
FormStyle = fsStayOnTop
|
|
KeyPreview = True
|
|
OldCreateOrder = False
|
|
ParentBiDiMode = False
|
|
Position = poDefault
|
|
OnCreate = FormCreate
|
|
OnHide = FormHide
|
|
OnKeyDown = FormKeyDown
|
|
OnShow = FormShow
|
|
PixelsPerInch = 96
|
|
TextHeight = 16
|
|
object MenuSmilesBox: TPaintBox
|
|
Left = 0
|
|
Top = 0
|
|
Width = 387
|
|
Height = 271
|
|
Align = alClient
|
|
Color = clMenu
|
|
Font.Charset = RUSSIAN_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentColor = False
|
|
ParentFont = False
|
|
OnClick = MenuSmilesBoxClick
|
|
OnMouseMove = MenuSmilesBoxMouseMove
|
|
OnMouseUp = MenuSmilesBoxMouseUp
|
|
OnPaint = MenuSmilesBoxPaint
|
|
end
|
|
object UpdTmr: TTimer
|
|
Interval = 40
|
|
OnTimer = UpdTmrTimer
|
|
Left = 24
|
|
Top = 16
|
|
end
|
|
end
|