GpStructuredStorage file   !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~€�‚ƒ„…†‡ˆ‰Š‹Œ�Ž��‘’“”•–—˜™š›œ�žŸ ¡¢£¤¥¦§¨©ª«¬­®¯°±²³´µ¶·¸¹º»¼½¾¿ÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþÿsqli.vtd# sqliForm.vtdõsqliFormName.vtd. sqliStep.vtd³sqliStepFile.vtd 8sqliStepStr.vtd 6sqliStepStrEvent.vtd · sqliVar.vtd … sqliVer.vtd ¨sqliReports.vtdacKeyacNamed acIsDebugacType acVarInINI acAutoStart acAutoClose acEndMessageacLocalization2acFormNameAuthoracActive anVersion acLogType acInstCoded anUserChg anUserIns adTimeChg adTimeIns acNoteacCompiledScriptEDU0002Overloaded routinesFAFFFTRT0€iÛ VÎÌB€O_¢‹ÍÌB acKey acFormName2 acDocType acObjectName2acType acKeyShortCut2acTabSheetName2 anUserChg anUserIns adTimeChg adTimeIns acFormType acFormName2acName2acKeyanNoacViewacSetOfacDescrÿacReportacFileCreateTableanFileDelimiter acFileNameÿacFileTableNameÿ acFileDest acFileType acFileTypeXML acShowIfEmptyacTitleButtons anTitleLinesanBeginFromRecord anUserChg anUserIns adTimeChg adTimeIns acCharSet2 acStyleSheetÿ acUnitName2 acNewThreadacDFMacPAS acSQLExport2acSQLExpacNoteEDU0002GPFÿÿAENF€æ¦šcÎÌB€LG»ÍÌB windows-1250 AresProjectFšProgram AresProject; uses sysutils, classes, forms, dialogs; procedure Test(I: Integer; D: Double); begin _macro.EventLogAdd(IntToStr(I)); _macro.EventLogAdd(FloatToStr(D)); end; procedure Test(S: String); begin _macro.EventLogAdd(S); end; procedure Test(D: Double); begin _macro.EventLogAdd(FloatToStr(D)); end; begin Test('abc'); Test(12.3); Test(5, 12.3); end. acKeyanNoanSeqNoacHField2acHType anHLengthanHDecacPField2acPTypeanPLegthanPDec acPFormat acPSeparator anUserChg anUserIns adTimeChg adTimeIns acKeyanNoanSeqNo acFieldName2 anFieldSize acFieldTitleacFieldReadOnly acEditType acFieldConstÿ anUserChg anUserIns adTimeIns adTimeChg acFieldFormatÿacFieldDefaultÿ acKeyanNo acDataEventacDataReturnValue acKeyAndNo anUserChg anUserIns adTimeChg adTimeIns acKey acWhereKeyanNo acFieldName acParamVar acFieldType acFieldREQacFieldCaption2 acDefaultExpacDefaultValue acLookUpSQLÿ acOperator acVarHint2 acAddApostrof anUserChg anUserIns adTimeChg adTimeIns acPrtCrit ACKEY ANVERSIONANNOACSQLEXP ACNOTEÐ ADTIMECHG ANUSERCHG ADTIMEINS ANUSERINSacReportacLangIdacLocalization2 acFormNamedacNamedacDefaultPrinterÿ acPreviewanMaxPrStLevelacSubstituteSignacPrintIfEmpty acPrintToText anNoOfCopy acOrderByÐ acRegUserCodeacActive acKeyShortCut2 anUserIns adTimeIns anUserChg adTimeChg acText1èacText2èacText3èacNoteè acReportData