Clipper/FiveWin - sacar un BMP o JPG

 
Vista:

sacar un BMP o JPG

Publicado por marcialvv (1 intervención) el 21/05/2005 20:27:26
Quisiera sacar una foto o logo por pantalla alcomienzo de mi aplicacion o como fondo del menu y no se como se puede hacer.

Clipper 5.1 y Rtlink
Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:sacar un BMP o JPG

Publicado por lorenzo (180 intervenciones) el 23/05/2005 14:12:57
prueba con...

msglogo( nombrelogo,segundos )

NOTA:
1. El logo tiene que estar en formato BMP y especificar toda la ruta completa.
2. En "segundos" teclear el tiempo (en segundos) que desee que aparezca el logo en pantalla, luego trascurrido el tiempo el logo desaparece automaticamente.

Espero te sirva... un saludo
LORENZO
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:sacar un BMP o JPG

Publicado por Armando Estrada Bucio (167 intervenciones) el 23/05/2005 17:02:01
Marcial:

La solución que te da Lorenzo es para Clipper + FW, en clipper
puro y duro no existe la función MsgLogo().

Saludos, Armando
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:sacar un BMP o JPG

Publicado por richard jaime (71 intervenciones) el 24/05/2005 16:29:21
* clipper logo
*exospace fi logo lib LLIBG,CLIPPER
*OPTEDIT MENU.EXE -EXTRAMIN 8192

#Include "Llibg.ch"

set procedure to logo
do dibuja

procedure dibuja
arq_bmp:="C:\val\LOGO2.BMP"
IF !FILE(arq_bmp)
@ 10,10 SAY "ARQUIVO "+arq_bmp+" NO ENCONTRADO."
INKEY(0)
QUIT
ENDIF
SETCURSOR(0)

SET(39,158)
nScrMaxX := gMode()[ LLG_MODE_GRAPH_COL ]
nScrMaxY := gMode()[ LLG_MODE_GRAPH_ROW ]

aLogo := gBmpLoad(arq_bmp)

nLin:=INT((nScrMaxY - aLogo[ LLG_BMP_Y ])/2)
nCol:=INT((nScrMaxX - aLogo[ LLG_BMP_X ])/2)

gframe(nCol-4,nLin-4,nCol+aLogo[ LLG_BMP_X ]+4,nLin+aLogo[LLG_BMP_Y]+4,;
7,15,8,4,4,4,4,LLG_MODE_SET)
gBmpDisp( aLogo, nCol, nLin )

RETUrn
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar