FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para CA-Clipper cOLOR Y TAMAÑO EN UN SAY
Posts: 47
Joined: Wed Apr 05, 2006 07:42 PM
cOLOR Y TAMAÑO EN UN SAY
Posted: Mon May 12, 2008 08:19 PM

Hola,

Como cambio el tamaño y tipo de letra y color en un control tipo say ??

Gracias

Posts: 36
Joined: Thu Jun 28, 2007 03:43 PM
cOLOR Y TAMAÑO EN UN SAY
Posted: Mon May 12, 2008 10:12 PM
Hola RMC,

Prueba lo siguiente:

...

DEFINE FONT oFont1 NAME "TAHOMA" SIZE 10,20
DEFINE FONT oFont2 NAME "TAHOMA" SIZE 20,40
DEFINE FONT oFont3 NAME "ARIAL" SIZE 20,20

DEFINE DIALOG oDlg ...

@  0,0 SAY "LINEA1" OF oDlg FONT oFont1 SIZE 40,15
@  2,0 SAY "LINEA2" OF oDlg FONT oFont2 SIZE 100,25 COLORS CLR_HRED,CLR_WHITE
@  4,0 SAY "LINEA3" OF oDlg FONT oFont3 SIZE 80,15 COLOR CLR_HGREEN

ACTIVATE DIALOG oDlg 

...


Saludos
Posts: 47
Joined: Wed Apr 05, 2006 07:42 PM
cOLOR Y TAMAÑO EN UN SAY
Posted: Mon May 12, 2008 10:29 PM

Gracias , pero a lo que yo me referia es si defino en el Resoruce Work shop un control de Texto,

y luego en el codigo lo declaro asi :

redefine say tablero id 201 of odlg4 update

Como le digo cambio ya al control que la letra la quiero de tal fuente y de tal tamaño ?

Gracias

Posts: 47
Joined: Wed Apr 05, 2006 07:42 PM
cOLOR Y TAMAÑO EN UN SAY
Posted: Mon May 12, 2008 10:32 PM

Ya le encontre utilizando lo que me enviaste gracias

Rene

Posts: 464
Joined: Tue Mar 21, 2006 07:30 PM
cOLOR Y TAMAÑO EN UN SAY
Posted: Wed May 28, 2008 11:36 AM
RMC wrote:Ya le encontre utilizando lo que me enviaste gracias

Rene


Hola Rene, puedes decirme como lo hiciste?
Yo tambien tengo dialogos a los cuales les quiero cambiar el say(texto escrito en el recurso con el WS) y no lo he conseguido.

Mil gracias

Un saludo
Pedro
Un saludo
Pedro
gahetesoft@gmail.com
FWH12.06 BCC582, Xverce CW, Pelles C 6.00.4,PSPAD 4.54
y ahora con ADO
Posts: 36
Joined: Thu Jun 28, 2007 03:43 PM
cOLOR Y TAMAÑO EN UN SAY
Posted: Wed May 28, 2008 09:58 PM
Hola Pedro,

Aqui tienes un ejemplo

#include "FiveWin.ch"

FUNCTION Main()
   LOCAL oDlg,oFont,oSay[2]

   DEFINE FONT oFont NAME "ARIAL" SIZE 40,60

   DEFINE DIALOG oDlg RESOURCE "SAY_PRUEBA"

   REDEFINE SAY oSay[1] PROMPT "Linea-1" ID 10 OF oDlg
   REDEFINE SAY oSay[2] PROMPT "Linea-2" ID 11 OF oDlg ;
		COLOR CLR_HRED FONT oFont

   ACTIVATE DIALOG oDlg

RETURN NIL


Saludos
Posts: 464
Joined: Tue Mar 21, 2006 07:30 PM
cOLOR Y TAMAÑO EN UN SAY
Posted: Thu May 29, 2008 11:15 AM
vlmsoft wrote:Hola Pedro,

Aqui tienes un ejemplo

#include "FiveWin.ch"

FUNCTION Main()
   LOCAL oDlg,oFont,oSay[2]

   DEFINE FONT oFont NAME "ARIAL" SIZE 40,60

   DEFINE DIALOG oDlg RESOURCE "SAY_PRUEBA"

   REDEFINE SAY oSay[1] PROMPT "Linea-1" ID 10 OF oDlg
   REDEFINE SAY oSay[2] PROMPT "Linea-2" ID 11 OF oDlg ;
		COLOR CLR_HRED FONT oFont

   ACTIVATE DIALOG oDlg

RETURN NIL


Saludos


Muchas Gracias funcionó Ok
Hice además una función para pintarlos todos de una tacada con un FOR/NEXT

Saludos
Un saludo
Pedro
gahetesoft@gmail.com
FWH12.06 BCC582, Xverce CW, Pelles C 6.00.4,PSPAD 4.54
y ahora con ADO

Continue the discussion