'Declaration Public Const SortUnsortedImage As Integer
'Usage Dim value As Integer value = SpreadView.SortUnsortedImage
public const int SortUnsortedImage
'Declaration Public Const SortUnsortedImage As Integer
'Usage Dim value As Integer value = SpreadView.SortUnsortedImage
public const int SortUnsortedImage
FarPoint.Win.Spread.SpreadView wrkbk = fpSpread1.GetRootWorkbook(); wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortAscendingImage, Image.FromFile("D:\\up.bmp")); wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortAscendingImageDisabled, Image.FromFile("D:\\up-dis.bmp")); wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortDescendingImage, Image.FromFile("D:\\down.bmp")); wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortDescendingImageDisabled, Image.FromFile("D:\\down-dis.bmp")); wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortUnsortedImage, Image.FromFile("D:\\unsort.bmp")); wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortUnsortedImageDisabled, Image.FromFile("D:\\unsort-dis.bmp")); Random r = new Random(); int i, j = 0; for (i = 0; i <;= 7; i++) for (j = 0; j<= 7; j++) { fpSpread1.ActiveSheet.SetValue(i, j, r.Next().ToString()); } fpSpread1.ActiveSheet.Columns[0].AllowAutoSort = true; Image indicator; indicator = wrkbk.GetImage(4); pictureBox1.Image = indicator;
Dim wrkbk As FarPoint.Win.Spread.SpreadView = fpSpread1.GetRootWorkbook() wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortAscendingImage, Image.FromFile("D:\up.bmp")) wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortAscendingImageDisabled, Image.FromFile("D:\up-dis.bmp")) wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortDescendingImage, Image.FromFile("D:\down.bmp")) wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortDescendingImageDisabled, Image.FromFile("D:\down-dis.bmp")) wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortUnsortedImage, Image.FromFile("D:\unsort.bmp")) wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.SortUnsortedImageDisabled, Image.FromFile("D:\unsort-dis.bmp")) Dim r As New Random Dim i, j As Integer For i = 0 To 7 For j = 0 To 7 fpSpread1.ActiveSheet.SetValue(i, j, r.Next.ToString()) Next j Next i fpSpread1.ActiveSheet.Columns(0).AllowAutoSort = True Dim indicator As Image indicator = wrkbk.GetImage(4) PictureBox1.Image = indicator