uexcel97.pas

韩国的一个数据表控件2 很好用 支持D4-5 一共5个 Korea, a data table control

// XlPattern constants
type
  XlPattern = TOleEnum;
const
  xlPatternAutomatic = $FFFFEFF7;
  xlPatternChecker = $00000009;
  xlPatternCrissCross = $00000010;
  xlPatternDown = $FFFFEFE7;
  xlPatternGray16 = $00000011;
  xlPatternGray25 = $FFFFEFE4;
  xlPatternGray50 = $FFFFEFE3;
  xlPatternGray75 = $FFFFEFE2;
  xlPatternGray8 = $00000012;
  xlPatternGrid = $0000000F;
  xlPatternHorizontal = $FFFFEFE0;
  xlPatternLightDown = $0000000D;
  xlPatternLightHorizontal = $0000000B;
  xlPatternLightUp = $0000000E;
  xlPatternLightVertical = $0000000C;
  xlPatternNone = $FFFFEFD2;
  xlPatternSemiGray75 = $0000000A;
  xlPatternSolid = $00000001;
  xlPatternUp = $FFFFEFBE;
  xlPatternVertical = $FFFFEFBA;

// XlChartSplitType constants
type
  XlChartSplitType = TOleEnum;
const
  xlSplitByPosition = $00000001;
  xlSplitByPercentValue = $00000003;
  xlSplitByCustomSplit = $00000004;
  xlSplitByValue = $00000002;

// XlDataLabelPosition constants
type
  XlDataLabelPosition = TOleEnum;
const
  xlLabelPositionCenter = $FFFFEFF4;
  xlLabelPositionAbove = $00000000;
  xlLabelPositionBelow = $00000001;
  xlLabelPositionLeft = $FFFFEFDD;
  xlLabelPositionRight = $FFFFEFC8;
  xlLabelPositionOutsideEnd = $00000002;
  xlLabelPositionInsideEnd = $00000003;
  xlLabelPositionInsideBase = $00000004;
  xlLabelPositionBestFit = $00000005;
  xlLabelPositionMixed = $00000006;
  xlLabelPositionCustom = $00000007;

// XlTimeUnit constants
type
  XlTimeUnit = TOleEnum;
const
  xlDays = $00000000;
  xlMonths = $00000001;
  xlYears = $00000002;

// XlCategoryType constants
type
  XlCategoryType = TOleEnum;
const
  xlCategoryScale = $00000002;
  xlTimeScale = $00000003;
  xlAutomaticScale = $FFFFEFF7;

// XlBarShape constants
type
  XlBarShape = TOleEnum;
const
  xlBox = $00000000;
  xlPyramidToPoint = $00000001;
  xlPyramidToMax = $00000002;
  xlCylinder = $00000003;
  xlConeToPoint = $00000004;
  xlConeToMax = $00000005;

// XlChartType constants
type
  XlChartType = TOleEnum;
const
  xlColumnClustered = $00000033;
  xlColumnStacked = $00000034;
  xlColumnStacked100 = $00000035;
  xl3DColumnClustered = $00000036;
  xl3DColumnStacked = $00000037;
  xl3DColumnStacked100 = $00000038;
  xlBarClustered = $00000039;
  xlBarStacked = $0000003A;
  xlBarStacked100 = $0000003B;
  xl3DBarClustered = $0000003C;
  xl3DBarStacked = $0000003D;
  xl3DBarStacked100 = $0000003E;
  xlLineStacked = $0000003F;
  xlLineStacked100 = $00000040;
  xlLineMarkers = $00000041;
  xlLineMarkersStacked = $00000042;
  xlLineMarkersStacked100 = $00000043;
  xlPieOfPie = $00000044;
  xlPieExploded = $00000045;
  xl3DPieExploded = $00000046;
  xlBarOfPie = $00000047;
  xlXYScatterSmooth = $00000048;
  xlXYScatterSmoothNoMarkers = $00000049;
  xlXYScatterLines = $0000004A;
  xlXYScatterLinesNoMarkers = $0000004B;
  xlAreaStacked = $0000004C;
  xlAreaStacked100 = $0000004D;
  xl3DAreaStacked = $0000004E;
  xl3DAreaStacked100 = $0000004F;
  xlDoughnutExploded = $00000050;
  xlRadarMarkers = $00000051;
  xlRadarFilled = $00000052;
  xlSurface = $00000053;
  xlSurfaceWireframe = $00000054;
  xlSurfaceTopView = $00000055;
  xlSurfaceTopViewWireframe = $00000056;
  xlBubble = $0000000F;
  xlBubble3DEffect = $00000057;
  xlStockHLC = $00000058;
  xlStockOHLC = $00000059;
  xlStockVHLC = $0000005A;
  xlStockVOHLC = $0000005B;
  xlCylinderColClustered = $0000005C;
  xlCylinderColStacked = $0000005D;
  xlCylinderColStacked100 = $0000005E;
  xlCylinderBarClustered = $0000005F;
  xlCylinderBarStacked = $00000060;
  xlCylinderBarStacked100 = $00000061;
  xlCylinderCol = $00000062;
  xlConeColClustered = $00000063;
  xlConeColStacked = $00000064;
  xlConeColStacked100 = $00000065;
  xlConeBarClustered = $00000066;
  xlConeBarStacked = $00000067;
  xlConeBarStacked100 = $00000068;
  xlConeCol = $00000069;
  xlPyramidColClustered = $0000006A;
  xlPyramidColStacked = $0000006B;
  xlPyramidColStacked100 = $0000006C;
  xlPyramidBarClustered = $0000006D;
  xlPyramidBarStacked = $0000006E;
  xlPyramidBarStacked100 = $0000006F;
  xlPyramidCol = $00000070;
  xl3DColumn = $FFFFEFFC;
  xlLine = $00000004;
  xl3DLine = $FFFFEFFB;
  xl3DPie = $FFFFEFFA;
  xlPie = $00000005;
  xlXYScatter = $FFFFEFB7;
  xl3DArea = $FFFFEFFE;
  xlArea = $00000001;
  xlDoughnut = $FFFFEFE8;
  xlRadar = $FFFFEFC9;

// XlChartItem constants
type
  XlChartItem = TOleEnum;
const
  xlDataLabel = $00000000;
  xlChartArea = $00000002;
  xlSeries = $00000003;
  xlChartTitle = $00000004;
  xlWalls = $00000005;
  xlCorners = $00000006;
  xlDataTable = $00000007;
  xlTrendline = $00000008;
  xlErrorBars = $00000009;
  xlXErrorBars = $0000000A;
  xlYErrorBars = $0000000B;
  xlLegendEntry = $0000000C;
  xlLegendKey = $0000000D;
  xlShape = $0000000E;
  xlMajorGridlines = $0000000F;
  xlMinorGridlines = $00000010;
  xlAxisTitle = $00000011;
  xlUpBars = $00000012;
  xlPlotArea = $00000013;
  xlDownBars = $00000014;
  xlAxis = $00000015;
  xlSeriesLines = $00000016;
  xlFloor = $00000017;
  xlLegend = $00000018;
  xlHiLoLines = $00000019;
  xlDropLines = $0000001A;
  xlRadarAxisLabels = $0000001B;
  xlNothing = $0000001C;
  xlLeaderLines = $0000001D;

// XlSizeRepresents constants
type
  XlSizeRepresents = TOleEnum;
const
  xlSizeIsWidth = $00000002;
  xlSizeIsArea = $00000001;

// XlInsertShiftDirection constants
type
  XlInsertShiftDirection = TOleEnum;
const
  xlShiftDown = $FFFFEFE7;
  xlShiftToRight = $FFFFEFBF;

// XlDeleteShiftDirection constants
type
  XlDeleteShiftDirection = TOleEnum;
const
  xlShiftToLeft = $FFFFEFC1;
  xlShiftUp = $FFFFEFBE;

// XlDirection constants
type
  XlDirection = TOleEnum;
const
  xlDown = $FFFFEFE7;
  xlToLeft = $FFFFEFC1;
  xlToRight = $FFFFEFBF;
  xlUp = $FFFFEFBE;

// XlConsolidationFunction constants
type
  XlConsolidationFunction = TOleEnum;
const
  xlAverage = $FFFFEFF6;
  xlCount = $FFFFEFF0;
  xlCountNums = $FFFFEFEF;
  xlMax = $FFFFEFD8;
  xlMin = $FFFFEFD5;
  xlProduct = $FFFFEFCB;
  xlStDev = $FFFFEFC5;
  xlStDevP = $FFFFEFC4;
  xlSum = $FFFFEFC3;
  xlVar = $FFFFEFBC;
  xlVarP = $FFFFEFBB;

// XlSheetType constants
type
  XlSheetType = TOleEnum;
const
  xlChart = $FFFFEFF3;
  xlDialogSheet = $FFFFEFEC;
  xlExcel4IntlMacroSheet = $00000004;
  xlExcel4MacroSheet = $00000003;
  xlWorksheet = $FFFFEFB9;

// XlLocationInTable constants
type
  XlLocationInTable = TOleEnum;
const
  xlColumnHeader = $FFFFEFF2;
  xlColumnItem = $00000005;
  xlDataHeader = $00000003;
  xlDataItem = $00000007;
  xlPageHeader = $00000002;
  xlPageItem = $00000006;
  xlRowHeader = $FFFFEFC7;
  xlRowItem = $00000004;
  xlTableBody = $00000008;

// XlFindLookIn constants
type
  XlFindLookIn = TOleEnum;
const
  xlFormulas = $FFFFEFE5;
  xlComments = $FFFFEFD0;
  xlValues = $FFFFEFBD;

// XlWindowType constants
type
  XlWindowType = TOleEnum;
const
  xlChartAsWindow = $00000005;
  xlChartInPlace = $00000004;
  xlClipboard = $00000003;
  xlInfo = $FFFFEFDF;
  xlWorkbook = $00000001;

// XlPivotFieldDataType constants
type
  XlPivotFieldDataType = TOleEnum;
const
  xlDate = $00000002;
  xlNumber = $FFFFEFCF;
  xlText = $FFFFEFC2;

// XlCopyPictureFormat constants
type
  XlCopyPictureFormat = TOleEnum;
const
  xlBitmap = $00000002;
  xlPicture = $FFFFEFCD;

// XlPivotTableSourceType constants
type
  XlPivotTableSourceType = TOleEnum;
const
  xlConsolidation = $00000003;
  xlDatabase = $00000001;
  xlExternal = $00000002;
  xlPivotTable = $FFFFEFCC;

// XlReferenceStyle constants
type
  XlReferenceStyle = TOleEnum;
const
  xlA1 = $00000001;
  xlR1C1 = $FFFFEFCA;

// XlMSApplication constants
type
  XlMSApplication = TOleEnum;
const
  xlMicrosoftAccess = $00000004;
  xlMicrosoftFoxPro = $00000005;
  xlMicrosoftMail = $00000003;
  xlMicrosoftPowerPoint = $00000002;
  xlMicrosoftProject = $00000006;
  xlMicrosoftSchedulePlus = $00000007;
  xlMicrosoftWord = $00000001;

// XlMouseButton constants
type
  XlMouseButton = TOleEnum;
const
  xlNoButton = $00000000;
  xlPrimaryButton = $00000001;
  xlSecondaryButton = $00000002;

// XlCutCopyMode constants
type
  XlCutCopyMode = TOleEnum;
const
  xlCopy = $00000001;
  xlCut = $00000002;

// XlFillWith constants
type
  XlFillWith = TOleEnum;
const
  xlFillWithAll = $FFFFEFF8;
  xlFillWithContents = $00000002;
  xlFillWithFormats = $FFFFEFE6;

// XlFilterAction constants
type
  XlFilterAction = TOleEnum;
const
  xlFilterCopy = $00000002;
  xlFilterInPlace = $00000001;

// XlOrder constants
type
  XlOrder = TOleEnum;
const
  xlDownThenOver = $00000001;
  xlOverThenDown = $00000002;

// XlLinkType constants
type
  XlLinkType = TOleEnum;
const
  xlLinkTypeExcelLinks = $00000001;
  xlLinkTypeOLELinks = $00000002;

// XlApplyNamesOrder constants
type
  XlApplyNamesOrder = TOleEnum;
const
  xlColumnThenRow = $00000002;
  xlRowThenColumn = $00000001;

// XlEnableCancelKey constants
type
  XlEnableCancelKey = TOleEnum;
const
  xlDisabled = $00000000;
  xlErrorHandler = $00000002;
  xlInterrupt = $00000001;

// XlPageBreak constants
type
  XlPageBreak = TOleEnum;
const
  xlPageBreakAutomatic = $FFFFEFF7;
  xlPageBreakManual = $FFFFEFD9;

// XlOLEType constants
type
  XlOLEType = TOleEnum;
const
  xlOLEControl = $00000002;
  xlOLEEmbed = $00000001;
  xlOLELink = $00000000;

// XlPageOrientation constants
type
  XlPageOrientation = TOleEnum;
const
  xlLandscape = $00000002;
  xlPortrait = $00000001;

// XlLinkInfo constants
type
  XlLinkInfo = TOleEnum;
const
  xlEditionDate = $00000002;
  xlUpdateState = $00000001;

// XlCommandUnderlines constants
type
  XlCommandUnderlines = TOleEnum;
const
  xlCommandUnderlinesAutomatic = $FFFFEFF7;
  xlCommandUnderlinesOff = $FFFFEFCE;
  xlCommandUnderlinesOn = $00000001;

// XlOLEVerb constants
type
  XlOLEVerb = TOleEnum;
const
  xlVerbOpen = $00000002;
  xlVerbPrimary = $00000001;

// XlCalculation constants
type
  XlCalculation = TOleEnum;
const
  xlCalculationAutomatic = $FFFFEFF7;
  xlCalculationManual = $FFFFEFD9;
  xlCalculationSemiautomatic = $00000002;

// XlFileAccess constants
type
  XlFileAccess = TOleEnum;
const
  xlReadOnly = $00000003;
  xlReadWrite = $00000002;

// XlEditionType constants
type
  XlEditionType = TOleEnum;
const
  xlPublisher = $00000001;
  xlSubscriber = $00000002;

// XlObjectSize constants
type
  XlObjectSize = TOleEnum;
const
  xlFitToPage = $00000002;
  xlFullPage = $00000003;
  xlScreenSize = $00000001;

// XlLookAt constants
type
  XlLookAt = TOleEnum;
const
  xlPart = $00000002;
  xlWhole = $00000001;

// XlMailSystem constants
type
  XlMailSystem = TOleEnum;
const
  xlMAPI = $00000001;
  xlNoMailSystem = $00000000;
  xlPowerTalk = $00000002;

// XlLinkInfoType constants
type
  XlLinkInfoType = TOleEnum;
const
  xlLinkInfoOLELinks = $00000002;
  xlLinkInfoPublishers = $00000005;
  xlLinkInfoSubscribers = $00000006;

// XlCVError constants
type
  XlCVError = TOleEnum;
const
  xlErrDiv0 = $000007D7;
  xlErrNA = $000007FA;
  xlErrName = $000007ED;
  xlErrNull = $000007D0;
  xlErrNum = $000007F4;
  xlErrRef = $000007E7;
  xlErrValue = $000007DF;

// XlEditionFormat constants
type
  XlEditionFormat = TOleEnum;
const
  xlBIFF = $00000002;
  xlPICT = $00000001;
  xlRTF = $00000004;
  xlVALU = $00000008;

// XlLink constants
type
  XlLink = TOleEnum;
const
  xlExcelLinks = $00000001;
  xlOLELinks = $00000002;
  xlPublishers = $00000005;
  xlSubscribers = $00000006;

// XlCellType constants
type