home *** CD-ROM | disk | FTP | other *** search
- object fPrintPrev: TfPrintPrev
- Left = 249
- Top = 176
- Width = 678
- Height = 438
- BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
- Caption = 'N'#225'hled p'#345'ed tiskem'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poMainFormCenter
- OnCreate = FormCreate
- OnMouseWheel = FormMouseWheel
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object SynEditPrintPrev: TSynEditPrintPreview
- Left = 0
- Top = 22
- Width = 670
- Height = 382
- PopupMenu = popupContext
- OnPreviewPage = SynEditPrintPrevPreviewPage
- end
- object tbPrintPrev: TToolBar
- Left = 0
- Top = 0
- Width = 670
- Height = 22
- AutoSize = True
- ButtonWidth = 24
- Caption = 'tbPrintPrev'
- EdgeBorders = []
- Flat = True
- Images = fPSPad.MainImageList
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- object ToolButton1: TToolButton
- Left = 0
- Top = 0
- Action = FirstCmd
- end
- object ToolButton2: TToolButton
- Left = 24
- Top = 0
- Action = PrevCmd
- end
- object ToolButton3: TToolButton
- Left = 48
- Top = 0
- Action = NextCmd
- end
- object ToolButton4: TToolButton
- Left = 72
- Top = 0
- Action = LastCmd
- end
- object ToolButton15: TToolButton
- Left = 96
- Top = 0
- Width = 8
- Caption = 'ToolButton15'
- ImageIndex = 8
- Style = tbsSeparator
- end
- object panPage: TPanel
- Left = 104
- Top = 0
- Width = 65
- Height = 22
- BevelOuter = bvNone
- Caption = '1 / 1'
- TabOrder = 1
- end
- object ToolButton5: TToolButton
- Left = 169
- Top = 0
- Width = 8
- Caption = 'ToolButton5'
- ImageIndex = 4
- Style = tbsSeparator
- end
- object tbZoom: TToolButton
- Left = 177
- Top = 0
- Action = ZoomCmd
- DropdownMenu = popupSize
- Style = tbsDropDown
- end
- object ToolButton7: TToolButton
- Left = 214
- Top = 0
- Width = 8
- Caption = 'ToolButton7'
- ImageIndex = 5
- Style = tbsSeparator
- end
- object ToolButton8: TToolButton
- Left = 222
- Top = 0
- Action = aPrint
- end
- object ToolButton14: TToolButton
- Left = 246
- Top = 0
- Action = fPSPad.aPageSetup
- end
- object ToolButton6: TToolButton
- Left = 270
- Top = 0
- Action = fPSPad.aPrintSetup
- end
- object ToolButton9: TToolButton
- Left = 294
- Top = 0
- Width = 8
- Caption = 'ToolButton9'
- ImageIndex = 6
- Style = tbsSeparator
- end
- object tbSyntax: TToolButton
- Left = 302
- Top = 0
- Action = aShowSyntax
- end
- object tbColor: TToolButton
- Left = 326
- Top = 0
- Action = aColorPrint
- end
- object tbNumbers: TToolButton
- Left = 350
- Top = 0
- Action = aLineNumber
- end
- object ToolButton11: TToolButton
- Left = 374
- Top = 0
- Width = 8
- Caption = 'ToolButton11'
- ImageIndex = 7
- Style = tbsSeparator
- end
- object bExitIt: TButton
- Left = 382
- Top = 0
- Width = 61
- Height = 22
- Action = bExit
- Cancel = True
- TabOrder = 0
- end
- end
- object ActionList: TActionList
- Left = 104
- Top = 80
- object FirstCmd: TAction
- Caption = 'FirstCmd'
- Hint = 'Skok na prvn'#237' str'#225'nku'
- ImageIndex = 23
- ShortCut = 16417
- OnExecute = FirstCmdExecute
- end
- object PrevCmd: TAction
- Caption = 'PrevCmd'
- Hint = 'P'#345'echod na p'#345'edchoz'#237' str'#225'nku'
- ImageIndex = 20
- ShortCut = 33
- OnExecute = PrevCmdExecute
- end
- object NextCmd: TAction
- Caption = 'NextCmd'
- Hint = 'P'#345'echod na dal'#353#237' str'#225'nku'
- ImageIndex = 22
- ShortCut = 34
- OnExecute = NextCmdExecute
- end
- object LastCmd: TAction
- Caption = 'LastCmd'
- Hint = 'Skok na posledn'#237' str'#225'nku'
- ImageIndex = 21
- ShortCut = 16418
- OnExecute = LastCmdExecute
- end
- object ZoomCmd: TAction
- Caption = 'FitCmd'
- Hint = 'Zv'#283't'#353'en'#237' / zm'#283'n'#353'en'#237' str'#225'nky'
- ImageIndex = 19
- ShortCut = 32858
- OnExecute = ZoomCmdExecute
- end
- object aMoveUp: TAction
- Caption = 'aMoveUp'
- ShortCut = 38
- OnExecute = aMoveUpExecute
- end
- object aMoveDown: TAction
- Caption = 'aMoveDown'
- ShortCut = 40
- OnExecute = aMoveDownExecute
- end
- object aMoveLeft: TAction
- Caption = 'aMoveLeft'
- ShortCut = 37
- OnExecute = aMoveLeftExecute
- end
- object aMoveRight: TAction
- Caption = 'aMoveRight'
- ShortCut = 39
- OnExecute = aMoveRightExecute
- end
- object aColorPrint: TAction
- Caption = 'Barevn'#253' tisk'
- Hint = 'Syntaxe bude tisknuta barevn'#283
- ImageIndex = 24
- OnExecute = aColorPrintExecute
- end
- object aLineNumber: TAction
- Caption = #268#237'sla '#345#225'dk'#367
- Hint = 'Tisknout '#269#237'sla '#345#225'dk'#367
- ImageIndex = 11
- OnExecute = aLineNumberExecute
- end
- object aShowSyntax: TAction
- Caption = 'Zobrazit syntaxi'
- Hint = 'Tisk se zv'#253'razn'#283'n'#237'm syntaxe'
- ImageIndex = 9
- OnExecute = aShowSyntaxExecute
- end
- object aPrint: TAction
- Caption = 'aPrint'
- ImageIndex = 7
- ShortCut = 16464
- OnExecute = aPrintExecute
- end
- object bExit: TAction
- Caption = '&Konec'
- Hint = 'Ukon'#269'en'#237' n'#225'hledu'
- OnExecute = bExitClick
- end
- end
- object popupSize: TPopupMenu
- Left = 184
- Top = 24
- object Fitto: TMenuItem
- Tag = -1
- AutoHotkeys = maAutomatic
- Caption = 'Cel'#225' str'#225'nka'
- OnClick = FittoClick
- end
- object Pagewidth: TMenuItem
- Tag = -2
- Caption = 'Na '#353#237#345'ku str'#225'nky'
- OnClick = FittoClick
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object N251: TMenuItem
- Tag = 30
- Caption = '30%'
- OnClick = FittoClick
- end
- object N501: TMenuItem
- Tag = 50
- Caption = '50%'
- OnClick = FittoClick
- end
- object N751: TMenuItem
- Tag = 75
- Caption = '75%'
- OnClick = FittoClick
- end
- object OriginalSize: TMenuItem
- Tag = 100
- Caption = '100%'
- OnClick = FittoClick
- end
- object N1501: TMenuItem
- Tag = 150
- Caption = '150%'
- OnClick = FittoClick
- end
- object N2001: TMenuItem
- Tag = 200
- Caption = '200%'
- OnClick = FittoClick
- end
- end
- object popupContext: TPopupMenu
- Left = 136
- Top = 80
- object aPrint1: TMenuItem
- Action = aPrint
- end
- object Nastavenstrnky1: TMenuItem
- Action = fPSPad.aPageSetup
- end
- object Nastaventiskrny1: TMenuItem
- Action = fPSPad.aPrintSetup
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object Zobrazitsyntaxi1: TMenuItem
- Action = aShowSyntax
- end
- object Barevntisk1: TMenuItem
- Action = aColorPrint
- end
- object sladk1: TMenuItem
- Action = aLineNumber
- end
- object N3: TMenuItem
- Caption = '-'
- end
- object Konec1: TMenuItem
- Action = bExit
- end
- end
- end
-