luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

[DEVELOPMENT ENVIRONMENT]

Browse source 
* NEW: Some little changes in the welcome dialog.


git-svn-id: svn://localhost/gambas/trunk@5341 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2012-11-20 01:46:14 +00:00
parent a7c3939e3d
commit 0b1fa69512
4 changed files with 14 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
app/src/gambas3/.lang/.pot
View file

@ -2695,15 +2695,15 @@ msgstr ""
msgid "Sort history" msgid "Sort history"
msgstr "" msgstr ""
#: FMain.class:592 FOpenProject.form:116 FWelcome.form:39 #: FMain.class:592 FOpenProject.form:116 FWelcome.form:42
msgid "Sort by date" msgid "Sort by date"
msgstr "" msgstr ""
#: FMain.class:592 FOpenProject.form:125 FWelcome.form:46 #: FMain.class:592 FOpenProject.form:125 FWelcome.form:49
msgid "Sort by name" msgid "Sort by name"
msgstr "" msgstr ""
#: FMain.class:592 FOpenProject.form:133 FWelcome.form:52 #: FMain.class:592 FOpenProject.form:133 FWelcome.form:55
msgid "Sort by path" msgid "Sort by path"
msgstr "" msgstr ""

4
app/src/gambas3/.src/FMain.class
View file

@ -2153,8 +2153,8 @@ Public Sub Form_Resize()
Dim W, H As Integer Dim W, H As Integer
If dwgWelcome.Visible Then If dwgWelcome.Visible Then
W = Desktop.Scale * 90 W = Desktop.Scale * 90 + 64
H = Desktop.Scale * 90 H = Desktop.Scale * 90 + 64
dwgWelcome.Move((Me.ClientW - W) \ 2, (Me.ClientH - H) \ 2, W, H) dwgWelcome.Move((Me.ClientW - W) \ 2, (Me.ClientH - H) \ 2, W, H)
Endif Endif

1
app/src/gambas3/.src/Welcome/FWelcome.class
View file

@ -633,3 +633,4 @@ Public Sub panButton_BeforeArrange()
dwgFrame.Move(0, 0, panButton.W, panButton.H) dwgFrame.Move(0, 0, panButton.W, panButton.H)
End End

9
app/src/gambas3/.src/Welcome/FWelcome.form
View file

@ -7,6 +7,9 @@
Text = ("Welcome to Gambas 3") Text = ("Welcome to Gambas 3")
Icon = Picture["img/logo/logo-ide.png"] Icon = Picture["img/logo/logo-ide.png"]
Arrangement = Arrange.Vertical Arrangement = Arrange.Vertical
Spacing = True
Margin = True
Padding = 24
{ mnuSort Menu { mnuSort Menu
{ mnuSortByDate Menu mnuSort { mnuSortByDate Menu mnuSort
Name = "mnuSortByDate" Name = "mnuSortByDate"
@ -37,9 +40,12 @@
Visible = False Visible = False
Background = &H000000& Background = &H000000&
} }
{ HBox1 HBox { HBox1 Panel
MoveScaled(1,25,78,41) MoveScaled(1,25,78,41)
Background = &HDF6B00&
Expand = True Expand = True
Arrangement = Arrange.Horizontal
Padding = 2
{ Panel7 Panel { Panel7 Panel
MoveScaled(1,2,37,37) MoveScaled(1,2,37,37)
Arrangement = Arrange.Fill Arrangement = Arrange.Fill
@ -63,6 +69,7 @@
{ panList Panel { panList Panel
MoveScaled(48,5,28,30) MoveScaled(48,5,28,30)
Visible = False Visible = False
Background = &HFFFFFF&
Mouse = Mouse.Arrow Mouse = Mouse.Arrow
Expand = True Expand = True
Arrangement = Arrange.Vertical Arrangement = Arrange.Vertical