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

Fix a typo.

Browse source 
[GB.GUI.BASE]
* BUG: Fix a typo.
This commit is contained in:
gambas 2021-03-05 12:24:15 +01:00 committed by Christof Thalhofer
parent f0094e7f68
commit e6b72c10e8
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
comp/src/gb.gui.base/.src/Label.class
View file

@ -163,7 +163,6 @@ Public Sub UserControl_Draw()
Dim P As Integer Dim P As Integer
Dim F As Integer Dim F As Integer
Dim X As Integer Dim X As Integer
Dim iAlign As Integer
Dim hExt As RectF Dim hExt As RectF
If $iBorder Then If $iBorder Then
@ -200,7 +199,7 @@ Public Sub UserControl_Draw()
' Endif ' Endif
If $bRichText Then If $bRichText Then
Paint.DrawRichText($sText, X, P, Ceil(hExt.W), Me.H - P * ^ 2, $iAlign) Paint.DrawRichText($sText, X, P, Ceil(hExt.W), Me.H - P * 2, $iAlign)
Else Else
Paint.DrawText($sText, X, P, Ceil(hExt.W), Me.H - P * 2, $iAlign) Paint.DrawText($sText, X, P, Ceil(hExt.W), Me.H - P * 2, $iAlign)
Endif Endif