Page 1 of 1
Lineas de texto BtnBmp
Posted: Thu Feb 13, 2020 5:24 pm
by servicomver
Hola, esta vez requiero poner dos o tres lineas de texto en un BtnBmp:
@ 1,1 BTNBMP oBMP PROMPT "Linea1"+CRLF+"Linea2" SIZE 80,30 PIXEL ACTION Msginfo("Aviso")
Todo el texto lo pone en una sola linea, ya revise en el foro y no encuentro a que se deba que no separe las lineas, alguna idea ?
Ya lo probe en oWnd y oDlg
Gracias y saludos
Re: Lineas de texto BtnBmp
Posted: Thu Feb 13, 2020 6:50 pm
by cnavarro
Intenta poniendo la clausula OF <ownd> pero sobre todo cambia las dimensiones
Code: Select all
@ 10,10 BTNBMP oBMP PROMPT "Linea1"+CRLF+"Linea2" SIZE 180,80 OF oPanel PIXEL ACTION Msginfo("Aviso")
Re: Lineas de texto BtnBmp
Posted: Thu Feb 13, 2020 7:37 pm
by karinha
Se usa Resource:
Code: Select all
REDEFINE BTNBMP oBtn PROMPT "Test" + CRLF + "BtnBmp" ID 102 OF oDlg CENTER
Re: Lineas de texto BtnBmp
Posted: Thu Feb 13, 2020 9:40 pm
by servicomver
Gracias por contestar.
Ya intenté con las dos opciones pero no pone las dos lineas, tengo que modificar algo mas ?, o hacer alguna definición antes ?
no sale ningún error solo pone:
Linea1Linea2
y necesito que sea:
Linea 1
Linea 2
Gracias
Re: Lineas de texto BtnBmp
Posted: Thu Feb 13, 2020 9:51 pm
by cnavarro
Prueba, aunque es muy muy raro que sea eso en lugar de CRLF pon + Chr( 13 ) + Chr( 10 ) +
Re: Lineas de texto BtnBmp
Posted: Thu Feb 13, 2020 10:04 pm
by servicomver
tampoco resulto con
@ 10,400 BTNBMP oBMP PROMPT "Linea1"+CHR(13)+CHR(10)+"Linea2" SIZE 180,80 OF oWnd PIXEL ACTION Msginfo("Aviso")
Alguna clase que deba tener mas actualizada ?
Re: Lineas de texto BtnBmp
Posted: Fri Feb 14, 2020 1:38 am
by servicomver
Pueden enviarme la clase más reciente de btnbmp ? No se por donde más buscarle, gracias
Re: Lineas de texto BtnBmp
Posted: Fri Feb 14, 2020 8:09 am
by cnavarro
Qué version de Fw estás utilizando?
Re: Lineas de texto BtnBmp
Posted: Fri Feb 14, 2020 6:45 pm
by carlos vargas
intenta con esto y comentas.
Code: Select all
@ 10,400 BTNBMP oBMP PROMPT "Linea1\nLinea2" SIZE 180,80 OF oWnd PIXEL ACTION Msginfo("Aviso")
Re: Lineas de texto BtnBmp
Posted: Fri Feb 14, 2020 7:22 pm
by karinha
Mira en C:\FWH..\SAMPLES\BARFRMRC.PRG
Se no, actualizar su FiveWin.
Code: Select all
#include "fivewin.ch"
REQUEST DBFCDX
function main()
local oDlg, oBar, oFont, oBrw, oBtn
USE CUSTOMER NEW SHARED VIA "DBFCDX"
SET ORDER TO TAG FIRST
GO TOP
// DEFINE FONT oFont NAME "TAHOMA" SIZE 0,-14
DEFINE DIALOG oDlg RESOURCE "timbar" TITLE FWVERSION + " BUTTONBAR FROM RESOURCE : " + hb_compiler() // FONT oFont
REDEFINE BUTTONBAR oBar ID 100 OF oDlg 2007
DEFINE BUTTON OF oBar PROMPT "Add" FILE "..\bitmaps\32x32\new.bmp"
DEFINE BUTTON OF oBar PROMPT "Edit" FILE "..\bitmaps\32x32\edit.bmp"
DEFINE BUTTON OF oBar PROMPT "Delete" FILE "..\bitmaps\delete.bmp"
DEFINE BUTTON OF oBar PROMPT "Print" FILE "..\bitmaps\print32.bmp" GROUP
DEFINE BUTTON OF oBar PROMPT "Quit" FILE "..\bitmaps\32x32\exit.bmp" GROUP ACTION oDlg:End()
REDEFINE BTNBMP oBtn PROMPT "Test" + CRLF + "BtnBmp" ID 102 OF oDlg CENTER
REDEFINE XBROWSE oBrw ID 101 OF oDlg DATASOURCE Alias() ;
COLUMNS "Primeiro", "Segundo", "Terceito" FOOTERS
oBrw:lSeekBar := .t.
oBrw:bClrEdits := { || { CLR_HRED, CLR_YELLOW } }
ACTIVATE DIALOG oDlg CENTERED ON INIT oBrw:SetFocus()
// RELEASE FONT oFont
return nil
Saludos.
Re: Lineas de texto BtnBmp
Posted: Fri Feb 21, 2020 2:05 pm
by servicomver
Gracias por contestar, efectivamente creo que mi fivewin ws el problema, estamos ya en proceso de actualización.
Será posible que eso ocasione que no pueda usar esta rutina ?
For r:=1 to 50
cr:=Alltrim(Str(r))
oBtn&cr:Hide()
..
...
Next
necesito ocultar 50 botones, cambiar prompt, etc
Gracias
Re: Lineas de texto BtnBmp
Posted: Wed Feb 26, 2020 4:30 pm
by nageswaragunupudi
servicomver wrote:Hola, esta vez requiero poner dos o tres lineas de texto en un BtnBmp:
@ 1,1 BTNBMP oBMP PROMPT "Linea1"+CRLF+"Linea2" SIZE 80,30 PIXEL ACTION Msginfo("Aviso")
Todo el texto lo pone en una sola linea, ya revise en el foro y no encuentro a que se deba que no separe las lineas, alguna idea ?
Ya lo probe en oWnd y oDlg
Gracias y saludos
The prompt will be displayed in two lines, if you provide adequate height.
Increase the height of the button.
eg: SIZE 100,50
Re: Lineas de texto BtnBmp
Posted: Thu Feb 27, 2020 5:20 am
by nageswaragunupudi
See this.
All the three buttons has the same prompt
"FIRST" + CRLF + "SECOND"
Code: Select all
#include "fivewin.ch"
function Main()
local oDlg, oFont, oBold, aBtn[ 3 ]
local cPrompt := "FIRST" + CRLF + "SECOND"
DEFINE FONT oFont NAME "TAHOMA" SIZE 0,-14
DEFINE FONT oBold NAME "TAHOMA" SIZE 0,-20 BOLD
DEFINE DIALOG oDlg SIZE 440,340 PIXEL TRUEPIXEL FONT oFont ;
TITLE "BTNBMP multi-line prompts"
@ 40, 40 BTNBMP aBtn[ 1 ] PROMPT cPrompt SIZE 140,30 PIXEL OF oDlg CENTER 2007
@ 100, 40 BTNBMP aBtn[ 2 ] PROMPT cPrompt SIZE 140,50 PIXEL OF oDlg CENTER 2007
@ 160, 40 BTNBMP aBtn[ 3 ] PROMPT cPrompt SIZE 140,50 PIXEL OF oDlg CENTER 2007
aBtn[ 3 ]:oFontBold := oBold
@ 40,220 SAY "SIZE 140,30" SIZE 200,30 PIXEL OF oDlg VCENTER
@ 100,220 SAY "SIZE 140,50" SIZE 200,50 PIXEL OF oDlg VCENTER
@ 160,220 SAY "oBtn:oFontBold := oBold" SIZE 200,50 PIXEL OF oDlg VCENTER
@ 250, 40 SAY "In all cases PROMPT is" + CRLF + ["FIRST" + CRLF + "SECOND"] ;
SIZE 360,50 PIXEL OF oDlg CENTER
ACTIVATE DIALOG oDlg CENTERED
RELEASE FONT oFont, oBold
return nil