[DEVELOPMENT ENVIRONMENT]
* NEW: Make the IDE window maximized by default. * NEW: Use the tawhid background in the about dialog. git-svn-id: svn://localhost/gambas/trunk@6970 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
parent
789deb8b65
commit
62cea47128
4 changed files with 17 additions and 2 deletions
|
@ -1,8 +1,9 @@
|
|||
# Gambas Form File 3.0
|
||||
|
||||
{ Form Form
|
||||
MoveScaled(0,0,177,99)
|
||||
MoveScaled(0,0,176,123)
|
||||
Icon = Picture["img/logo/logo-ide.png"]
|
||||
Maximized = True
|
||||
Arrangement = Arrange.Vertical
|
||||
{ mnuFile Menu
|
||||
Text = Shortcut(("File"), "F")
|
||||
|
|
|
@ -23,6 +23,18 @@ Static Public Sub Run()
|
|||
|
||||
End
|
||||
|
||||
Public Sub _new()
|
||||
|
||||
Dim hImage As Image
|
||||
Dim hBackground As Image
|
||||
|
||||
hImage = Image.Load("img/background/tawhid.png")
|
||||
hBackground = New Image(hImage.W, hImage.H, Color.SetAlpha(Color.TextBackground, 160))
|
||||
hBackground.PaintImage(hImage, 0, 0)
|
||||
Me.Picture = hBackground.Picture
|
||||
|
||||
End
|
||||
|
||||
|
||||
Public Sub Form_Open()
|
||||
|
||||
|
|
|
@ -60,10 +60,12 @@
|
|||
}
|
||||
{ picGradientTop PictureBox
|
||||
MoveScaled(0,24,80,7)
|
||||
Visible = False
|
||||
Ignore = True
|
||||
}
|
||||
{ picGradientBottom PictureBox
|
||||
MoveScaled(0,61,80,7)
|
||||
Visible = False
|
||||
Ignore = True
|
||||
}
|
||||
}
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
# Gambas Form File 3.0
|
||||
|
||||
{ Form Form
|
||||
MoveScaled(0,2,94,72)
|
||||
MoveScaled(0,2,87,81)
|
||||
Background = Color.TextBackground
|
||||
Foreground = Color.TextForeground
|
||||
Text = ("Welcome to Gambas 3")
|
||||
|
|
Loading…
Reference in a new issue