Hola amigos:
Alguien seria tan amable de colocar el Wyndows Style y el Extended windows style de la clase ttitle hecho con PelleC
Ej.: 0x110000 o algo parecido.
Lo he creado desde recursos pero los estilo quedo 0x00000 y no funciona.
Muy amab les gracias.
Saludos
Dario Fernandez
Dario,
Que estilos quieres darle al control ? cuales WS_... ?
Antonio: lo que quiero hacer es usar el tTitle de FWH, pero al crearlo en PellesC, el estilo que queda es 0x000000 y no me muestra nada.
lo tengo asi:
REDEFINE TITLE oTitle ID 222 of oDlgN SHADOW TEXT "Prueba "
oTitle:lBorder:=.T.
oTitle:aGrdBack = { { 1, nRGB( 129, 130, 138 ), nRGB( 59, 60, 62 ) } }
No se ve el texto Prueba no se darle el color al texto....
Saludos y gracias
Dario Fernandez
#include "FiveWin.ch"
#include "ttitle.ch"
function Main()
local oDlg, oTitle, oFont
DEFINE FONT oFOnt NAME "Verdana" SIZE 0, -14
DEFINE DIALOG oDlg RESOURCE 1001
REDEFINE TITLE oTitle ID 222 of oDlg
// oTitle:=.T.
// oTitle:aGrdBack = { { 1, nRGB( 129, 130, 138 ), nRGB( 59, 60, 62 ) } }
@ 25, 25 TITLETEXT OF oTitle TEXT "Prueba" FONT oFont
ACTIVATE DIALOG oDlg CENTERED
oFont:End()
return nil// RESOURCE SCRIPT generated by "Pelles C for Windows, version 7.00".
#include <windows.h>
LANGUAGE LANG_ENGLISH,SUBLANG_ENGLISH_US
1001 DIALOGEX DISCARDABLE 6, 18, 294, 150
STYLE DS_SHELLFONT|WS_POPUP|DS_MODALFRAME|DS_CONTEXTHELP|DS_3DLOOK|WS_CAPTION|WS_SYSMENU|WS_VISIBLE
CAPTION "Dialog"
FONT 8, "Tahoma"
{
CONTROL "OK", IDOK, "Button", WS_TABSTOP, 168, 124, 45, 15
CONTROL "Cancel", IDCANCEL, "Button", WS_TABSTOP, 224, 124, 45, 15
CONTROL "Custom control", 222, "TTITLE", WS_VISIBLE | WS_CHILD, 8, 12, 276, 32
}Gracias Antonio, todo funcionando ok.
Saludos.
Dario Fernandez