KiXforms Forum Index KiXforms
The Forum for the KiXforms Community
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 
 Quick Links 
Site News
Downloads
Documentation
Donations
Script Archive
Tracking Systems

Problem with statusbar

 
Post new topic   Reply to topic    KiXforms Forum Index -> KiXforms.NET Discussion
View previous topic :: View next topic  
Author Message
yuvalf
KiXforms Dabbler
KiXforms Dabbler


Joined: 16 Aug 2003
Posts: 12

PostPosted: Wed Oct 26, 2005 7:07 pm    Post subject: Problem with statusbar Reply with quote

Any one know how to use the statusbar,there is a problem with a kixforms designer.

Sad Sad
Back to top
View user's profile Send private message
Shawn
KiXforms Developer
KiXforms Developer


Joined: 22 Feb 2003
Posts: 1983
Location: Canada

PostPosted: Wed Oct 26, 2005 7:13 pm    Post subject: Reply with quote

Just add it as a control. And set the Text property to whatever. In the most recent build (the very latest), I added the Panels collection. Let me know if your looking for a simple (no panel) StatusBar or a sexy mutli-panel StatusBar ... will explain more depending...
Back to top
View user's profile Send private message
yuvalf
KiXforms Dabbler
KiXforms Dabbler


Joined: 16 Aug 2003
Posts: 12

PostPosted: Wed Oct 26, 2005 7:54 pm    Post subject: Reply with quote

The Panels collection didnt works,can you show me how to use that
Back to top
View user's profile Send private message
Shawn
KiXforms Developer
KiXforms Developer


Joined: 22 Feb 2003
Posts: 1983
Location: Canada

PostPosted: Wed Oct 26, 2005 9:16 pm    Post subject: Reply with quote

I sure will ... will post one shortly ...
Back to top
View user's profile Send private message
Shawn
KiXforms Developer
KiXforms Developer


Joined: 22 Feb 2003
Posts: 1983
Location: Canada

PostPosted: Wed Oct 26, 2005 9:25 pm    Post subject: Reply with quote

Here's an example that lays-out six panels in a StatusBar, with Text and Icon ... checkout the following properites of the StatusBarPanel ...

AutoSize
Gets or sets a value indicating whether the status bar panel is autosized.

BorderStyle
Gets or sets the border style of the status bar panel.

Icon
Gets or sets the icon to display within the status bar panel.

MinWidth
Gets or sets the minimum allowed width of the status bar panel within the StatusBar control.

Text
Gets or sets the text of the status bar panel.

Width
Gets or sets the width of the status bar panel within the StatusBar control.

Heres the example. Dont forget to download and install the very latest dev. build.

Code:

Break On

$System = CreateObject("Kixforms.System")

$Form = $System.Form()
$Form.ClientSize = $System.Size(640,480)

$MainMenu = $System.MainMenu()
$FileMenu = $MainMenu.MenuItems.Add($System.MenuItem("File"))
$ExitMenu = $FileMenu.MenuItems.Add($System.MenuItem("Exit"))
$ExitMenu.Click = "$$Form.Close"

$Bitmap = $System.Bitmap.Frombase64String(BitmapString())
$ImageList = $System.ImageList()
$ImageList.ColorDepth = $System.ColorDepth_Depth8Bit
$ImageList.ImageSize = $System.Size(16,16)
$ImageList.TransparentColor = $System.Color.Silver
$= $ImageList.Images.AddStrip($Bitmap)

$StatusBar = $Form.Controls.Add($System.StatusBar())
$StatusBar.ShowPanels = 1

For $i = 1 To 6
 $StatusBarPanel = $StatusBar.Panels.Add($System.StatusBarPanel())
 $StatusBarPanel.Text = "Panel" + $i
 $StatusBarPanel.Icon = $System.Icon.FromBitmap($ImageList.Images.Item($i))
Next

$Form.Center
$Form.Show

While $Form.Visible
 $= Execute($Form.DoEvents)
Loop

Exit 1

Function BitmapString()
$BitmapString = "
iVBORw0KGgoAAAANSUhEUgAAAUAAAAAQBAMAAACVR7vaAAAAAXNSR0IArs4c6QAAAARnQU1B
AACxjwv8YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAA
ADBQTFRFAAAAgAAAAIAAgIAAAACAgACAAICAwMDAgICA/wAAAP8A//8AAAD//wD/AP//////
TxMmSQAAAAlwSFlzAAAOxAAADsQBlSsOGwAAAvpJREFUSMe9ls1q4zAQgAUJaKEHk1Nfo9A9
9LgHgXPrq0xAIEMPG0ihgRzyKrml0INfyQdDAz1o58+SbGc3LCw7/YktWdKXb0ZKTABjjA0S
6cKtqVl6+CoUYYO0plGj3mnIRDSMIjWfm3NjbLgZJkCMUVeAAKCAe3hgFpyiwgc6Woh+M+Aw
ypi7EwGs7unufrZCFVv8sQEuGF1qPjSfh1i+MwNXcQWwsvmeo14LIL3Hyhjqh4Q/APIo2G1P
d4udDasV3q3mK1TE19pwrCjSQs37e1usewOQDLDvpMkL4MJyf7SlQZ4KumrpXB3giW7w3wYV
bu6vAEbvapzgSPN80iI1Nb8cLvtjlY3C1mx/D4gphK9OS4X8lIDY3iE91pyWHYvEYX2MDg1S
iaFBJBwEOkfQzqlBd3ZtCcjt++MHibGcNPrNW2G4gDFgi3EK8iQ+kQC5BJHJGmsVkN4Hci9j
fK7hiYM6VlyGNQH8CGFJJJ4MrqMjg53pKgFkhZe4rSQ1ljJiDQw5rjoFJI7CIAbthUeKhwTI
mxDRdFdrEYrBrnIOdrtXx8pIIS3vKQGSyNpxDb6vxwZJ4VvTau3IKfDNwHYKSN2lQSZIgI90
92g1qYCEoDn2y2Qw9mjwO77UySD7UUDveBe//hSDRg3yIw2VFAOyOZI1BsTeEeBXx2QZkMPq
cTgCpHXZoDE9GcTLPtUg+1FAJwbXcW5Q1s0G54DTFLcLBhobXJDBZh8kxwLoMYk1jU4Ge9c7
PghpF7MfqUHvXD4HC4NcgzAYlBrMAUMlTQC70pwCBgZ8+QjEJn+oxns5KXw2GHupQD1mAPv9
4KPFPTLfxdmgSaevnkBBR052sQicAWqKZQfbMWA26Ho5qDfzgwwNtmODQpEMluFKwKCAsjuH
j8wpIOjJVwLqPJhBzKGmWj/q5kET02daNhjGBjU8hmyfCeCV+Zh0+LKQXqweob6eDBFQkXed
8s7eBiwMlvHHLyL/LGgXvIWxHBi+LZVRz4b+H8AM9NfDfgHDqyyNO6vZQAAAAABJRU5ErkJg
gg==
"
EndFunction
Back to top
View user's profile Send private message
yuvalf
KiXforms Dabbler
KiXforms Dabbler


Joined: 16 Aug 2003
Posts: 12

PostPosted: Wed Oct 26, 2005 9:39 pm    Post subject: Reply with quote

Thanks Shawn

Very Happy Very Happy Very Happy Very Happy
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    KiXforms Forum Index -> KiXforms.NET Discussion All times are GMT
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


Powered by phpBB © 2001, 2005 phpBB Group