Types

TCrReportName

= string[255];

TCrBoolean

= (cFalse, cTrue, cDefault);

TCrOutput

= (toWindow, toPrinter, toExport);

TCrState

= (crsSetup, crsInit);

TCrError

= (errVCL, errEngine);

TCrColumnWidth

= (ByArea, ByConstant);

TCrExportAppName

= string;

TCrExportFileName

= string[255];

TCrExportType

= (Records, TabSeparated, Ascii, Dif, Csv, CharacterSeparated,

TabSeparatedText, CrystalReportRPT, Excel2, Excel3, Excel4,

LotusWK1, LotusWK3, LotusWKS, RTF, WordForWindows, Excel5,

HTML30, HTML32ext, HTML32std, ODBCTable, PaginatedText,

Excel5Extended, ReportDefinition);

VCL Reference

200

TCrExportDestination

= (toFile, toEmailViaMapi, toEmailViaVIM, toMSExchange, to

Application);

TCrFieldCharSeparator

= string[1];

TCrFieldDelimiter

= string[PE_FIELDDELIMLEN]; {16}

TCrFieldMappingInfo

= class(TPersistent)

public

property TableName :

string

property FieldName :

string

property FieldType :

TCrFieldValueType

property MapTo :

integer

end;

TCrFieldMappingType

= (fmAuto, fmPrompt, fmEvent)

TCrFieldValueType

= (fvUnknown, fvInt8s, fvInt8u, fvInt16s, fvInt16u, fvInt32s, fvInt32u,

fvNumber, fvCurrency, fvBoolean, fvDate, fvTime, fvString,

fvTransientMemo, fvPersistentMemo, fvBlob, fvDateTime, fvBitmap,

fvIcon, fvPicture, fvOle, fvGraph);

TCrAreaFormatFormula

= (afSuppress, afHide, afNewPageBefore, afNewPageAfter,

afKeepTogether, afResetPageNAfter, afPrintAtBottomOfPage);

TCrSectionFormatFormula

= (sfSuppress, sfPrintAtBottomOfPage, sfNewPageBefore,

sfNewPageAfter, sfResetPageNAfter, sfKeepTogether,

sfSuppressBlankSection, sfUnderlaySection, sfBackgroundColor);

TCrBarDirection

= (bdHorizontal, bdVertical, bdDefault);

TCrGraphDirection

= (Rows, Cols, RowCol, ColRow, Unknown);

TCrGraphType

= (SideBySide, ThreeDSide, StackedBar, ThreeDStacked, PercentBar,

ThreeDPercent, Line, Area, ThreeDBars, Pie, MultiplePie,

WeightedPie, UserDefined, UnknownGraph);

TCrGraphTextType

= string[128];

TCrMarginTwips

= -2..PE_SM_DEFAULT; {32768}

VCL Reference

201

TCrParamFieldName

= string[255];

TCrParamFieldReportName

= string[128];

TCrParamFieldSource

= (psReport, psStoredProc, psQuery);

TCrParamFieldType

= (pfNumber, pfCurrency, pfBoolean, pfDate, pfString), pfDateTime,

pfTime, pfInteger, pfColor, pfChar, pfLong, pfNoValue);

TCrParamInfoValueType

= (vtRanges, vtDiscrete);

TCrRangeBounds

= (IncludeStartAndEnd, IncludeStartOnly, IncludeEndOnly,

ExcludeStartAndEnd);

TCrPrinterDevice

= class Driver, Device, Port : string;

TCrPrinterName

= string[80];

TCrCollation

= (Uncollated, Collated, DefaultCollation);

TCrOrientation

= (orDefault, orPortrait, orLandscape);

TCrPreserveRptSet

= (prOrientation, prPaperSize, prPaperSource);

TCrPreserveRptSettings

= set of TCrPreserveRptSet

TCrPrintFileName

= string;

TCrDateTimeType

= (dtConvertToString, dtConvertToDate, dtKeepAsDateTime,

dtDefault);

TCrFontCharSet

= (fcAnsi, fcDefault, fcSymbol, fcShiftJis, fcHangeul, fcChineseBig5,

fcOEM);

TCrFontFamily

= (ffDefault, ffRoman, ffSwiss, ffModern, ffScript, ffDecorative);

TCrFontScope

= (fsFields, fsText, fsBoth);

TCrFontWeight

= (fwDefault, fwThin, fwExtraLight, fwLight, fwNormal,

fwMedium, fwSemiBold, fwBold, fwExtraBold, fwHeavy);

TCrSortDirection

= (sdDescending, sdAscending, sdDefault);

TCrGroupType

= (gtOther, gtDate, gtBoolean);

TCrGroupDirection

= (gdDescending, gdAscending, gdOriginal, gdSpecified,

gdDefault);

VCL Reference

202

TCrGroupCondition

= (AnyChange, dateDaily, dateWeekly, dateBiWeekly,

dateSemiMonthly, dateMonthly, dateQuarterly, dateSemiAnnually,

dateAnnually, boolToYes, boolToNo, boolEveryYes, boolEveryNo,

boolNextIsYes, boolNextIsNo);

TCrTopNOptions

= (tnUnsorted, tnSorted, tnTopN, tnBottomN, tnDefault);

TCrConnectMethod

= (useConnect, useLogOnInfo);

TCrStoredProcParamName

= string[128];

TCrStoredProcParamType

= (spLongVarChar, spBinary, spVarBinary, spLongVarBinary,

spBigInt, spTinyInt, spBit, spChar, spNumeric, spDecimal, spInteger,

spSmallInt, spFloat, spReal, spDouble, spDate, spTime,

spTimeStamp, spVarChar);

TCrSummaryString

= string[128];

TCrTableType

= (ttUnknown, ttStandard, ttSQL, ttStoredProcedure);

TCrFormBorderStyle

= bsNone..bsDialog;

TCrZoomMagnification

= -1..400;

TCrZoomPreview

= (pwNormal, pwPageWidth, pwWholePage, pwDefault);

TCrWindowCursor

= (wcDefault, wcArrow, wcCross, wcIBeam, wcUpArrow, wcSizeAll,

wcSizeNWSE, wcSizeNESW, wcSizeWE, wcSizeNS, wcNo, wcWait,

wcAppStart, wcHelp, wcMagnify);

TCrDrillDownType

= (ddOnGroup, ddOnGroupTree, ddOnGraph, ddOnMap,

ddOnSubreport);

TCrMouseClickAction

= (mbNotSupported, mbDown, mbUp);

TCrMouseClickType

= (mcLeft, mcRight, mcMiddle);

VCL Reference

203