Richard Chidiak wrote:What do you mean by migrating RC files to Pelles C ?
FOLDER DIALOG DISCARDABLE 45, 20, 451, 266
STYLE WS_POPUP|DS_MODALFRAME|DS_3DLOOK|WS_CAPTION|WS_SYSMENU|WS_VISIBLE
FONT 8, "Ms Sans Serif"
{
CONTROL "", 199, "SysTabControl32", WS_TABSTOP, 4, 4, 440, 224
CONTROL "", 201, "Button", WS_TABSTOP, 300, 232, 68, 28
CONTROL "", 202, "Button", WS_TABSTOP, 376, 232, 68, 28
}
FOLUSU2 DIALOG DISCARDABLE 108, 49, 394, 200
STYLE WS_CHILD|DS_3DLOOK|WS_VISIBLE
FONT 8, "Ms Sans Serif"
{
CONTROL "", 101, "TXBrowse", WS_TABSTOP|0x00800000, 8, 8, 378, 184
}
FOLUSU1 DIALOG DISCARDABLE 108, 49, 394, 200
STYLE WS_CHILD|DS_3DLOOK|WS_VISIBLE
FONT 8, "Ms Sans Serif"
{
CONTROL "CODIGO :", 4001, "Static", SS_RIGHT|WS_GROUP, 32, 24, 64, 8
CONTROL "PASSWORD :", 4002, "Static", SS_RIGHT|WS_GROUP, 32, 40, 64, 8
CONTROL "NOMBRE :", 4003, "Static", SS_RIGHT|WS_GROUP, 32, 56, 64, 8
CONTROL "RUT :", 4004, "Static", SS_RIGHT|WS_GROUP, 32, 72, 64, 8
CONTROL "DEPARTAMENTO :", 4005, "Static", SS_RIGHT|WS_GROUP, 32, 88, 64, 8
CONTROL "DOMICILIO :", 4006, "Static", SS_RIGHT|WS_GROUP, 32, 104, 64, 8
CONTROL "FONO :", 4007, "Static", SS_RIGHT|WS_GROUP, 32, 120, 64, 8
CONTROL "CIUDAD :", 4008, "Static", SS_RIGHT|WS_GROUP, 32, 136, 64, 8
CONTROL "", 101, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 104, 22, 88, 12
CONTROL "", 102, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 104, 38, 88, 12
CONTROL "", 103, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 104, 54, 250, 12
CONTROL "", 104, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 104, 70, 88, 12
CONTROL "", 105, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 104, 86, 88, 12
CONTROL "", 106, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 104, 102, 252, 12
CONTROL "", 107, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 104, 118, 88, 12
CONTROL "", 108, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 104, 134, 46, 12
CONTROL "", 11, "Static", WS_GROUP, 156, 136, 194, 8
CONTROL "Datos Personales", 4009, "Button", BS_GROUPBOX, 6, 4, 378, 190
}
#include "FiveWin.ch"
function Main()
LOCAL ODLG,OFLD, ;
DFIRST := SPACE(30), ;
DLAST := SPACE(30), ;
DDATE := CTOD("")
DEFINE DIALOG ODLG RESOURCE "TESTFLD"
REDEFINE FOLDER oFld ID 201 OF oDlg ;
PROMPTS "&FOLDER1", "&FOLDER2" ;
DIALOGS "TESTA1", "TESTA2" ADJUST
REDEFINE GET DFIRST ID 201 OF oFld:aDialogs[1] PICTURE REPLICATE("!",30)
REDEFINE GET DLAST ID 202 OF oFld:aDialogs[1] PICTURE REPLICATE("!",30)
REDEFINE GET DDATE ID 201 OF oFld:aDialogs[2]
ACTIVATE DIALOG ODLG CENTERED
return nil
// RESOURCE SCRIPT generated by "Pelles C for Windows, version 6.00".
#include <windows.h>
#include <commctrl.h>
#include <richedit.h>
LANGUAGE LANG_ENGLISH,SUBLANG_ENGLISH_US
TESTFLD DIALOG DISCARDABLE 4, 12, 493, 359
STYLE WS_POPUP|DS_MODALFRAME|WS_CAPTION|WS_SYSMENU|WS_VISIBLE
CAPTION "this is a test"
FONT 8, "Tahoma"
{
CONTROL "OK", IDOK, "Button", BS_DEFPUSHBUTTON|WS_TABSTOP, 1, 336, 35, 21
CONTROL "Annuler", IDCANCEL, "Button", WS_TABSTOP, 456, 336, 35, 21
CONTROL "", 201, "SysTabControl32", TCS_MULTISELECT|WS_TABSTOP, 0, 0, 488, 329
CONTROL "", 301, "Button", WS_TABSTOP, 234, 336, 25, 23
}
TESTA1 DIALOG DISCARDABLE 3, 4, 393, 293
STYLE WS_CHILD|DS_ABSALIGN|DS_3DLOOK|WS_CAPTION
FONT 10, "Tahoma"
{
CONTROL "", 201, "Edit", WS_BORDER|WS_TABSTOP, 50, 1, 91, 11
CONTROL "", 202, "Edit", WS_BORDER|WS_TABSTOP, 202, 1, 91, 11
CONTROL "First Name", 401, "Static", SS_CENTER|WS_BORDER|WS_GROUP, 3, 1, 45, 11
CONTROL "Last Name", 402, "Static", SS_CENTER|WS_BORDER|WS_GROUP, 148, 1, 45, 11
}
TESTA2 DIALOG DISCARDABLE 4, 4, 481, 286
STYLE WS_CHILD|DS_ABSALIGN|WS_CAPTION
FONT 10, "Tahoma"
{
CONTROL "", 201, "Edit", WS_BORDER|WS_TABSTOP, 80, 8, 46, 11
CONTROL "Highlight me please with the mouse", 402, "Static", SS_CENTER|WS_BORDER|WS_GROUP, 0, 4, 73, 24
}
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 35 guests