HMGforum.com

Code: Select all

- Now all controls (Button, CheckButton, ToolBarButton, ComboBox, Grid, Tab, Tree, Menu, etc) of the HMG loaded images: BMP, GIF, TIF, JPG and PNG and support the NOTRANSPARENT property

- Print images in formats: BMP, GIF, JPG, TIF, WMF, EMF, CUR and PNG. 
@ <nRow> , <nCol> PRINT IMAGE <cImageFileName> | <cImageResourcename>
    WIDTH <nWidth>
    HEIGHT <nHeight>
    [ STRETCH ]
    [ TRANSPARENT ]
    [ TRANSPARENTCOLOR anTransparentColor ]
 
- DatePicker control --> New property FORMAT <cFormatDate> (see demo)

Code: Select all

#include "hmg.ch"

Function Main

   DEFINE WINDOW Form_1 ;
      AT 0,0 ;
      WIDTH 600 HEIGHT 400 ;
      TITLE "HMG DatePicker Format" ;
      MAIN

      @ 10,10 DATEPICKER Date_1 VALUE DATE() WIDTH 280 HEIGHT 50 FORMAT "'Today is:' dddd d MMMM' of 'yyyy"

      @ 10,330 DATEPICKER Date_2 VALUE DATE() FORMAT "yyyy:MM:dd"

      @ 230,10 DATEPICKER Date_3 VALUE DATE() FORMAT "dd/MM/yyyy"

      @ 230,310 DATEPICKER Date_4 VALUE DATE() FORMAT "dd-MM-yyyy"

   END WINDOW

   CENTER WINDOW Form_1
   ACTIVATE WINDOW Form_1
Return Nil


/*
Note: description of the cDateFormat string
 
   "d"        The one- or two-digit day.
   "dd"       The two-digit day. Single-digit day values are preceded by a zero.
   "ddd"      The three-character weekday abbreviation.
   "dddd"     The full weekday name.
 
   "M"        The one- or two-digit month number.
   "MM"       The two-digit month number. Single-digit values are preceded by a zero.
   "MMM"      The three-character month abbreviation.
   "MMMM"     The full month name.
 
   "yy"       The last two digits of the year (that is, 1996 would be displayed as "96").
   "yyyy"     The full year (that is, 1996 would be displayed as "1996").
 
 
   Example:
 
      "d.MM.yyyy"   will display date as 9.02.2012
      "dd.MM.yyyy"  will display date as 09.02.2012
      "dd/MM/yyyy"  will display date as 16/02/2012
      "dd.MMM.yyyy" will display date as 16. FEB. 2012
 
 
   To make the information more readable, you can add body text to the format string by enclosing it in single quotes.
   Spaces and punctuation marks do not need to be quoted. Nonformat characters that are not delimited by single
   quotes will result in unpredictable display by the DATEPICKER control.
 
   For example, to display the current date with the format "'Today is: 04:22:31 Tuesday Mar 23, 1996",
   the format string is "'Today is: 'hh':'m':'s dddd MMM dd', 'yyyy".
   To include a single quote in your body text, use two consecutive single quotes.
 
   For example, "'Don''t forget' MMM dd',' yyyy" produces output that looks like:
   Do not forget Mar 23, 1996. It is not necessary to use quotes with the comma,
   so "'Don''t forget' MMM dd, yyyy" is also valid, and produces the same output.
*/