Botones en Pantalla Principal

[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

[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"

[karinha]

Sirve asi?

https://i.imgur.com/teS9kHy.png



Abrazos, saludos.

[jbrita]

resulto todo bien.. muchas gracias