diff --git a/app/src/gambas3/.src/Debug/FOutput.class b/app/src/gambas3/.src/Debug/FOutput.class index fcd951dee..5c7b5f364 100644 --- a/app/src/gambas3/.src/Debug/FOutput.class +++ b/app/src/gambas3/.src/Debug/FOutput.class @@ -71,6 +71,7 @@ Public Sub ReadConfig() edtOutput.Flags[Editor.ShowCurrentLine] = False edtOutput.Flags[Editor.ShowModifiedLines] = False edtOutput.Flags[Editor.ShowLineNumbers] = False + edtOutput.Flags[Editor.HideMargin] = True Project.SetSmallFont(tlbOutput) diff --git a/app/src/gambas3/.src/Editor/Code/FEditor.class b/app/src/gambas3/.src/Editor/Code/FEditor.class index 02709f44b..9a4f5220a 100644 --- a/app/src/gambas3/.src/Editor/Code/FEditor.class +++ b/app/src/gambas3/.src/Editor/Code/FEditor.class @@ -3476,6 +3476,9 @@ Private Sub GetExpressionTypeWithEval(aSym As String[], aType As Integer[]) As S Else If aType[I] = Highlight.Function Then I2 = FindNextBracket(aSym, I, "(", ")") + hSymbol = CComponent.GetClassSymbols(".")[aSym[I]] + Try sType = hSymbol.Type + If sType Then I = I2 Else If aSym[I] = "[" Then @@ -3596,6 +3599,8 @@ Private Sub CreateLocalVariable() As Boolean Dim sType As String Dim I As Integer + ' TODO: Support for X = Read ... + ' Assignment If aSym.Count >= 3 And If aType[0] = Highlight.Symbol And If aSym[1] = "=" Then diff --git a/app/src/gambas3/.src/Editor/Other/FTextEditor.form b/app/src/gambas3/.src/Editor/Other/FTextEditor.form index dd57dd00e..dfcc77eb9 100644 --- a/app/src/gambas3/.src/Editor/Other/FTextEditor.form +++ b/app/src/gambas3/.src/Editor/Other/FTextEditor.form @@ -307,7 +307,7 @@ } { edtEditor Editor Editors Name = "edtEditor" - MoveScaled(37,14,36,22) + MoveScaled(23,8,44,28) Expand = True Border = False }