Add two tests: comments1 and panes

Author: jaakkor2

src/LibXLSXWriter.jl

@@ -8,7 +8,7 @@ include("generated/libxlsxwriter_api.jl")
 
 lxw_chart_fill(; color=0x0, none=0x0, transparency=0x0) = lxw_chart_fill(color, none, transparency)
 lxw_chart_line(; color=0x0, none=0x0, width=0.0, dash_type=0x0, transparency=0x0) = lxw_chart_line(color, none, width, dash_type, transparency)
-lxw_chart_pattern(; fg_color=0x0, bg_color=0x0, type=0x0) =  lxw_chart_pattern(fg_color, bg_color, type)
+lxw_chart_pattern(; fg_color=0x0, bg_color=0x0, type=0x0) = lxw_chart_pattern(fg_color, bg_color, type)
 lxw_chart_point(; line=lxw_chart_line(), fill=lxw_chart_fill(), pattern=lxw_chart_pattern()) = lxw_chart_point(Ptr{line}(), Ptr{fill}(), Ptr{pattern}())
 
 # utility.h

test/comments1.jl

@@ -0,0 +1,12 @@
+# https://github.com/jmcnamara/libxlsxwriter/blob/main/examples/comments1.c
+
+using LibXLSXWriter: workbook_new, workbook_add_worksheet, worksheet_write_string, worksheet_write_comment, workbook_close
+
+workbook = workbook_new("comments1.xlsx")
+worksheet = workbook_add_worksheet(workbook, C_NULL)
+
+worksheet_write_string(worksheet, 0, 0, "Hello" , C_NULL)
+
+worksheet_write_comment(worksheet, 0, 0, "This is a comment")
+
+workbook_close(workbook)

test/panes.jl

@@ -0,0 +1,104 @@
+# https://github.com/jmcnamara/libxlsxwriter/blob/main/examples/panes.c
+
+using LibXLSXWriter: workbook_new, workbook_add_worksheet, workbook_add_format, format_set_align, LXW_ALIGN_CENTER, LXW_ALIGN_VERTICAL_CENTER, format_set_fg_color, format_set_bold, format_set_border, LXW_BORDER_THIN, worksheet_freeze_panes, worksheet_set_column, worksheet_set_row, worksheet_set_selection, worksheet_write_string, worksheet_split_panes, worksheet_write_number, workbook_close
+
+# Create a new workbook and add some worksheets.
+workbook = workbook_new("panes.xlsx")
+
+worksheet1 = workbook_add_worksheet(workbook, "Panes 1")
+worksheet2 = workbook_add_worksheet(workbook, "Panes 2")
+worksheet3 = workbook_add_worksheet(workbook, "Panes 3")
+worksheet4 = workbook_add_worksheet(workbook, "Panes 4")
+
+
+# Set up some formatting and text to highlight the panes.
+header = workbook_add_format(workbook)
+format_set_align(header, LXW_ALIGN_CENTER)
+format_set_align(header, LXW_ALIGN_VERTICAL_CENTER)
+format_set_fg_color(header, 0xD7E4BC)
+format_set_bold(header)
+format_set_border(header, LXW_BORDER_THIN)
+
+center = workbook_add_format(workbook)
+format_set_align(center, LXW_ALIGN_CENTER)
+
+
+## Example 1. Freeze pane on the top row.
+
+worksheet_freeze_panes(worksheet1, 1, 0)
+
+# Some sheet formatting.
+worksheet_set_column(worksheet1, 0, 8, 16, C_NULL)
+worksheet_set_row(worksheet1, 0, 20, C_NULL)
+worksheet_set_selection(worksheet1, 4, 3, 4, 3)
+
+# Some worksheet text to demonstrate scrolling.
+for col in 0:8
+    worksheet_write_string(worksheet1, 0, col, "Scroll down", header)
+end
+
+for row in 1:99, col in 0:8
+    worksheet_write_number(worksheet1, row, col, row + 1, center)
+end
+
+## Example 2. Freeze pane on the left column.
+
+worksheet_freeze_panes(worksheet2, 0, 1)
+
+# Some sheet formatting.
+worksheet_set_column(worksheet2, 0, 0, 16, C_NULL)
+worksheet_set_selection(worksheet2, 4, 3, 4, 3)
+
+# Some worksheet text to demonstrate scrolling.
+for row in 0:49
+    worksheet_write_string(worksheet2, row, 0, "Scroll right", header)
+    for col in 1:25
+        worksheet_write_number(worksheet2, row, col, col, center)
+    end
+end
+
+## Example 3. Freeze pane on the top row and left column.
+
+worksheet_freeze_panes(worksheet3, 1, 1)
+
+
+# Some sheet formatting.
+worksheet_set_column(worksheet3, 0, 25, 16, C_NULL)
+worksheet_set_row(worksheet3, 0, 20, C_NULL)
+worksheet_write_string(worksheet3, 0, 0, "", header)
+worksheet_set_selection(worksheet3, 4, 3, 4, 3)
+
+
+# Some worksheet text to demonstrate scrolling.
+for col in 1:25
+    worksheet_write_string(worksheet3, 0, col, "Scroll down", header)
+end
+
+for row in 1:49
+    worksheet_write_string(worksheet3, row, 0, "Scroll right", header)
+    for col in 1:25
+        worksheet_write_number(worksheet3, row, col, col, center)
+    end
+end
+
+
+## Example 4. Split pane on the top row and left column.
+# The divisions must be specified in terms of row and column dimensions.
+# The default row height is 15 and the default column width is 8.43
+
+worksheet_split_panes(worksheet4, 15, 8.43)
+
+# Some sheet formatting.
+# Some worksheet text to demonstrate scrolling.
+for col in 1:25
+    worksheet_write_string(worksheet4, 0, col, "Scroll", center)
+end
+
+for row in 1:49
+    worksheet_write_string(worksheet4, row, 0, "Scroll", center)
+    for col in 1:25
+        worksheet_write_number(worksheet4, row, col, col, center)
+    end
+end
+
+workbook_close(workbook)

test/runtests.jl

@@ -1,6 +1,15 @@
 using LibXLSXWriter
 using Test
 
-@testset "LibXLSXWriter.jl" begin
-    # Write your tests here.
+@testset "demo" begin
+    include("demo.jl")
+end
+@testset "chart_pie_colors" begin
+    include("chart_pie_colors.jl")
+end
+@testset "comments1" begin
+    include("comments1.jl")
+end
+@testset "panes" begin
+    include("panes.jl")
 end