GrapeCity ActiveReports for .NET 12.0J
LineInfo クラス
メンバ  使用例 

罫線情報を表します。Sheet.AddLineメソッドで使用して、線に関する情報を指定します。
オブジェクト モデル
LineInfo クラス
構文
'宣言
 
Public Class LineInfo 
public class LineInfo 
使用例
private void btnSpread_Click(Object sender, System.EventArgs e)
{
    //ワークブックの次元をし、シートコレクションにシートを追加します。
    GrapeCity.SpreadBuilder.Workbook sb = new GrapeCity.SpreadBuilder.Workbook();
    sb.Sheets.AddNew();

    //列、行またはセルに対してプロパティまたは値を設定します。
    sb.Sheets[0].Name = "Customer Call List";
    sb.Sheets[0].Columns(0).Width = 2 * 1440;
    sb.Sheets[0].Columns(1).Width = 1440;
    sb.Sheets[0].Columns(2).Width = 1440;
    sb.Sheets[0].Rows(0).Height = 1440/4;
    //ヘッダ行
    sb.Sheets[0].Cell(0,0).SetValue("Company Name");
    sb.Sheets[0].Cell(0,0).FontBold = true;
    sb.Sheets[0].Cell(0,1).SetValue("Contact Name");
    sb.Sheets[0].Cell(0,1).FontBold = true;
    sb.Sheets[0].Cell(0,2).SetValue("Phone");
    sb.Sheets[0].Cell(0,2).FontBold = true;
    //データの最初行
    sb.Sheets[0].Cell(1,0).SetValue("GrapeCity");
    sb.Sheets[0].Cell(1,1).SetValue("Mortimer");
    sb.Sheets[0].Cell(1,2).SetValue("(614) 895-3142");

    GrapeCity.SpreadBuilder.Imaging.LineInfo l = new GrapeCity.SpreadBuilder.Imaging.LineInfo();
    l.ColumnLeft = 3; //線の開始列
    l.Color = System.Drawing.Color.Salmon; //線の色
    l.ColumnRight = 8; //線の終了列
    l.dxL = 50;
    l.dxR = 60;
    l.dyB = 80;
    l.dyT = 10;
    l.EndAHLength = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadLengths.Long; //最後の矢印の長さ
    l.EndAHStyle = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadStyles.DoubleEndedOpen; //最後の矢印のスタイル
    l.EndAHWidth = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadWidths.Wide; //最後の矢印の幅
    l.fAuto = true;
    l.iQu = GrapeCity.SpreadBuilder.Imaging.ObjectDirection.UpperLeftToLowerRight; //線の方向
    l.MoveType = GrapeCity.SpreadBuilder.Imaging.SBFloatingMoveType.MoveSize; //ユーザーが線を移動またはリサイズできるかを設定する
    l.RowBottom = 8; //線の最後の行
    l.RowTop = 1; //線の最初の行
    l.StartAHLength = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadLengths.Long; //最初の矢印の長さ
    l.StartAHStyle = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadStyles.DoubleEndedOpen; //最初の矢印のスタイル
    l.StartAHWidth = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadWidths.Wide;
    l.Style = GrapeCity.SpreadBuilder.Imaging.LineStyles.Dash; //線のスタイル
    l.Weight = 5; //線の太さ

    sb.Sheets[0].AddLine(l);

    //ワークブックをExcelファイルで保存する
    sb.Save (Application.StartupPath + @"\x.xls");

    MessageBox.Show("Your Spreadsheet, " + sb.Sheets[0].Columns(0).OwnerSheet.Name + ", has been saved to " + Application.StartupPath + "\\x.xls");
}
Private Sub btnSpread_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSpread.Click
    'ワークブックの次元をし、シートコレクションにシートを追加します。
    Dim sb As New GrapeCity.SpreadBuilder.Workbook
    sb.Sheets.AddNew()
        
    '列、行またはセルに対してプロパティまたは値を設定します。
    With sb.Sheets(0)
        .Name = "Customer Call List"
        .Columns(0).Width = 2 * 1440
        .Columns(1).Width = 1440
        .Columns(2).Width = 1440
        .Rows(0).Height = 1440 / 4
        .Rows(0).AutoSize = False
        'ヘッダ行
        .Cell(0, 0).SetValue("Company Name")
        .Cell(0, 0).FontBold = True
        .Cell(0, 1).SetValue("Contact Name")
        .Cell(0, 1).FontBold = True
        .Cell(0, 2).SetValue("Phone")
        .Cell(0, 2).FontBold = True
        'データの最初行
        .Cell(1, 0).SetValue("Data Dynamics")
        .Cell(1, 1).SetValue("Mortimer")
        .Cell(1, 2).SetValue("(614) 895-3142")
    End With
    Dim l As New GrapeCity.SpreadBuilder.Imaging.LineInfo
    With l
        .colL = 3 '線の開始列
        .Color = System.Drawing.Color.Salmon '線の色
        .colR = 8 '線の終了列
        .dxL = 50
        .dxR = 60
        .dyB = 80
        .dyT = 10
        .EndAHLength = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadLengths.Long '最後の矢印の長さ
        .EndAHStyle = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadStyles.DoubleEndedOpen '最後の矢印のスタイル
        .EndAHWidth = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadWidths.Wide '最後の矢印の幅
        .fAuto = True
        .iQu = GrapeCity.SpreadBuilder.Imaging.ObjectDirection.UpperLeftToLowerRight '線の方向
        .MoveType = GrapeCity.SpreadBuilder.Imaging.SBFloatingMoveType.MoveSize 'ユーザーが線を移動またはリサイズできるかを設定する
        .rwB = 8 'bottom row for the line
        .rwT = 1 'top row for the line
        .StartAHLength = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadLengths.Long '最初の矢印の長さ
        .StartAHStyle = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadStyles.DoubleEndedOpen '最初の矢印のスタイル
        .StartAHWidth = GrapeCity.SpreadBuilder.Imaging.LineArrowHeadWidths.Wide
        .Style = GrapeCity.SpreadBuilder.Imaging.LineStyles.Dash '線のスタイル
        .Weight = 5 '線の太さ
    End With
    sb.Sheets(0).AddLine(l)

    'ワークブックをExcelファイルで保存する
    sb.Save(Application.StartupPath & "\x.xls")
	MessageBox.Show("Your Spreadsheet, " + sb.Sheets[0].Columns(0).OwnerSheet.Name + ", has been saved to " + Application.StartupPath + "\\x.xls");
End sub
継承階層

System.Object
   GrapeCity.SpreadBuilder.Imaging.LineInfo

参照

関連項目

LineInfo メンバ
GrapeCity.SpreadBuilder.Imaging 名前空間

 

 


Copyright © 2003 GrapeCity inc. All rights reserved.