Mira aqui, porfa:
https://forums.fivetechsupport.com/viewtopic.php?f=3&t=45016&sid=b3ec7041898c88a93ead39e2b95d6eb7&sid=740fdd77931a84afeda73a5754fc4383#p274773
Regards, saludos.
#include <windows.h>
#include <commctrl.h>
#include <richedit.h>
LANGUAGE LANG_ENGLISH,SUBLANG_ENGLISH_US
C_DRAGHAND CURSOR "res1.cur"
C_HAND CURSOR "res2.cur"
CATCH CURSOR "res3.cur"
LANGUAGE LANG_SPANISH,SUBLANG_SPANISH_URUGUAY
ACTUALIZA RCDATA "res1.dat"
1LUPA BITMAP "res1.bmp"
AAA ICON "res1.ico"
DLGFECHA DIALOG 305, 61, 203, 160
STYLE DS_ABSALIGN | DS_MODALFRAME | 0x4L | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "TFechas - Using: Harbour .and. xHarbour"
FONT 8, "Tahoma"
{
EDITTEXT 100, 56, 25, 90, 12, ES_CENTER | WS_BORDER | WS_VSCROLL | WS_TABSTOP
EDITTEXT 110, 56, 51, 90, 12, ES_CENTER | WS_BORDER | WS_VSCROLL | WS_TABSTOP
EDITTEXT 120, 56, 79, 90, 12, ES_CENTER | WS_BORDER | WS_TABSTOP
PUSHBUTTON "&Calcula", 301, 33, 127, 60, 16
PUSHBUTTON "&Salida", 302, 96, 127, 60, 16
}
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: cmsoft and 52 guests