Page 1 of 1
Botones en Pantalla Principal
Posted: Thu Feb 11, 2021 2:11 pm
by jbrita
Amigos necesito poner 3 botones con imagen en la pantalla principal
#include "FiveWin.ch"
static oWnd
function Main()
DEFINE WINDOW oWnd TITLE "My application"
ACTIVATE WINDOW oWnd MAXIMIZED
return nil
saludos
Re: Botones en Pantalla Principal
Posted: Thu Feb 11, 2021 2:29 pm
by MGA
Existe algumas formas de se fazer isso, segue uma delas, revise tambem ribbonbar no FWH\SAMPLES:
Local oBarmap
define window s_oWndMaps from 04,25 to 0,0 mdichild of M->oWnd title ".:: Google Maps ::. " color CLR_WHITE,CLR_WHITE
define buttonbar oBarmap size 34,34 3D of s_oWndMaps 2007
define button of oBarmap resource "GOOGLE" noborder action( GoogleMaps(.t.) ) message "Alterar dados do mapa corrente" tooltip "Alterar"
define button of oBarmap resource "PRINTER" noborder action( s_oActiveXM:Do( "ExecWB", 7,1 ) ) message "Imprimir mapa" tooltip "Imprimir"
define button of oBarmap resource "EXITM" noborder action( s_oActiveXM:Do( "ExecWB", 12,1 ), s_oWndMaps:End() ) message "Fechar mapa" tooltip "Fechar"
Re: Botones en Pantalla Principal
Posted: Thu Feb 11, 2021 2:54 pm
by karinha
Re: Botones en Pantalla Principal
Posted: Fri Feb 12, 2021 12:43 am
by jbrita
resulto todo bien.. muchas gracias