xFunction v2.4   The library of useful procedures and functions. 
      MODULE('xFunction Library v2.4')
!=================================================================================================
xInitLibrary            PROCEDURE
!=================================================================================================
! Date time function
!=================================================================================================
xAgeCalculate           PROCEDURE(LONG  Birthday), STRING
xGetZodiac              PROCEDURE(LONG  Birthday, *STRING ZodiacSign), BYTE, PROC
xGetChineYear           PROCEDURE(LONG  Year,     *STRING ChineYear), BYTE, PROC
xGetDayName             PROCEDURE(, ), STRING
xGetDayNumber           PROCEDURE(), BYTE
xLeapYear               PROCEDURE(), SHORT
xMonthOfYear            PROCEDURE(, ), STRING
xQuartOfYear            PROCEDURE(), BYTE
xWeekOfYear             PROCEDURE(), BYTE
xWeekOfMonth            PROCEDURE(), BYTE
xIsLastDayOfMonth       PROCEDURE(), BYTE
xLastDayOfMonth         PROCEDURE(), LONG
xDayOfYear              PROCEDURE(), SHORT
xDaysLeftInYear         PROCEDURE(), SHORT
xSetPeriodLastWeek      PROCEDURE(*LONG LowDate, *LONG HighDate)
xSetPeriodCurrWeek      PROCEDURE(*LONG LowDate, *LONG HighDate)
xSetPeriodNextWeek      PROCEDURE(*LONG LowDate, *LONG HighDate)
xSetPeriodLastMonth     PROCEDURE(*LONG LowDate, *LONG HighDate)
xSetPeriodCurrMonth     PROCEDURE(*LONG LowDate, *LONG HighDate)
xSetPeriodNextMonth     PROCEDURE(*LONG LowDate, *LONG HighDate)
xSetPeriodLastQuart     PROCEDURE(*LONG LowDate, *LONG HighDate)
xSetPeriodCurrQuart     PROCEDURE(*LONG LowDate, *LONG HighDate)
xSetPeriodNextQuart     PROCEDURE(*LONG LowDate, *LONG HighDate)
xSetEngMonth            PROCEDURE(BYTE Mon, STRING MonthName)
xSetEngDay              PROCEDURE(BYTE Day, STRING DayName)
xSetRusZodiac           PROCEDURE(BYTE SignNum, STRING SignName)
xSetEngZodiac           PROCEDURE(BYTE SignNum, STRING SignName)
xSetRusChineYear        PROCEDURE(BYTE SignNum, STRING SignName)
xSetEngChineYear        PROCEDURE(BYTE SignNum, STRING SignName)

!=================================================================================================
! File and path function
!=================================================================================================
xCheckForSubfolders     PROCEDURE(STRING ParentDirectory), BYTE
xCopyFile               PROCEDURE(STRING PassedSource, STRING PassedTarget), BYTE
xMoveFile               PROCEDURE(STRING PassedSource, STRING PassedTarget), BYTE
xCreateDir              PROCEDURE(STRING InPath), BYTE
xCreateTreeDir          PROCEDURE(STRING Tree), BYTE
xDeleteFile             PROCEDURE(STRING PassedFile), BYTE
xNormDir                PROCEDURE(STRING InPath),STRING
xDeNormDir              PROCEDURE(STRING InPath), STRING
xExtractExt             PROCEDURE(STRING INP:Path), STRING
xExtractFile            PROCEDURE(STRING INP:Path), STRING
xExtractFileName        PROCEDURE(STRING INP:Path), STRING
xExtractPath            PROCEDURE(STRING Inp:Path), STRING
xFindFile               PROCEDURE(STRING PassedFile), BYTE
xGetFileAttr            PROCEDURE(STRING PassFile, LONG Attr), BYTE
xSetFileAttr            PROCEDURE(STRING PassFile, LONG Attr), BYTE
xPathExists             PROCEDURE(STRING INP:Path),BYTE
xRemovePathFromFileName PROCEDURE(*STRING FileName1, *STRING Path), STRING
xGetRelativePath        PROCEDURE(STRING FileName), STRING
xGetDrivers             PROCEDURE(*DriversQueue Drv)
xGetFileSize            PROCEDURE(STRING FileName), LONG
xGetTempPath            PROCEDURE(),STRING

!=================================================================================================
! Misc function
!=================================================================================================
xGenGlobalID            PROCEDURE(), STRING
xGetUniqCode            PROCEDURE(FILE F_File, KEY K_Key, *LONG V_Var), LONG
xGetConfig              PROCEDURE(FILE FilesName), BYTE,PROC
xPutConfig              PROCEDURE(FILE FilesName), BYTE,PROC
xOpenFolder             PROCEDURE(STRING OpenPath)
xSetLanguage            PROCEDURE(BYTE Language)
xGetFileVersion         PROCEDURE(STRING FFileName),STRING

!=================================================================================================
! Extended standard function
!=================================================================================================
xDelay                  PROCEDURE(ULONG Delay)
xHex                    PROCEDURE(BYTE FirstParam), STRING
xLenStr                 PROCEDURE(STRING Line),LONG
xMessage                PROCEDURE(STRING MessageText, , , , UNSIGNED DefaultButton=0, BOOL Style=FALSE),UNSIGNED,PROC
xWarning                PROCEDURE(STRING WarningMessage, ), BYTE,PROC

!=================================================================================================
! Debug function
!=================================================================================================
xDebug                  PROCEDURE(STRING Messages)
xDebugEvent             PROCEDURE(LONG EventParam)

!=================================================================================================
! Work with Clarion EMBED editor
!=================================================================================================
xPasteToEditor          PROCEDURE(LONG WinHandle, )
xCopyFromEditor         PROCEDURE(LONG WinHandle)

!=================================================================================================
! Other
!=================================================================================================
xGetMemorySize          PROCEDURE(BYTE MemType), REAL
!=================================================================================================

!=======================================================================================================================
! Network
!=======================================================================================================================
xNetDialog              PROCEDURE(),STRING,PROC


For download xFunction Library click here

Version

Release date

Whats New
2.7 2010/08/23 Compatibility with Clarion 7
2.5 2006-03-14
  • New function was added.
    xGetClentRectSize PROCEDURE(WINDOW Window, *LONG Width, *LONG Height)
    For getting size of Client Rectangle in your program.
    You can get width and height of 'Clear' rectangle (without height of menu,
    height of toolbar, without borders).
    		•
    2.4 2005/10/24
  • New function was added. xNetDialog PROCEDURE(),STRING,PROC
      For getting Computer Name from network
    • 2.3 2005/09/22
  • New function was added. xGetFileSize PROCEDURE(STRING FileName), LONG
    		•
    2.2 2005/07/18
  • Compatible with Clarion 6.2;
  • New installation kit created by SetupBuilder 5.0;
  • New functions were added.

       Date functions:
         xWeekOfMonth
         xSetPeriodLastWeek
         xSetPeriodCurrWeek
         xSetPeriodNextWeek

       Misc function:
         xGetFileVersion
    • 2.1 2004/02/21
  • This is bugfix. xFindFile function was fixed.
    • 2.0 2003/12/09
  • Now without "BlackBox" (no DLL)! Only Pure Clarion Code and WinAPI
    • 1.8 2003/07/14
  • xFunction now compatible with Clarion 6
    • 1.7 2003/02/01 This is Bugfix.
  • Function xWeekOfYear was fixed. It did not work with other year except current.

    Thanks to Steen Maigaard
    • 1.6 2002/06/15 New Files functions were added.

  • xSetFileAttr
  • xGetRelativePath
    		•
    1.5 2002/06/02 New Horoscope functions were added.

  • xGetZodiac
  • xGetChineYear
  • xSetRusZodiac, xSetEngZodiac
  • xSetRusChineYear, xSetEngChineYear

    By default in xInitLybrary procedure arrays with names of Zodiac Signs and Chinese horoscope are initialized as:
    * Aries, Taurus, Gemini, Cancer, Leo, Virgo, Libra, Scorpio, Sagittarius, Capricorn, Aquarius, Pisces;
    * Ox, Tiger, Cat, Dragon, Snake, Horse, Goat, Monkey, Rooster, Dog, Pig, Rat;

    You can use xSetEngZodiac and xSetEngChineYear procedures for a changing these names, in the correspondence yours the native language;
    • 1.4 2002/03/05 New Date functions were added.

  • xSetPeriodLastMonth, xSetPeriodCurrMonth, xSetPeriodNextMonth,
  • xSetPeriodLastQuart, xSetPeriodCurrQuart, xSetPeriodNextQuart
    • 1.3 2001/10/24 New Date functions were added.

  • xIsLastDayOfMonth, xLastDayOfMonth, xDayOfYear, xDaysLeftInYear
    • 1.2 2001/09/16
  • New function was added. xSetEngDay
    		•
    1.1 2001/07/26
  • New functions were added. xGetMemorySize, xSetEngMonth, xGetDrivers
    		•
    1.0 2001/06/12
  • Original (first) release