FiveTech Software tech support forums

... OpenLastProject=.T. AskQuit=.T. StopOnErrors=.F. ShowAllMessages=.F. AutoDepend=1 Processes=1 DontRunOnWarnings=.F. MinimizeToTray=.F. UIFont=MS Sans Serif,8 Language=10 [TOOLBARS] File=.T. Project=.T. Navigation=.T. NavigationWidth=340 Edit=.T. Find=.T. Marks=.T. [-] Root=C:\- Bin=C:\-\Bin Lib=C:\-\Lib ...

... }, ;                     { 2/3, nRGB( 255, 215,  84 ), nRGB( 255, 233, 162 ) }  ;                   } ) }        DEFINE FONT  oFont  NAME "MS SANS SERIF"  SIZE 0,-12    DEFINE dialog oWnd TITLE "Rounded Buttons in " + cVer size 500, 300 PIXEL         @ 5, 10 BTNBMP oBtn OF oWnd ...

... describe el Dialogo CVINGPAS DIALOG 101, 36, 298, 79 STYLE DS_MODALFRAME | 0x4L | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU FONT 8, "MS Sans Serif" { EDITTEXT 110, 92, 18, 187, 12 EDITTEXT 120, 92, 35, 187, 12, ES_PASSWORD | WS_BORDER | WS_TABSTOP DEFPUSHBUTTON "&Aceptar", ...

... 190 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | WS_THICKFRAME CAPTION "Alta Nuevo Usuario" FONT 8, "MS Sans Serif" ¿A alguien le ha ocurrido algo parecido? ¿Alguna ocurrencia?.

... 229 STYLE DS_MODALFRAME | 0x4L | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Testing the RichEdit control" FONT 8, "MS Sans Serif" { CONTROL "", 100, "RichEdit20A", 4100 | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 6, 12, 398, ...

... STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | WS_THICKFRAME CAPTION "Escolha uma Operação" FONT 8, "MS Sans Serif" { GROUPBOX "", 200, 6, 5, 299, 257, BS_GROUPBOX LISTBOX 110, 11, 12, 290, 247, LBS_NOTIFY | WS_BORDER | WS_BORDER | WS_VSCROLL ...

... ,0,-11 ,,,,,,,,,238) //238 es el juego de caracteres Europa Central y con TPrinter funciona bien. private oFontN := TFont():New('MS Sans Serif',0,-8) DEFINE DIALOG.... REDEFINE COMBOBOX oidioma VAR nidioma ITEMS {'Español','Polaco','Alemán'} oidioma:bchange := {|| ponidioma()} REDEFINE ...

... todos los valores default de mi sistema y esta disponible en toda la aplicacion algo asi .. En MiClase ..>>> ::SYS_cFuente:= "MS Sans Serif" && Variable del nombre de fuente ::SYS_nPci := -10 && Variable del Tamaño en PCI DEFINE FONT ::SYS_OFont NAME ::SYS_cFuente ...

... | WS_SYSMENU | WS_THICKFRAME | WS_MINIMIZEBOX | WS_MAXIMIZEBOX CAPTION "Introduzir/Alterar Ficheiro do Programa Diário" FONT 8, "MS Sans Serif" { CONTROL "", IDC_GROUPBOX1, "BUTTON", BS_GROUPBOX | WS_CHILD | WS_VISIBLE, 4, 6, 150, 189 CONTROL "", ...

... nRectClrTxt1,nRectClrTxt2 oRectClr1:= 12961221 oRectClr2:= 16777215 nRectClrTxt1:=0 nRectClrTxt2:=0 DEFINE FONT oFont1 NAME "LUCIDA SANS TYPEWRITER" SIZE 6, -13 DEFINE WINDOW oChild MDICHILD OF oWnd TITLE "Prueba" oRect:=TRectang():New( 0, 0, 130, oChild:nWidth, oChild ...

... = WndClass00; RegisterClassEx(&wcex); HFONT hfont0 = CreateFont(-11, 0, 0, 0, 0, FALSE, FALSE, FALSE, 1, 0, 0, 0, 0, ("MS Sans Serif")); HWND hwnd = CreateWindowEx(0, ("WndClass0"), ("Dialog"), WS_CAPTION | WS_VISIBLE | WS_GROUP | WS_POPUP | WS_SYSMENU, ...

ico Eu testei o código, mas é engraçado não funciona com o "MS Sans Serif", eu mudar para "MS Sans Serif Normal" e se funcionou na pasta Fontes no Painel de Controle, localize a fonte MS Sans Serif e não foi, mas se "MS Sans Serif ...

... //----------------------------------------------------------------------- Function Prova() Private oBut1 DEFINE FONT oFONT1 NAME "Ms Sans Serif" SIZE 0, -12 BOLD Define DIALOG oDlg TITLE "prova" ; FROM 0, 0 to 397, 586 PIXEL COLOR 0, 15790320 ACTIVATE DIALOG oDlg CENTERED ...

... } odlg:oClient := oCal ACTIVATE DIALOG odlg RETURN NIL .rc cal DIALOG 132, 63, 275, 131 STYLE WS_POPUP | WS_VISIBLE | WS_DLGFRAME FONT 8, "MS Sans Serif" { CONTROL "", 101, "tcalendar", 0 | WS_CHILD | WS_VISIBLE, 3, 4, 268, 123 } Best regard! Shuming Wang

... 6, 15, 508, 234 STYLE WS_POPUP|WS_THICKFRAME|WS_CAPTION|WS_SYSMENU|WS_VISIBLE CAPTION "Mantenimiento de socios" FONT 8, "MS Sans Serif", 0, 0, 0 { CONTROL "", 101, "TWBrowse", WS_TABSTOP|0x00b00000, 35, 42, 438, 168 } Quiero mencionar que yo tenia ...