GUI library for Windows \ Linux (window9)

VANYA · Post by **VANYA** » Mar 14, 2011 16:02

Imortis!

The only problem with CalendarGadget, or the entire list common control classes [/ b] does not work on Windows 2000? I can not check because I do not have this version of Windows.

P.S. CalendarGadget corrected.

Post by **Imortis** » Mar 14, 2011 16:22

It is the entire list. All common controls need to be initialized.

VANYA · Post by **VANYA** » Mar 18, 2011 17:54

Updated library.
Added functions:

StatusBarGadget
SetStatusBarField
ToolTipStatusBar
MoveItemTreeView
GetTextTreeView
GetIndexImageTreeView
RenameItemTreeView
ReplaceImageItemTreeView
GetCountItemTreeView
DeleteTreeViewItem
GetItemTreeView
AddTreeViewItem
TreeViewGadget
WebGadget
WebGadgetNavigate
WebGadgetGoForward
WebGadgetGoBack
WebGadgetRefresh
WebGadgetGetURL
WebGadgetState
WebGadgetStop
ScrollBarGadget
GetScrollGadgetRange
SetScrollGadgetRange
GetScrollGadgetPos
SetScrollGadgetPos
SetScrollGadgetPage
SetPageStepScrollBar
GlobalMouseX
GlobalMouseY
AddSysTrayIcon
ReplaceSysTrayIcon
DeleteSysTrayIcon

Fixed errors when compiling the library. And though they do not affect the operation of the library, all is better without them. Also corrected some logic errors in several functions. For the control (gadget) introduces support for library work on Windows 2000.

Post by **Imortis** » Mar 20, 2011 20:22

I will be putting this through it's paces later this evening.

Thanks again for all your work on this. If there is any other way I can help, let me know.

VANYA · Post by **VANYA** » Mar 20, 2011 20:35

Here I have described a problem connected to connection interface:

http://www.freebasic.net/forum/viewtopic.php?t=17373

If who knows help please. It would be desirable to complete WebGadget

Rens · Post by **Rens** » Mar 20, 2011 22:22

Vanya,

Thank you very much for implementing the Scrollbar in such a short time.

Btw:
Where did you get all the info from to make this library? Just being curious.

VANYA · Post by **VANYA** » Mar 21, 2011 3:03

Rens wrote:Vanya,

Thank you very much for implementing the Scrollbar in such a short time.

Btw:
Where did you get all the info from to make this library? Just being curious.

The entire library? The foundation was laid by the author antarman here:
http://www.freebasic.net/forum/viewtopi ... ight=fbgui

If the question was about ScrollBar, then took the information from MSDN.

Post by **Imortis** » Mar 23, 2011 2:07

Is there a way built in to the library to get text that is highlighted by the mouse?

I mean like when you drag the mouse over something and select it. For copying and pasting.

That kind of thing? I looked through the help file for this but didn't see any thing that looked related.

EDIT:

Code: Select all

#Include "window9.bi"
#Include "win/richedit.bi"
Dim As Integer event
Dim As CHARRANGE range

Var hwnd=OpenWindow("1",300,10,500,500)
EditorGadget(1,10,10,480,400, "Editor")

Do
	event=WaitEvent()
	If event=EventClose Then End
	If event=EventRBUp Then
		SendMessage(GadgetID(1), EM_EXGETSEL, 0, Cast(LPARAM, @range))
		? Mid(GetGadgetText(1),range.cpMin+1,range.cpMax)
	EndIf
Loop

This works, but only if I right click OUTSIDE the EditorGadget. I think this would be good built in.

VANYA · Post by **VANYA** » Mar 23, 2011 3:30

Imortis wrote:Is there a way built in to the library to get text that is highlighted by the mouse?

I mean like when you drag the mouse over something and select it. For copying and pasting.

That kind of thing? I looked through the help file for this but didn't see any thing that looked related.

EDIT:
Code: Select all
#Include "window9.bi"
#Include "win/richedit.bi"
Dim As Integer event
Dim As CHARRANGE range

Var hwnd=OpenWindow("1",300,10,500,500)
EditorGadget(1,10,10,480,400, "Editor")

Do
	event=WaitEvent()
	If event=EventClose Then End
	If event=EventRBUp Then
		SendMessage(GadgetID(1), EM_EXGETSEL, 0, Cast(LPARAM, @range))
		? Mid(GetGadgetText(1),range.cpMin+1,range.cpMax)
	EndIf
Loop
This works, but only if I right click OUTSIDE the EditorGadget. I think this would be good built in.

Code:

Code: Select all

#Include "window9.bi"
#Include "win/richedit.bi"
Dim As Integer event
Dim As CHARRANGE range

Var hwnd=OpenWindow("1",300,10,500,500)
EditorGadget(1,10,10,480,400, "Editor")

Do
	event=WaitEvent()
	If event=EventClose Then End
	If event=Eventgadget Then
		If EventNumber=1 Then
			SendMessage(GadgetID(1), EM_EXGETSEL, 0, Cast(LPARAM, @range))
			? Mid(GetGadgetText(1),range.cpMin+1,range.cpMax-range.cpMin)
		EndIf
	EndIf
Loop

Post by **Imortis** » Mar 23, 2011 16:06

Ah. I think under the circumstances, I did pretty good getting what I did, considering I was reading the documentation in the help file using Google translate. Thanks.

VANYA · Post by **VANYA** » Apr 08, 2011 18:54

Tool-template FbEdit.

Files TempLate.exe, SnipletAddin.dll and Template the copy folder in the directory .... fbedit\Addins

The file SnipletAddin almost did not change anything, added only run my module with the command line. Run the tool with the F11 key.

Features:

1) Add and edit any piece of code directly in the program
2) re-order them in the ListBox
3) Tip-output package ToolTip when you hover on the bottom EDIT
4) Sending a package FbEdit double-click on the desired item ListBox

http://mneniya.ucoz.ru/FREEBASIC/Public/Template_.zip

http://users.freebasic-portal.de/vanya/ ... plate_.zip

VANYA · Post by **VANYA** » Apr 09, 2011 14:45

Library updated, added features:

Options for encryption ready taken from this site.
The authors' names written on the HELP, thanks to them!
Changed some functions to improve. For example, the function Load_image can now upload images to the appropriate background

AESEncoder
AESDecoder
Encode64
Decode64
MD5createFileHash
MD5createHash
SHA512create
SHA512createFile
SHA1createFile
SHA1create
SetTransferTextLineEditorGadget
GetSelectTextEditorGadget
SetSelectTextEditorGadget
ClientMDIGadget
MDIGadget
AddKeyboardShortcut
DeleteAllKeyboardShortcut
load_Icon
ContainerGadget
PanelGadget
AddPanelGadgetItem
DeleteItemPanelGadget
PanelGadgetGetCursel
PanelGadgetSetCursel
ASCIITOUTF
UTFTOASCII

Post by **Imortis** » Apr 09, 2011 15:52

I am going to try to translate the documentation from the help file into english. It is a lot of text, but I think it is doable. When I am don't I will post a file with all the text. I'm not sure how to make a help file out of it though.

VANYA · Post by **VANYA** » Apr 09, 2011 16:17

Imortis wrote:I am going to try to translate the documentation from the help file into english. It is a lot of text, but I think it is doable. When I am don't I will post a file with all the text. I'm not sure how to make a help file out of it though.

I do not quite understand ... If you need a program to create a CHM then, I can recommend: http://www.helpndoc.com/ convenient and simple.

Post by **Imortis** » Apr 09, 2011 16:20

I just notices some typos in my above post that would make it hard to understand. All the same, you answered my question. Thanks for the link.