B4A Library [Class] Floating Windows

Informatix · Aug 19, 2012

Hello,

With this class, you can create floating windows, move them with the finger, dock them, stick them to an edge, maximize them, customize their action bar... You fill them as you fill a panel.

This class needs the Reflection library.

v1.1:
The class has been splitted in two: ClsFloatingWindow and ClsActionBar.
This version includes a lot of changes.

v1.2:
Fixed bugs
Added a resize button
Added new functions and parameters
Added animations for docking areas and sticky edges
Changed the parameters returned by the custom buttons so as to be consistent with the ready-made buttons
Improved management of overlapping special areas
Improved the formula used to detect a move

v1.21:
Fixed a conflict between StillVisible and the special areas

v1.22:
Fixed two bugs in CheckSpecialAreas (thanks to Awama)

v1.23:
Fixed five bugs (yes, five... )

v1.24:
Updated the ActionBar class required by this class.

v1.25:
Fixed a bug in the computation of covered areas while docking a window;
Updated the ActionBar class required by this class;
No more warnings with B4A v2.7.

v1.26:
Updated the ActionBar class required by this class.

Fred

Informatix · Nov 10, 2014

winjiadh said:
thanks
I know how to create a new window
but I have a other question
in your sample, I run the FloatWinDemo2.b4a
in the code

B4X:

Sub After_Undock(Window As ClsFloatingWindow) ' We return to the initial size and title Win.Resize(90dip, 90dip) Win.SetTitleText("Drag me") ' We center the window in the docking area Win.Move(Win.getLeft + 10dip, Win.getTop + 10dip, True) Win.Close End Sub

I add the "win.close"
But running
when I move the window from dock the Error on
only use the win.hide
can you tell me how to use the win.close

After_Undock is an event raised when you leave a dock area. At this moment, the finger is on the screen, moving the window. It's normal that you get an error if you try to close the window. You have to wait until the finger is up. You can also modify the class to cancel the touch event. But what do you want to do exactly because I cannot see why you want to close a window while undocking?

winjiadh · Nov 12, 2014

hank you for your reply
I made a sample, including AddWin added a process
Want to do after this win into the dock, the bottom of the screen to create a win

B4X:

Sub AddWin
    Dim Win As ClsFloatingWindow
    Win.Initialize(Activity, 0, 0, 120dip, 90dip, Me)
    Win.SetTitleText("Drag me")
    Win.StillVisible = 90dip
    Win.TouchSlop = 0 'The window will start to move immediately after a finger move
    SetBackimg
    ' Docking areas and sticky edge
    Dim wRect As Rect, Left, Top, p As Int
    wRect.Initialize(Left, Top, Left + 110dip, Top + 110dip)
    Win.AddDockingArea(wRect)
    Win.Move(100dip, 100%y - 90dip, True)
    Win.AddStickyEdge(3, 100%y)
    Win.SetOnStickListener("After_Stick")
    Win.SetOnEnterDockAreaListener("Entering_DockA")
    Win.SetOnDockListener("After_Dock")
    Win.SetOnUndockListener("After_Undock")
End Sub

I'm ready, but the problem is here
This win is the more the more, so I hope when win removed from the dock, closed out the win
Hope to get your help, I how to define when finger is up, closed out the win?

Informatix · Nov 12, 2014

winjiadh said:
hank you for your reply
I made a sample, including AddWin added a process

Could you post this sample ?

winjiadh said:
Want to do after this win into the dock, the bottom of the screen to create a win

B4X:

Sub AddWin Dim Win As ClsFloatingWindow Win.Initialize(Activity, 0, 0, 120dip, 90dip, Me) Win.SetTitleText("Drag me") Win.StillVisible = 90dip Win.TouchSlop = 0 'The window will start to move immediately after a finger move SetBackimg ' Docking areas and sticky edge Dim wRect As Rect, Left, Top, p As Int wRect.Initialize(Left, Top, Left + 110dip, Top + 110dip) Win.AddDockingArea(wRect) Win.Move(100dip, 100%y - 90dip, True) Win.AddStickyEdge(3, 100%y) Win.SetOnStickListener("After_Stick") Win.SetOnEnterDockAreaListener("Entering_DockA") Win.SetOnDockListener("After_Dock") Win.SetOnUndockListener("After_Undock") End Sub

I'm ready, but the problem is here
This win is the more the more, so I hope when win removed from the dock, closed out the win
Hope to get your help, I how to define when finger is up, closed out the win?

I'm sorry but I don't have a clear understanding of your intent (and the automatic translator that you use does not help). Maybe a practical example could help me to understand.

winjiadh · Nov 13, 2014

thanks
I upload the new files to you ,but the filles on error when I close the win.
I need you help
when win removed from the dock, closed the win

Informatix · Nov 13, 2014

winjiadh said:
thanks
I upload the new files to you ,but the filles on error when I close the win.
I need you help
when win removed from the dock, closed the win

You uploaded my own demo! Without further explanations or a demo more explicit (what's your app intended for? why the user should do this?), I cannot help. Closing the window while undocking is extremely simple: Win.Close in After_Undock and Return just after CallSub2(wModule, OnUndockWinSub, Me) in the class (or replace CallSub2... by Close and Return), so I don't think that is what you're really asking.

ttsolution · Feb 9, 2015

Hi all,

I added some small adjust to the class for modal window.

Jonh,

Informatix · Feb 9, 2015

ttsolution said:
Hi all,

I added some small adjust to the class for modal window.

Jonh,

Technically, what you did is a blocking window, not a modal window (you don't stop the code execution while the window is displayed).
As you deactivated the MoveWin function so the window cannot move, what's the reason to use this class? There are better alternatives to display a modal dialog, e.g. my BetterDialogs library. I'm curious to know the reason.

ttsolution · Feb 26, 2015

I will try with your BetterDialogs library. Thanks Informatix.

gudino jose luis · Apr 12, 2015

great!!!

ttsolution · Jun 19, 2015

Hi all,

Using the BetterDialog Lib. How can we trap the PositiveButton Click Event ? I need to check user input before close the dialog

Many thanks,

Jonh.

Informatix · Jun 19, 2015

ttsolution said:
Hi all,

Using the BetterDialog Lib. How can we trap the PositiveButton Click Event ? I need to check user input before close the dialog

Many thanks,

Jonh.

Please post in the right thread.

iCAB · Aug 31, 2015

Hi All

Is there anything similar to this for iOS?

Thanks

Informatix · Sep 1, 2015

iCAB said:
Hi All

Is there anything similar to this for iOS?

Thanks

As you have the source code and as this code does not require specific Android features, you could make it compatible with B4i. I won't do it myself as I have no interest in iOS and B4i.

iCAB · Sep 1, 2015

Thanks for your reply
By the way, great job on this

tamayo461 · Nov 27, 2015

Extremadamente útil...

Rantor777 · Nov 27, 2015

Where Can i download the Second Demo app, the one that looks like Android Puzzle ?

Regards!

Informatix · Nov 28, 2015

Rantor777 said:
Where Can i download the Second Demo app, the one that looks like Android Puzzle ?

Regards!

It's in my tutorial in french.

Alberto Iglesias · Nov 30, 2015

The sample you do like this sample:

PLEEEEEASEEEEEE!

Informatix · Nov 30, 2015

Alberto Iglesias said:
The sample you do like this sample:

PLEEEEEASEEEEEE!

This is protected by copyright. I cannot release any source.
All the code that you need was posted. I don't have anything more on my HD.

billmoultrie · Jun 1, 2016

I am using Informatix's puzzle version of his demo (the 9 square matrix).
I am trying to slide a tile from its original position to the adjacent tile and get them to swap their position.
This means I have to detect the movement of the tile, which I can with UnDock.
But I can not see how to swap the stickyedge addresses so that when the animation begins they will change places.

Can anyone help.

B4A Library [Class] Floating Windows

Attachments

Expert

Active Member

Expert

Active Member

Attachments

Expert

Member

Attachments

Expert

Member

Active Member

Member

Expert

Well-Known Member

Expert

Well-Known Member

Member

Member

Expert

Well-Known Member

Expert

Member

Privacy & Transparency

Privacy & Transparency