mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 15:49:32 +01:00 
			
		
		
		
	* Add first and last buttons, improve space at the bottom for space counter
git-svn-id: trunk@57445 -
This commit is contained in:
		
							parent
							
								
									533de0481e
								
							
						
					
					
						commit
						f88a74505c
					
				@ -36,34 +36,34 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
      Style = tbsDivider
 | 
			
		||||
    end
 | 
			
		||||
    object TBPrevious: TToolButton
 | 
			
		||||
      Left = 110
 | 
			
		||||
      Left = 133
 | 
			
		||||
      Top = 2
 | 
			
		||||
      Action = APrevious
 | 
			
		||||
    end
 | 
			
		||||
    object TBNext: TToolButton
 | 
			
		||||
      Left = 133
 | 
			
		||||
      Left = 156
 | 
			
		||||
      Top = 2
 | 
			
		||||
      Action = ANext
 | 
			
		||||
    end
 | 
			
		||||
    object ToolButton6: TToolButton
 | 
			
		||||
      Left = 156
 | 
			
		||||
      Left = 202
 | 
			
		||||
      Height = 22
 | 
			
		||||
      Top = 2
 | 
			
		||||
      Caption = 'ToolButton6'
 | 
			
		||||
      Style = tbsDivider
 | 
			
		||||
    end
 | 
			
		||||
    object TBZoomIn: TToolButton
 | 
			
		||||
      Left = 161
 | 
			
		||||
      Left = 207
 | 
			
		||||
      Top = 2
 | 
			
		||||
      Action = AZoomIn
 | 
			
		||||
    end
 | 
			
		||||
    object TBZoomReset: TToolButton
 | 
			
		||||
      Left = 184
 | 
			
		||||
      Left = 230
 | 
			
		||||
      Top = 2
 | 
			
		||||
      Action = AZoomReset
 | 
			
		||||
    end
 | 
			
		||||
    object TBZoomOut: TToolButton
 | 
			
		||||
      Left = 207
 | 
			
		||||
      Left = 253
 | 
			
		||||
      Top = 2
 | 
			
		||||
      Action = AZoomOut
 | 
			
		||||
    end
 | 
			
		||||
@ -77,6 +77,16 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
      Top = 2
 | 
			
		||||
      Action = APrint
 | 
			
		||||
    end
 | 
			
		||||
    object TBFirst: TToolButton
 | 
			
		||||
      Left = 110
 | 
			
		||||
      Top = 2
 | 
			
		||||
      Action = AFirst
 | 
			
		||||
    end
 | 
			
		||||
    object TBLast: TToolButton
 | 
			
		||||
      Left = 179
 | 
			
		||||
      Top = 2
 | 
			
		||||
      Action = ALast
 | 
			
		||||
    end
 | 
			
		||||
  end
 | 
			
		||||
  object PBottom: TPanel
 | 
			
		||||
    Left = 0
 | 
			
		||||
@ -91,26 +101,27 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
    object PButtons: TPanel
 | 
			
		||||
      AnchorSideLeft.Side = asrCenter
 | 
			
		||||
      AnchorSideRight.Side = asrCenter
 | 
			
		||||
      Left = 296
 | 
			
		||||
      Left = 240
 | 
			
		||||
      Height = 32
 | 
			
		||||
      Top = -5
 | 
			
		||||
      Width = 149
 | 
			
		||||
      Width = 216
 | 
			
		||||
      Anchors = []
 | 
			
		||||
      BevelOuter = bvNone
 | 
			
		||||
      ClientHeight = 32
 | 
			
		||||
      ClientWidth = 149
 | 
			
		||||
      ClientWidth = 216
 | 
			
		||||
      TabOrder = 0
 | 
			
		||||
      object LPageCount: TLabel
 | 
			
		||||
        Left = 74
 | 
			
		||||
        Height = 16
 | 
			
		||||
        Top = 11
 | 
			
		||||
        Width = 38
 | 
			
		||||
        Left = 98
 | 
			
		||||
        Height = 24
 | 
			
		||||
        Top = 6
 | 
			
		||||
        Width = 50
 | 
			
		||||
        AutoSize = False
 | 
			
		||||
        Caption = 'of 0'
 | 
			
		||||
        Layout = tlCenter
 | 
			
		||||
        ParentColor = False
 | 
			
		||||
      end
 | 
			
		||||
      object EPage: TEdit
 | 
			
		||||
        Left = 32
 | 
			
		||||
        Left = 56
 | 
			
		||||
        Height = 24
 | 
			
		||||
        Top = 6
 | 
			
		||||
        Width = 40
 | 
			
		||||
@ -121,7 +132,7 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
        Text = '0'
 | 
			
		||||
      end
 | 
			
		||||
      object SBPrevious: TSpeedButton
 | 
			
		||||
        Left = 8
 | 
			
		||||
        Left = 32
 | 
			
		||||
        Height = 24
 | 
			
		||||
        Top = 6
 | 
			
		||||
        Width = 24
 | 
			
		||||
@ -130,14 +141,32 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
        ShowCaption = False
 | 
			
		||||
      end
 | 
			
		||||
      object SpeedButton1: TSpeedButton
 | 
			
		||||
        Left = 112
 | 
			
		||||
        Left = 148
 | 
			
		||||
        Height = 22
 | 
			
		||||
        Top = 8
 | 
			
		||||
        Top = 6
 | 
			
		||||
        Width = 24
 | 
			
		||||
        Action = ANext
 | 
			
		||||
        Flat = True
 | 
			
		||||
        ShowCaption = False
 | 
			
		||||
      end
 | 
			
		||||
      object SpeedButton2: TSpeedButton
 | 
			
		||||
        Left = 176
 | 
			
		||||
        Height = 22
 | 
			
		||||
        Top = 6
 | 
			
		||||
        Width = 24
 | 
			
		||||
        Action = ALast
 | 
			
		||||
        Flat = True
 | 
			
		||||
        ShowCaption = False
 | 
			
		||||
      end
 | 
			
		||||
      object SBPrevious1: TSpeedButton
 | 
			
		||||
        Left = 7
 | 
			
		||||
        Height = 24
 | 
			
		||||
        Top = 6
 | 
			
		||||
        Width = 24
 | 
			
		||||
        Action = AFirst
 | 
			
		||||
        Flat = True
 | 
			
		||||
        ShowCaption = False
 | 
			
		||||
      end
 | 
			
		||||
    end
 | 
			
		||||
  end
 | 
			
		||||
  object ScrollBox1: TScrollBox
 | 
			
		||||
@ -148,8 +177,8 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
    HorzScrollBar.Page = 716
 | 
			
		||||
    VertScrollBar.Page = 760
 | 
			
		||||
    Align = alClient
 | 
			
		||||
    ClientHeight = 781
 | 
			
		||||
    ClientWidth = 734
 | 
			
		||||
    ClientHeight = 783
 | 
			
		||||
    ClientWidth = 736
 | 
			
		||||
    TabOrder = 2
 | 
			
		||||
    object PBPreview: TPaintBox
 | 
			
		||||
      Left = 0
 | 
			
		||||
@ -176,6 +205,13 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
      ImageIndex = 7
 | 
			
		||||
      OnExecute = AExportExecute
 | 
			
		||||
    end
 | 
			
		||||
    object AFirst: TAction
 | 
			
		||||
      Caption = 'A&First'
 | 
			
		||||
      Hint = 'First page'
 | 
			
		||||
      ImageIndex = 10
 | 
			
		||||
      OnExecute = AFirstExecute
 | 
			
		||||
      OnUpdate = AFirstUpdate
 | 
			
		||||
    end
 | 
			
		||||
    object APrevious: TAction
 | 
			
		||||
      Caption = '&Previous'
 | 
			
		||||
      Hint = 'Previous page'
 | 
			
		||||
@ -190,6 +226,13 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
      OnExecute = ANextExecute
 | 
			
		||||
      OnUpdate = ANextUpdate
 | 
			
		||||
    end
 | 
			
		||||
    object ALast: TAction
 | 
			
		||||
      Caption = 'A&Last'
 | 
			
		||||
      Hint = 'Last page'
 | 
			
		||||
      ImageIndex = 11
 | 
			
		||||
      OnExecute = ALastExecute
 | 
			
		||||
      OnUpdate = ALastUpdate
 | 
			
		||||
    end
 | 
			
		||||
    object AZoomIn: TAction
 | 
			
		||||
      Caption = 'Zoom &in'
 | 
			
		||||
      Hint = 'Zoom in'
 | 
			
		||||
@ -224,7 +267,7 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
    left = 104
 | 
			
		||||
    top = 55
 | 
			
		||||
    Bitmap = {
 | 
			
		||||
      4C690A0000001000000010000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      4C690C0000001000000010000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF006360
 | 
			
		||||
      F80AFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF007774FF1F7774
 | 
			
		||||
      FF2BFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00625FF82B5D5B
 | 
			
		||||
@ -384,71 +427,71 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
      000000000000000000000000000000000000000000000000001F0000001F0000
 | 
			
		||||
      00F8686868FB1F1F1FFB000000F4000000000000000000000000000000000000
 | 
			
		||||
      00000000000000000000000000000000000000000000000000000000001F0000
 | 
			
		||||
      001F000000E7000000FD0000003F000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000FF0000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000FF000000FF00000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000FFB2885BFF000000FF000000000000
 | 
			
		||||
      00000000000000000000000000000000000000000000000000FF000000FF0000
 | 
			
		||||
      00FF000000FF000000FF000000FF000000FFD1B89EFFAD8050FF000000FF0000
 | 
			
		||||
      00000000000000000000000000000000000000000000000000FFDCC9B5FFDAC5
 | 
			
		||||
      AFFFDBC7B2FFDDCAB6FFDDCAB6FFDDCAB6FFD5BDA4FFD1B79CFFAD8050FF110D
 | 
			
		||||
      08FF0000000000000000000000000000000000000000000000FFD0B69BFFD3BA
 | 
			
		||||
      A0FFD1B79CFFD1B79CFFD0B69BFFCFB59AFFD3BAA0FFD1B79CFFCEB397FFB48B
 | 
			
		||||
      5FFF000000FF00000000000000000000000000000000000000FFCCB091FFD1B8
 | 
			
		||||
      9EFFCFB59AFFCFB59AFFD0B69BFFD1B79CFFD1B79CFFD1B79CFFD3BAA0FFCEB2
 | 
			
		||||
      95FFA3794CFF000000FF000000000000000000000000000000FF9C7449FF8865
 | 
			
		||||
      3FFF88653FFF88653FFF88653FFF88653FFF88653FFF88653FFF88653FFF5B43
 | 
			
		||||
      2AFF000000FF00000000000000000000000000000000000000FF966F45FF7859
 | 
			
		||||
      37FF785937FF785937FF785937FF785937FF88653FFF88653FFF5B432AFF0000
 | 
			
		||||
      00FF0000000000000000000000000000000000000000000000FF000000FF0000
 | 
			
		||||
      00FF000000FF000000FF000000FF000000FF88653FFF5B432AFF000000FF0000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000FF5B432AFF000000FF000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000FF000000FF00000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000FF0000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      00000000000000000000000000D4000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      000000000000000000FF000000FF000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000FFE3D4C4FF000000FF000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      00FFE3D4C4FFD4BCA3FF000000FF000000FF000000FF000000FF000000FF0000
 | 
			
		||||
      00FF000000FF0000000000000000000000000000000000000000000000FFE3D4
 | 
			
		||||
      C4FFD5BEA6FFD7C1AAFFD8C2ABFFDAC5AFFFD8C2ABFFD9C4AEFFD4BCA3FFB992
 | 
			
		||||
      68FF000000FF00000000000000000000000000000000000000FFE3D4C4FFD1B7
 | 
			
		||||
      9CFFD5BDA4FFD4BCA3FFD2B99FFFD0B69BFFD0B69BFFD2B99FFFCFB59AFF9E75
 | 
			
		||||
      49FF000000FF0000000000000000000000003D2D1CFFE4D5C5FFD2B99FFFD3BA
 | 
			
		||||
      A0FFD1B89EFFD1B89EFFD1B79CFFD2B99FFFD2B99FFFD2B99FFFD2B99FFFA278
 | 
			
		||||
      4BFF000000FF00000000000000000000000000000000000000FF5B432AFF8865
 | 
			
		||||
      3FFF88653FFF88653FFF88653FFF88653FFF88653FFF88653FFF88653FFF6F53
 | 
			
		||||
      34FF000000FF0000000000000000000000000000000000000000000000FF5B43
 | 
			
		||||
      2AFF88653FFF88653FFF5A4229FF5A4229FF5A4229FF5A4229FF5A4229FF6047
 | 
			
		||||
      2DFF000000FF0000000000000000000000000000000000000000000000000000
 | 
			
		||||
      00FF5B432AFF88653FFF000000FF000000FF000000FF000000FF000000FF0000
 | 
			
		||||
      00FF000000FF0000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000FF5B432AFF000000FF000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      000000000000000000FF000000FF000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      00000000000000000000000000FF000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      0000000000000000000000000000000000000000000000000000000000000000
 | 
			
		||||
      000000000000000000000000000000000047000000FF000000FF000000FF0000
 | 
			
		||||
      001F000000E7000000FD0000003FFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004753BC504733A65FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFF2A8C59F604743AAB04733A0CFFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFFB7E1CBFF5AAB82F904743AE104733A2DFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFFBBE3CEFFABDCC3FF84C6A4FE107A43F504733A65FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF0004743AE804733AFF04733AFF04733AFF0473
 | 
			
		||||
      3AFF04763BF7B6E0CBFF6FC499FF91D2B1FF9CD4B7FF318F5FF604743BAC0473
 | 
			
		||||
      3A0CFFFFFF00FFFFFF00FFFFFF0004733AFFA7DBC0FFAADCC2FFADDDC5FFAFDE
 | 
			
		||||
      C6FFB0DEC7FFB0DEC7FF64C191FF61C18FFF73C89DFF9FD9BBFF5AAB81FA0574
 | 
			
		||||
      3AE104733A2DFFFFFF00FFFFFF0004733AFFA3D9BDFF54B985FF58BB88FF5BBC
 | 
			
		||||
      8BFF5CBD8BFF5CBE8CFF5CC18DFF5AC28DFF55C28AFF58C38CFF8CD4AFFF7AC3
 | 
			
		||||
      9CFE147C46F504733A65FFFFFF0004733AFF9CD7B9FF3BAF74FF33AC6EFF2BA9
 | 
			
		||||
      68FF2FAC6BFF3DB678FF49BE82FF50C389FF4DC488FF49C284FF44BE80FF6DCA
 | 
			
		||||
      9BFF89CEAAFF308F5EF604753B9D04733AFF7ECAA3FF069A4EFF069A4EFF069A
 | 
			
		||||
      4EFF07A052FF09A757FF0BAE5BFF0EB25FFF17B866FF1FBA6CFF26BA6FFF55C6
 | 
			
		||||
      8DFF76C99EFF268956F504753B9D04733AFF7ECAA3FF069A4EFF069A4EFF069C
 | 
			
		||||
      4FFF08A454FF0BAC5AFF0DB35EFF0EB962FF0FBC64FF1CBF6CFF67D29CFF5DBB
 | 
			
		||||
      8BFE0E7A42F504733A65FFFFFF0004733AFF7ECAA3FF7ECAA3FF7ECAA3FF7ECC
 | 
			
		||||
      A4FF7FD1A7FF81D5AAFF0EB761FF10BF66FF34CB7FFF78DAA8FF3EA671F90476
 | 
			
		||||
      3BE104733A2DFFFFFF00FFFFFF0004743AE804733AFF04733AFF04733AFF0473
 | 
			
		||||
      3AFF04783CF781D6ABFF11BA64FF52D392FF73D7A5FF1E8B53F504763CAC0473
 | 
			
		||||
      3A0CFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFF81D7ABFF6CD5A0FF58C18BFE0A7940F504743A65FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFF7BD3A6FF36A16AF804763CE104733A2DFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFF18844DF504763BAB04733A0CFFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004753BC504733A65FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0004733A6404753BC5FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF0004733A0C04743BAC298B59F604733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733A2D04743AE156A97FF9B1DFC8FF04733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733A65107A43F57EC3A0FEA3D9BDFFB5E0CAFF04733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0004733A0C0474
 | 
			
		||||
      3BAC2E8D5DF696D2B3FF88CFAAFF64C091FFB1DFC7FF04763BF704733AFF0473
 | 
			
		||||
      3AFF04733AFF04733AFF04743AE8FFFFFF00FFFFFF0004733A2D05743AE155A8
 | 
			
		||||
      7DFA97D4B5FF6AC294FF57BA87FF5CBD8BFFACDDC4FFAEDEC5FFAEDEC6FFAEDE
 | 
			
		||||
      C5FFACDDC4FFAADCC2FF04733AFFFFFFFF0004733A65137C45F672BD97FE84CD
 | 
			
		||||
      A7FF4DB680FF49B57DFF4FB782FF54B985FF58BB88FF59BC89FF5ABC8AFF59BC
 | 
			
		||||
      89FF58BB88FFA6DABFFF04733AFF04753B9D2C8C5AF582C9A5FF63BF90FF35AD
 | 
			
		||||
      70FF3CB275FF42B67BFF47B97FFF42B77AFF35B071FF27A865FF1DA35EFF20A4
 | 
			
		||||
      60FF2BA968FF9BD6B8FF04733AFF04753B9D278957F577C49DFF54BB87FF22AC
 | 
			
		||||
      66FF20AF66FF17AF62FF0EAD5CFF0BAC59FF0AA958FF09A455FF079E51FF069A
 | 
			
		||||
      4EFF069A4EFF7ECAA3FF04733AFFFFFFFF0004733A650E7941F65BB687FE65CA
 | 
			
		||||
      96FF19B565FF0DB560FF0EB761FF0EB661FF0DB35EFF0BAD5AFF09A656FF079E
 | 
			
		||||
      51FF069A4EFF7ECAA3FF04733AFFFFFFFF00FFFFFF0004733A2D04753BE13DA2
 | 
			
		||||
      6EF976D5A5FF33C87CFF11C269FF11C167FF82DBAEFF81D8ACFF80D4A9FF7FCF
 | 
			
		||||
      A6FF7ECAA3FF7ECAA3FF04733AFFFFFFFF00FFFFFF00FFFFFF0004733A0C0476
 | 
			
		||||
      3BAC1E8952F572D5A3FF54DA97FF15C96EFF83DEB0FF04793DF704733AFF0473
 | 
			
		||||
      3AFF04733AFF04733AFF04743AE8FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733A650A793FF559C48DFE6EDCA5FF83DEB0FF04733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733A2D04763CE136A26BF87DD7A9FF04733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF0004733A0C04763BAC19844DF504733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0004733A6404753BC5FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF0000000047000000FF000000FF000000FF0000
 | 
			
		||||
      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
 | 
			
		||||
      00FF000000FF000000FF00000055000000FFFAF8F7FFEBDDCBFF808AC8FF848F
 | 
			
		||||
      D1FF848FD1FF848FD1FF848FD1FF848FD1FF848FD1FF8490D1FF848FD1FF8691
 | 
			
		||||
@ -544,7 +587,71 @@ object FPReportPreviewForm: TFPReportPreviewForm
 | 
			
		||||
      F6FFF9F1ECFFF9F1EBFFF8F0E9FFF7EDE6FFF4EAE1FFF2E8DEFFFAF8F6FFC794
 | 
			
		||||
      61FF242424FF4B4B4BD9969696BFFFFFFF00FFFFFF00FFFFFF00C89662FDCA98
 | 
			
		||||
      65FFCA9765FFCA9765FFCA9765FFCA9764FFC99764FFC99764FFCA9865FFC895
 | 
			
		||||
      62FDFFFFFF00FFFFFF00FFFFFF00
 | 
			
		||||
      62FDFFFFFF00FFFFFF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0004733A6404753BC5FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF0004733A0C04743BAC288B58F604733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733A2D04743AE158AA81F9ACDCC4FF04733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733A65127C45F587C7A6FEA5DABEFFAFDEC6FF04733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF0004733AFF04733AFFFFFFFF0004733A0C0474
 | 
			
		||||
      3BAC359162F6A1D6BBFF90D2B0FF64C091FFABDDC3FF04763BF704733AFF0473
 | 
			
		||||
      3AFF04733AFF04733AFF04743AE804733AFF04733AFF04733A2D06753BE15FAE
 | 
			
		||||
      86FAA3D9BDFF75C79DFF5DBD8CFF5BBE8BFFA8DDC2FFA5DDC0FFA2DBBEFF9ED9
 | 
			
		||||
      BBFF9AD7B8FF96D4B4FF04733AFF04733AFF04733AFF177E48F680C3A0FE92D2
 | 
			
		||||
      B1FF5DBC8BFF55BA86FF54BD87FF52BF87FF4FC087FF4CC085FF46BE81FF3FBA
 | 
			
		||||
      7CFF39B576FF94D5B4FF04733AFF04733AFF04733AFF8FCEAEFF73C69CFF48B4
 | 
			
		||||
      7DFF49B57DFF4BB780FF4BBC83FF46BF81FF37BC79FF2ABA71FF1EB569FF1BB3
 | 
			
		||||
      65FF1DB065FF8ED5B0FF04733AFF04733AFF04733AFF7EC7A1FF5DBD8CFF2BA9
 | 
			
		||||
      68FF23A562FF1AA85FFF11AB5DFF0CB05CFF0DB560FF0EB862FF0EB861FF0DB5
 | 
			
		||||
      5FFF0CAF5CFF80D2A8FF04733AFF04733AFF04733AFF0E7941F65AB285FE62BF
 | 
			
		||||
      8FFF13A259FF09A555FF0BAD5AFF0DB55FFF0FBB64FF10BF66FF10BF66FF0FBB
 | 
			
		||||
      63FF0DB45FFF80D4A9FF04733AFF04733AFF04733AFF04733A2D04743AE13B9C
 | 
			
		||||
      6AF972C79CFF2DB470FF0CB05CFF0EB962FF83DEB0FF84E1B2FF84E1B2FF83DE
 | 
			
		||||
      B0FF82DAADFF81D6AAFF04733AFF04733AFF04733AFFFFFFFF0004733A0C0474
 | 
			
		||||
      3BAC1D8550F56EC699FF4EC78AFF11BB64FF84E0B1FF057B3FF704733AFF0473
 | 
			
		||||
      3AFF04733AFF04733AFF04743AE804733AFF04733AFFFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733A650A783FF555B987FE6CD59FFF84E0B1FF04733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733A2D04753BE136A16AF87EDBACFF04733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF0004733A0C04763BAC19864EF504733AFFFFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0004733A6404763CC5FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004753BC504733A65FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFF278956F604743AAB04733A0CFFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFFA7DBC0FF55A97EF804743AE104733A2DFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFFABDCC3FFA0D8BCFF84C6A4FE117B44F504733A65FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733AFF04733AFF04743AE804733AFF04733AFF04733AFF0473
 | 
			
		||||
      3AFF04763BF7A9DBC1FF5FBE8EFF8DD2AFFFA0D6BAFF359162F604743BAC0473
 | 
			
		||||
      3A0CFFFFFF0004733AFF04733AFF04733AFF93D3B2FF96D4B4FF9AD6B7FF9ED7
 | 
			
		||||
      BAFFA1D9BDFFA4DCC0FF58C08AFF5CC28EFF76CB9FFFA4DBBFFF60AF86FA0675
 | 
			
		||||
      3BE104733A2D04733AFF04733AFF04733AFF90D1B0FF30AB6CFF37AE71FF3DB2
 | 
			
		||||
      76FF45B87DFF4BBE83FF50C187FF53C38BFF56C38CFF60C591FF94D6B4FF81C5
 | 
			
		||||
      A2FE177E49F504733AFF04733AFF04733AFF8ACFACFF16A059FF149F58FF18A7
 | 
			
		||||
      5EFF26B26AFF35BB76FF45C283FF4BC688FF4DC588FF4DC387FF4CBF84FF76CB
 | 
			
		||||
      9FFF92D0B0FF04733AFF04733AFF04733AFF7ECAA3FF069A4EFF079E50FF09A6
 | 
			
		||||
      56FF0BAD5AFF0DB35EFF0EB761FF16BB66FF1FBC6CFF2ABC71FF30B973FF60C5
 | 
			
		||||
      92FF7FC9A3FF04733AFF04733AFF04733AFF7ECAA3FF069A4EFF08A152FF0AA9
 | 
			
		||||
      58FF0CB15DFF0EB862FF10BE66FF11C067FF10BE66FF1BBB6AFF66CE99FF5BB8
 | 
			
		||||
      89FE0E7942F504733AFF04733AFF04733AFF7ECAA3FF7ECAA3FF7FCFA6FF80D4
 | 
			
		||||
      A9FF81D8ACFF83DCAFFF12C46AFF13C86CFF35CC80FF77D7A6FF3DA36EF90475
 | 
			
		||||
      3BE104733A2D04733AFF04733AFF04743AE804733AFF04733AFF04733AFF0473
 | 
			
		||||
      3AFF04793DF783DDAFFF15C86DFF55DC97FF73D6A3FF1E8952F504763BAC0473
 | 
			
		||||
      3A0CFFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFF83DDAFFF6EDCA5FF59C48DFE0A793FF504733A65FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFF7DD9AAFF36A46CF804763CE104733A2DFFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004733AFF19854DF504763CAB04733A0CFFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733AFF04733AFFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF0004763BC504733A65FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
 | 
			
		||||
      FF00FFFFFF0004733AFF04733AFF
 | 
			
		||||
    }
 | 
			
		||||
  end
 | 
			
		||||
  object PMExport: TPopupMenu
 | 
			
		||||
 | 
			
		||||
@ -32,6 +32,8 @@ type
 | 
			
		||||
 | 
			
		||||
  TFPReportPreviewForm = class(TForm)
 | 
			
		||||
    AClose: TAction;
 | 
			
		||||
    ALast: TAction;
 | 
			
		||||
    AFirst: TAction;
 | 
			
		||||
    APrint: TAction;
 | 
			
		||||
    AExportPDF: TAction;
 | 
			
		||||
    AZoomReset: TAction;
 | 
			
		||||
@ -49,13 +51,17 @@ type
 | 
			
		||||
    PBottom: TPanel;
 | 
			
		||||
    PMExport: TPopupMenu;
 | 
			
		||||
    SBPrevious: TSpeedButton;
 | 
			
		||||
    SBPrevious1: TSpeedButton;
 | 
			
		||||
    ScrollBox1: TScrollBox;
 | 
			
		||||
    SpeedButton1: TSpeedButton;
 | 
			
		||||
    SpeedButton2: TSpeedButton;
 | 
			
		||||
    TBPreview: TToolBar;
 | 
			
		||||
    TBClose: TToolButton;
 | 
			
		||||
    TBExport: TToolButton;
 | 
			
		||||
    TBPDF: TToolButton;
 | 
			
		||||
    TBPrint: TToolButton;
 | 
			
		||||
    TBFirst: TToolButton;
 | 
			
		||||
    TBLast: TToolButton;
 | 
			
		||||
    ToolButton3: TToolButton;
 | 
			
		||||
    TBPrevious: TToolButton;
 | 
			
		||||
    TBNext: TToolButton;
 | 
			
		||||
@ -67,6 +73,10 @@ type
 | 
			
		||||
    procedure AExportExecute(Sender: TObject);
 | 
			
		||||
    procedure AExportPDFExecute(Sender: TObject);
 | 
			
		||||
    procedure AExportPDFUpdate(Sender: TObject);
 | 
			
		||||
    procedure AFirstExecute(Sender: TObject);
 | 
			
		||||
    procedure AFirstUpdate(Sender: TObject);
 | 
			
		||||
    procedure ALastExecute(Sender: TObject);
 | 
			
		||||
    procedure ALastUpdate(Sender: TObject);
 | 
			
		||||
    procedure ANextExecute(Sender: TObject);
 | 
			
		||||
    procedure ANextUpdate(Sender: TObject);
 | 
			
		||||
    procedure APreviousExecute(Sender: TObject);
 | 
			
		||||
@ -178,6 +188,26 @@ begin
 | 
			
		||||
  (Sender as TAction).Enabled:=ReportExportManager.FindExporter(PDFExport)<>Nil;
 | 
			
		||||
end;
 | 
			
		||||
 | 
			
		||||
procedure TFPReportPreviewForm.AFirstExecute(Sender: TObject);
 | 
			
		||||
begin
 | 
			
		||||
  PageIndex:=0;
 | 
			
		||||
end;
 | 
			
		||||
 | 
			
		||||
procedure TFPReportPreviewForm.AFirstUpdate(Sender: TObject);
 | 
			
		||||
begin
 | 
			
		||||
  (Sender as TAction).Enabled:=PageIndex>0;
 | 
			
		||||
end;
 | 
			
		||||
 | 
			
		||||
procedure TFPReportPreviewForm.ALastExecute(Sender: TObject);
 | 
			
		||||
begin
 | 
			
		||||
  PageIndex:=ReportPages.Count-1;
 | 
			
		||||
end;
 | 
			
		||||
 | 
			
		||||
procedure TFPReportPreviewForm.ALastUpdate(Sender: TObject);
 | 
			
		||||
begin
 | 
			
		||||
  (Sender as TAction).Enabled:=PageIndex<ReportPages.Count-1;
 | 
			
		||||
end;
 | 
			
		||||
 | 
			
		||||
procedure TFPReportPreviewForm.ANextExecute(Sender: TObject);
 | 
			
		||||
begin
 | 
			
		||||
  PageIndex:=PageIndex+1;
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user