Olá Amigos,
Tentei isto:
Mas não deu certo
// ----
DEFINE ICON oIcon RESOURCE "SECRETA"
DEFINE BRUSH oBrush STYLE TILED
DEFINE WINDOW wMain TITLE "Secretaria - UNESP DFQ" MDI ;
menu buildmenu() ICON oIcon COLOR 'W/W' BRUSH oBrush
DEFINE BUTTONBAR BarMain BUTTONSIZE 45, 45 3DLOOK TOP OF wMain
DEFINE BUTTON of BarMain RESOURCE "CLIENTE" action funcdoc(1) tooltip 'Funcionários/Docentes' Message "Cadastro de Funcionários/Docentes"
DEFINE BUTTON of BarMain RESOURCE "LUPA" action funcdoc(2) tooltip 'Feriados/Eventos' Message 'Feriados/Eventos'
SET MESSAGE OF wMain TO 'Unesp DFQ' CENTERED DATE CLOCK KEYBOARD NOINSET
@ 4, 16 BITMAP oBmp FILENAME "secwork.bmp" ADJUST SIZE 280, 200 OF wMain ;
ON CLICK ( oBmp:lStretch := ! oBmp:lStretch, oBmp:Refresh( .t. ) )
activate window wMain on RESIZE oBmp:Center() maximized
//-----
Onde foi que eu errei....
Nota:- o secwork.bmp está lá na pasta mas não aparece no centro.
Até mais.
Fazer aparecer um BMP no centro da Janela Principal
Moderador: Moderadores
- Ale SB
- Usuário Nível 3

- Mensagens: 201
- Registrado em: 20 Jul 2004 17:30
- Localização: Campo Grande / MS
Bom Dia Mario,
Quando eu quero colocar uma imagem de fundo q nao esta nos meus arquivos de Recursos( .RES ou .RC) eu uso o formato .JPG, acho q fica menor q o BitMap, e chamo ele assim :
@braços Ale
Quando eu quero colocar uma imagem de fundo q nao esta nos meus arquivos de Recursos( .RES ou .RC) eu uso o formato .JPG, acho q fica menor q o BitMap, e chamo ele assim :
Código: Selecionar todos
FUNCTION MAIN()
STATIC ImgFundo:=".\Bitmap\Ondulacao.jpg"
.
.
.
.
*******DEFINE A IMAGEM DE FUNDO****************
@ 00,00 Image oImag Size oWnd:nHorzRes(),oWnd:nVertRes()-112 Of oWnd Adjust
oImag:Progress(.F.)
oImag:LoadBmp(Imgfundo)
.
.
ACTIVATE WINDOW oWnd MAXIMIZED
r]