Commit db5e7bb9 authored by Benoît Minisini's avatar Benoît Minisini
Browse files

Welcome window: Fix the drawing of the close button of project boxes displayed in single column.

[DEVELOPMENT ENVIRONMENT]
* BUG: Welcome window: Fix the drawing of the close button of project boxes displayed in single column.
parent 151da734
Pipeline #308187147 passed with stage
in 22 minutes and 19 seconds
This diff is collapsed.
......@@ -773,7 +773,7 @@
Index = 0
}
{ Panel10 HBox
MoveScaled(12,68,83,4)
MoveScaled(25,68,83,4)
Spacing = True
{ Panel11 Panel
MoveScaled(0,1,14,3)
......
......@@ -144,7 +144,6 @@ Public Sub DrawingArea_Draw()
Dim sText As String
Dim P As Integer
Dim bSmall As Boolean
Dim hScrollView As ScrollView
Dim WT As Integer
Dim iCol As Integer
Dim iBg As Integer
......@@ -159,13 +158,13 @@ Public Sub DrawingArea_Draw()
W = Paint.W - 1
H = Paint.H - 1
If Me.Parent Is ScrollView Then
hScrollView = Me.Parent
If hScrollView.Arrangement = Arrange.Vertical And If hScrollView.ScrollH > hScrollView.ClientH Then
W -= P
Endif
Endif
' If Me.Parent Is ScrollView Then
' hScrollView = Me.Parent
' If hScrollView.Arrangement = Arrange.Vertical And If hScrollView.ScrollH > hScrollView.ClientH Then
' W -= P
' Endif
' Endif
XS = X
YS = Y
WS = W
......@@ -292,9 +291,9 @@ Public Sub DrawingArea_Draw()
Endif
End With
Paint.Restore
Paint.Restore
End With
If ShowButton And If $bHighlight Then
X = 0
......
app/src/gambas3/img/32/do-not-translate.png

313 Bytes | W: | H:

app/src/gambas3/img/32/do-not-translate.png

314 Bytes | W: | H:

app/src/gambas3/img/32/do-not-translate.png
app/src/gambas3/img/32/do-not-translate.png
app/src/gambas3/img/32/do-not-translate.png
app/src/gambas3/img/32/do-not-translate.png
  • 2-up
  • Swipe
  • Onion skin
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment