creating sections

[Silvio.Falconi]

I wish create a dialog with horizontal section readonly


Each section must have an big Image at left a text at center and a button at right as this structure

1= big Image
2= text ( rtf text)
3= button with menupopup





I can have many sections on a dialog

any solution please ?

[cnavarro]

CLASS TLAYOUT ?

[Silvio.Falconi]

No perhaps Vistamenu if I Know how Modify it
the problem is insert the text normal or rtf and the button at right



test.prg

Code: Select all  Expand view

#include "fivewin.ch"

function main()
local oWnd
local oVmenu
local oItem
local oIcon

DEFINE ICON oIcon NAME "C5ICON"


DEFINE WINDOW oWnd TITLE "First test VistaMenu" ICON oIcon

    oVMenu := TDashBoard():New( 0,0, 100, 100, oWnd )
    oVMenu:nColumns := 1
    oVMenu:nType := 1

    oItem := oVMenu:AddItem( "Memo ", "CAL.BMP",,.t. )

    ctesto:= "Quest'area è una 'bacheca virtuale' dove appuntare ed avere sempre visibili le informazioni"+CRLF+;
             "più comuni ed utili, quali le coordinate bancarie dell'azienda, i numeri telefonici dei dipendenti,"+CRLF+;
             "i numeri telefonici dei fornitori per le emergenze, link internet interessanti, etc. "


    oItem:AddItem(ctesto ,,,.t. )
    oItem2 := oVMenu:AddItem( "Second Memo ", "CAL.BMP",,.t. )
    oWnd:oClient := oVMenu

ACTIVATE WINDOW oWnd

return 0

[Otto]

Hello Silvio,
maybe xBrowse and RTF-field is an option.
Best regards,
Otto

[Silvio.Falconi]

Otto,
yes it can be a solution