home *** CD-ROM | disk | FTP | other *** search
- object fmMain: TfmMain
- Left = -1000
- Top = -1000
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- BorderIcons = [biSystemMenu]
- BorderStyle = bsToolWindow
- Caption = 'Desktop Twister'
- ClientHeight = 64
- ClientWidth = 104
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- Icon.Data = {<image000.ico>}
- PopupMenu = pmnMain
- Position = poDefaultPosOnly
- ShowHint = True
- OnActivate = fmMainActivate
- OnCreate = fmMainCreate
- OnDestroy = fmMainDestroy
- PixelsPerInch = 120
- TextHeight = 16
- object btnDesk1: TSpeedButton
- Tag = 1
- Left = 0
- Top = 0
- Width = 25
- Height = 25
- GroupIndex = 1
- Down = True
- Caption = '1'
- ParentShowHint = False
- ShowHint = True
- OnClick = btnDeskClick
- end
- object btnDesk2: TSpeedButton
- Tag = 2
- Left = 24
- Top = 0
- Width = 25
- Height = 25
- GroupIndex = 1
- Caption = '2'
- ParentShowHint = False
- ShowHint = True
- OnClick = btnDeskClick
- end
- object btnDesk3: TSpeedButton
- Tag = 3
- Left = 48
- Top = 0
- Width = 25
- Height = 25
- GroupIndex = 1
- Caption = '3'
- ParentShowHint = False
- ShowHint = True
- OnClick = btnDeskClick
- end
- object btnDesk4: TSpeedButton
- Tag = 4
- Left = 72
- Top = 0
- Width = 25
- Height = 25
- GroupIndex = 1
- Caption = '4'
- ParentShowHint = False
- ShowHint = True
- OnClick = btnDeskClick
- end
- object btnDesk5: TSpeedButton
- Tag = 5
- Left = 96
- Top = 0
- Width = 25
- Height = 25
- GroupIndex = 1
- Caption = '5'
- ParentShowHint = False
- ShowHint = True
- OnClick = btnDeskClick
- end
- object btnDesk6: TSpeedButton
- Tag = 6
- Left = 120
- Top = 0
- Width = 25
- Height = 25
- GroupIndex = 1
- Caption = '6'
- ParentShowHint = False
- ShowHint = True
- OnClick = btnDeskClick
- end
- object btnDesk7: TSpeedButton
- Tag = 7
- Left = 144
- Top = 0
- Width = 25
- Height = 25
- GroupIndex = 1
- Caption = '7'
- ParentShowHint = False
- ShowHint = True
- OnClick = btnDeskClick
- end
- object btnDesk8: TSpeedButton
- Tag = 8
- Left = 168
- Top = 0
- Width = 25
- Height = 25
- GroupIndex = 1
- Caption = '8'
- ParentShowHint = False
- ShowHint = True
- OnClick = btnDeskClick
- end
- object btnDesk9: TSpeedButton
- Tag = 9
- Left = 192
- Top = 0
- Width = 25
- Height = 25
- GroupIndex = 1
- Caption = '9'
- ParentShowHint = False
- ShowHint = True
- OnClick = btnDeskClick
- end
- object pmnMain: TPopupMenu
- OnPopup = pmnMainPopup
- Top = 32
- object pmnSchliessen: TMenuItem
- Caption = '&Schlie�en'
- Default = True
- ShortCut = 32883
- OnClick = pmnSchliessenClick
- end
- object N3: TMenuItem
- Caption = '-'
- GroupIndex = 2
- ShortCut = 0
- end
- object pmnInfo: TMenuItem
- Caption = '&Info...'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnInfoClick
- end
- object pmnOptionen: TMenuItem
- Caption = '&Eigenschaften...'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnOptionenClick
- end
- object N1: TMenuItem
- Caption = '-'
- GroupIndex = 2
- ShortCut = 0
- end
- object pmnAutoStart: TMenuItem
- Caption = 'Auto&start'
- GroupIndex = 2
- ShortCut = 0
- object pmnASAktiv: TMenuItem
- Caption = '&aktiv'
- Checked = True
- ShortCut = 0
- OnClick = pmnASAktivClick
- end
- object mnASSeperator: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object pmnASErneut1: TMenuItem
- Tag = 1
- Caption = 'Gruppe &1 starten'
- ShortCut = 0
- OnClick = pmnASErneutClick
- end
- object pmnASErneut2: TMenuItem
- Tag = 2
- Caption = 'Gruppe &2 starten'
- ShortCut = 0
- OnClick = pmnASErneutClick
- end
- object pmnASErneut3: TMenuItem
- Tag = 3
- Caption = 'Gruppe &3 starten'
- ShortCut = 0
- OnClick = pmnASErneutClick
- end
- object pmnASErneut4: TMenuItem
- Tag = 4
- Caption = 'Gruppe &4 starten'
- ShortCut = 0
- OnClick = pmnASErneutClick
- end
- object pmnASErneut5: TMenuItem
- Tag = 5
- Caption = 'Gruppe &5 starten'
- ShortCut = 0
- OnClick = pmnASErneutClick
- end
- object pmnASErneut6: TMenuItem
- Tag = 6
- Caption = 'Gruppe &6 starten'
- ShortCut = 0
- OnClick = pmnASErneutClick
- end
- object pmnASErneut7: TMenuItem
- Tag = 7
- Caption = 'Gruppe &7 starten'
- ShortCut = 0
- OnClick = pmnASErneutClick
- end
- object pmnASErneut8: TMenuItem
- Tag = 8
- Caption = 'Gruppe &8 starten'
- ShortCut = 0
- OnClick = pmnASErneutClick
- end
- object pmnASErneut9: TMenuItem
- Tag = 9
- Caption = 'Gruppe &9 starten'
- ShortCut = 0
- OnClick = pmnASErneutClick
- end
- end
- object N4: TMenuItem
- Caption = '-'
- GroupIndex = 2
- ShortCut = 0
- end
- object pmnCloseWindow: TMenuItem
- Caption = 'Fenster &schlie�en'
- GroupIndex = 2
- ShortCut = 0
- object pmnCloseAll: TMenuItem
- Caption = '&Alle Fenster'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseAllClick
- end
- object pmnCloseActDesk: TMenuItem
- Caption = 'Aktueller &Desktop'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseActDeskClick
- end
- object N2: TMenuItem
- Caption = '-'
- GroupIndex = 2
- ShortCut = 0
- end
- object pmnCloseDesk1: TMenuItem
- Tag = 1
- Caption = 'Desktop &1'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseDeskClick
- end
- object pmnCloseDesk2: TMenuItem
- Tag = 2
- Caption = 'Desktop &2'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseDeskClick
- end
- object pmnCloseDesk3: TMenuItem
- Tag = 3
- Caption = 'Desktop &3'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseDeskClick
- end
- object pmnCloseDesk4: TMenuItem
- Tag = 4
- Caption = 'Desktop &4'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseDeskClick
- end
- object pmnCloseDesk5: TMenuItem
- Tag = 5
- Caption = 'Desktop &5'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseDeskClick
- end
- object pmnCloseDesk6: TMenuItem
- Tag = 6
- Caption = 'Desktop &6'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseDeskClick
- end
- object pmnCloseDesk7: TMenuItem
- Tag = 7
- Caption = 'Desktop &7'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseDeskClick
- end
- object pmnCloseDesk8: TMenuItem
- Tag = 8
- Caption = 'Desktop &8'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseDeskClick
- end
- object pmnCloseDesk9: TMenuItem
- Tag = 9
- Caption = 'Desktop &9'
- GroupIndex = 2
- ShortCut = 0
- OnClick = pmnCloseDeskClick
- end
- end
- object pmnImmerSichtbar: TMenuItem
- Caption = 'Fenster �berall &sichtbar'
- GroupIndex = 2
- ShortCut = 0
- end
- object pmnAktiv: TMenuItem
- Caption = 'Fenster &aktivieren'
- GroupIndex = 2
- ShortCut = 0
- end
- object pmnBewegen: TMenuItem
- Caption = 'Fenster &verschieben'
- GroupIndex = 2
- ShortCut = 0
- end
- end
- object pmnWinList: TPopupMenu
- Left = 24
- Top = 32
- end
- object pmnChooseDesktop: TPopupMenu
- Left = 48
- Top = 32
- object pmnDesktop1: TMenuItem
- Tag = 1
- Caption = 'Desktop &1'
- ShortCut = 0
- OnClick = pmnActDeskClick
- end
- object pmnDesktop2: TMenuItem
- Tag = 2
- Caption = 'Desktop &2'
- ShortCut = 0
- OnClick = pmnActDeskClick
- end
- object pmnDesktop3: TMenuItem
- Tag = 3
- Caption = 'Desktop &3'
- ShortCut = 0
- OnClick = pmnActDeskClick
- end
- object pmnDesktop4: TMenuItem
- Tag = 4
- Caption = 'Desktop &4'
- ShortCut = 0
- OnClick = pmnActDeskClick
- end
- object pmnDesktop5: TMenuItem
- Tag = 5
- Caption = 'Desktop &5'
- ShortCut = 0
- OnClick = pmnActDeskClick
- end
- object pmnDesktop6: TMenuItem
- Tag = 6
- Caption = 'Desktop &6'
- ShortCut = 0
- OnClick = pmnActDeskClick
- end
- object pmnDesktop7: TMenuItem
- Tag = 7
- Caption = 'Desktop &7'
- ShortCut = 0
- OnClick = pmnActDeskClick
- end
- object pmnDesktop8: TMenuItem
- Tag = 8
- Caption = 'Desktop &8'
- ShortCut = 0
- OnClick = pmnActDeskClick
- end
- object pmnDesktop9: TMenuItem
- Tag = 9
- Caption = 'Desktop &9'
- ShortCut = 0
- OnClick = pmnActDeskClick
- end
- end
- object pmnActivate: TPopupMenu
- Left = 72
- Top = 32
- end
- end
-