#!/usr/bin/ruby -w
# -*- coding: utf-8 -*-

#######################################################################
#
# Example of using the WriteExcel module to create worksheet panes.
#
# reverse('©'), May 2001, John McNamara, jmcnamara@cpan.org
#
# original written in Perl by John McNamara
# converted to Ruby by Hideo Nakamura, cxn03651@msj.biglobe.ne.jp
#

require 'writeexcel'

workbook  = WriteExcel.new("panes.xls")

worksheet1 = workbook.add_worksheet('Panes 1')
worksheet2 = workbook.add_worksheet('Panes 2')
worksheet3 = workbook.add_worksheet('Panes 3')
worksheet4 = workbook.add_worksheet('Panes 4')

# Freeze panes
worksheet1.freeze_panes(1, 0) # 1 row

worksheet2.freeze_panes(0, 1) # 1 column
worksheet3.freeze_panes(1, 1) # 1 row and column

# Split panes.
# The divisions must be specified in terms of row and column dimensions.
# The default row height is 12.75 and the default column width is 8.43
#
worksheet4.split_panes(12.75, 8.43, 1, 1) # 1 row and column


#######################################################################
#
# Set up some formatting and text to highlight the panes
#

header = workbook.add_format
header.set_color('white')
header.set_align('center')
header.set_align('vcenter')
header.set_pattern
header.set_fg_color('green')

center = workbook.add_format
center.set_align('center')

#######################################################################
#
# Sheet 1
#

worksheet1.set_column('A:I', 16)
worksheet1.set_row(0, 20)
worksheet1.set_selection('C3')

(0..8).each { |i| worksheet1.write(0, i, 'Scroll down', header) }
(1..100).each do |i|
 (0..8).each { |j| worksheet1.write(i, j, i + 1, center) }
end

#######################################################################
#
# Sheet 2
#

worksheet2.set_column('A:A', 16)
worksheet2.set_selection('C3')

(0..49).each do |i|
  worksheet2.set_row(i, 15)
  worksheet2.write(i, 0, 'Scroll right', header)
end

(0..49).each do |i|
  (1..25).each { |j| worksheet2.write(i, j, j, center) }
end

#######################################################################
#
# Sheet 3
#

worksheet3.set_column('A:Z', 16)
worksheet3.set_selection('C3')

(1..25).each { |i| worksheet3.write(0, i, 'Scroll down',  header) }

(1..49).each { |i| worksheet3.write(i, 0, 'Scroll right', header) }

(1..49).each do |i|
  (1..25).each { |j| worksheet3.write(i, j, j, center) }
end

#######################################################################
#
# Sheet 4
#

worksheet4.set_selection('C3')

(1..25).each { |i| worksheet4.write(0, i, 'Scroll', center) }

(1..49).each { |i| worksheet4.write(i, 0, 'Scroll', center) }

(1..49).each do |i|
  (1..25).each { |j| worksheet4.write(i, j, j, center) }
end

workbook.close