1. FlatToolBar
Hi, everybody!
I am just a beginner in Euphoria programming (with a fortran
background), and I was very much impressed with Win32lib. The library is
really easy to understand and to use. I want to thank David Cuny and all
other authors for this remarkable tool.
I have a little question too: Is the control FlatToolBar fully
functional?
If so, could anyone tell me how to set a picture and hint to a
FlatToolBar button? And how to change a size of the button?
Thank you very much
Victor Churikov
2. FlatToolBar
Hi, everybody!
I've written a simple code for displaying of flat button (see below).
It works perfectly well with the old win32lib 0.50c++ (Matthew Lewis
extensions), both icons and hint "Save" are displyed.
However, the hint doesn't work with the latest win32lib 0.55.1. Could
anyone tell me what's wrong?
Thanks so much!!
constant
Window1 = create(Window, "Window", 0, Default, Default, 300, 300, 0 ),
Tool = create(FlatToolBar, "", Window1, 0, 0, 300, 46, 0)
integer image
constant
i1 = extractIcon("disk05.ico"), -- I used the icons from Win32lib
i2 = extractIcon("disk06.ico"),
i3 = extractIcon("disks04.ico")
image = addIcon({i1, i2, i3})
constant
Butt = create(PushButton, "Save", Tool, image, 0, 0, 0, 0)
onClick[Butt] = routine_id("one_onClick")
WinMain(Window1, Normal)
Victor Churikov
