home *** CD-ROM | disk | FTP | other *** search
- object widelo: Twidelo
- Left = 223
- Top = 163
- Cursor = -1
- BorderIcons = []
- BorderStyle = bsNone
- ClientHeight = 308
- ClientWidth = 556
- Color = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- KeyPreview = True
- OldCreateOrder = False
- Position = poMainFormCenter
- WindowState = wsMaximized
- OnClose = formclose
- OnCreate = formcreate
- OnHide = formhide
- OnKeyDown = formkeydown
- OnKeyUp = formkeyup
- OnResize = formresize
- OnShow = formshow
- PixelsPerInch = 96
- TextHeight = 13
- object chepas: TMemo
- Left = 16
- Top = 104
- Width = 65
- Height = 25
- MaxLength = 20
- TabOrder = 0
- Visible = False
- WordWrap = False
- OnChange = chepasChange
- end
- object autcon: TMemo
- Left = 16
- Top = 144
- Width = 65
- Height = 25
- TabOrder = 1
- Visible = False
- WordWrap = False
- OnChange = autconChange
- end
- object bokeco: TMemo
- Left = 16
- Top = 184
- Width = 65
- Height = 25
- TabOrder = 2
- Visible = False
- end
- object prekey: TPanel
- Left = 248
- Top = 72
- Width = 289
- Height = 95
- Cursor = -1
- Color = clSilver
- TabOrder = 3
- Visible = False
- object prke03: TLabel
- Left = 52
- Top = 33
- Width = 227
- Height = 26
- Cursor = -1
- Caption =
- 'Pracovn� plocha je uzam�ena.'#13#10'K odemknut� stiskn�te kl�vesy Ctrl' +
- '+Del.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object prke04: TLabel
- Left = 70
- Top = 72
- Width = 149
- Height = 13
- Cursor = -1
- Caption = 'Copyright � 2001 Petr Z�vesk�'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object prke02: TImage
- Left = 10
- Top = 30
- Width = 32
- Height = 32
- Cursor = -1
- Picture.Data = {<image000.bmp>}
- Transparent = True
- end
- object prke01: TPanel
- Left = 1
- Top = 1
- Width = 287
- Height = 20
- Cursor = -1
- Align = alTop
- BevelOuter = bvLowered
- Caption = 'Windows Desktop Locker'
- Color = clNavy
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- end
- end
- object inspas: TPanel
- Left = 248
- Top = 208
- Width = 272
- Height = 119
- Cursor = -1
- TabOrder = 4
- Visible = False
- object inpa03: TLabel
- Left = 52
- Top = 34
- Width = 37
- Height = 13
- Cursor = -1
- Caption = 'Heslo:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object inpa04: TLabel
- Left = 61
- Top = 96
- Width = 149
- Height = 13
- Cursor = -1
- Caption = 'Copyright � 2001 Petr Z�vesk�'
- end
- object inpa02: TImage
- Left = 10
- Top = 30
- Width = 32
- Height = 32
- Cursor = -1
- Picture.Data = {<image001.bmp>}
- Transparent = True
- end
- object blitex: TLabel
- Left = 52
- Top = 34
- Width = 210
- Height = 13
- Cursor = -1
- Alignment = taCenter
- AutoSize = False
- Caption = '�patn� heslo!!!'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- Visible = False
- end
- object inpa01: TPanel
- Left = 1
- Top = 1
- Width = 270
- Height = 20
- Cursor = -1
- Align = alTop
- BevelOuter = bvLowered
- Caption = 'Windows Desktop Locker'
- Color = clNavy
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 3
- end
- object unlbut: TButton
- Left = 52
- Top = 61
- Width = 100
- Height = 25
- Cursor = -1
- Caption = '&Odemknout'
- Default = True
- TabOrder = 1
- OnClick = unlbutClick
- end
- object passwo: TEdit
- Left = 99
- Top = 30
- Width = 163
- Height = 21
- Cursor = -1
- MaxLength = 20
- PasswordChar = '*'
- TabOrder = 0
- end
- object shdobu: TButton
- Left = 162
- Top = 61
- Width = 100
- Height = 25
- Cursor = -1
- Caption = '&Vypnout po��ta�'
- TabOrder = 2
- OnClick = shdobuClick
- end
- end
- object tricme: TPopupMenu
- Left = 208
- Top = 24
- object melode: TMenuItem
- Caption = 'Zamknout plochu'
- OnClick = melodeClick
- end
- object meli01: TMenuItem
- Caption = '-'
- end
- object menaut: TMenuItem
- Caption = 'Spou�t�t p�i startu'
- OnClick = menautClick
- end
- object merepr: TMenuItem
- Caption = 'Zajistit proti restartu'
- OnClick = mereprClick
- end
- object mechpa: TMenuItem
- Caption = 'Zm�nit heslo'
- OnClick = mechpaClick
- end
- object meli02: TMenuItem
- Caption = '-'
- end
- object meabap: TMenuItem
- Caption = 'O aplikaci'
- OnClick = meabapClick
- end
- object menreg: TMenuItem
- Caption = 'Registrace'
- OnClick = menregClick
- end
- object meli03: TMenuItem
- Caption = '-'
- end
- object menclo: TMenuItem
- Caption = 'Konec'
- OnClick = mencloClick
- end
- object meli04: TMenuItem
- Caption = '-'
- end
- object meclen: TMenuItem
- Caption = 'Odstranit z�pisy'
- OnClick = meclenClick
- end
- end
- object jumwin: TTimer
- Enabled = False
- Interval = 15000
- OnTimer = jumwinTimer
- Left = 16
- Top = 24
- end
- object autunl: TTimer
- Enabled = False
- Interval = 180000
- OnTimer = autunlTimer
- Left = 16
- Top = 64
- end
- object autost: TAutoRunner
- RegLocation = CurrentUser
- AutoRunWhere = Run
- AutoRun = False
- AppName = 'wdl'
- Left = 16
- Top = 256
- end
- object unlock: TARHotKey
- OnPressed = unlockPressed
- HotKey = 16430
- Left = 72
- Top = 24
- end
- object traico: TRxTrayIcon
- Active = False
- Icon.Data = {<image002.ico>}
- PopupMenu = tricme
- Left = 160
- Top = 24
- end
- object icohid: TIconHide
- Hidden = True
- Left = 264
- Top = 24
- end
- object apphid: TTrayComp
- HideApp = True
- Left = 64
- Top = 256
- end
- object sketbh: TWinAccess
- StartButton = asVisible
- TrayBar = asVisible
- TrayNotify = asVisible
- AppSwitch = asVisible
- CapsLock = kbOff
- NumLock = kbOn
- ScrollLock = kbOff
- SystemKey = kbOn
- HoldNumLock = False
- HoldScrollLock = False
- HoldCapsLock = False
- Left = 112
- Top = 256
- end
- object hidwin: TTimer
- Enabled = False
- Interval = 15000
- OnTimer = hidwinTimer
- Left = 256
- Top = 296
- end
- object moclti: TTimer
- Enabled = False
- Interval = 500
- OnTimer = mocltiTimer
- Left = 192
- Top = 120
- end
- object semopo: TTimer
- Enabled = False
- Interval = 1
- OnTimer = semopoTimer
- Left = 152
- Top = 120
- end
- object shdoco: TTimer
- Enabled = False
- Interval = 500
- OnTimer = shdocoTimer
- Left = 488
- Top = 296
- end
- object wropas: TTimer
- Enabled = False
- Interval = 500
- OnTimer = wropasTimer
- Left = 456
- Top = 296
- end
- end
-