comp • gb.qt4 • paint • text

Paint.Text (gb.qt4)

Static Sub Text ( Text As String [ , X As Float, Y As Float, Width As Float, Height As Float, Alignment As Integer ] )

Adiciona o texto especificado para o caminho atual, usando a fonte atual definida pela propriedade Font.

  • X, Y, Width, Height : um retângulo onde o texto será desenhado.

  • Alignment : a forma como o texto é alinhado dentro do retângulo anterior.

Se apenas o texto for especificado, então ele vai ser desenhado no ponto atual, coordenada Y sendo a linha de base do texto.

Se apenas os argumentos X and Y são especificados, então, o texto será desenhado no ponto (X,Y) especificado, a coordenada Y é a linha de base do texto.

Caso contrário, o texto será desenhado dentro do retângulo especificado. Cuidado para que o retângulo não corte o texto.

Exemplo

Public Sub DrawingArea1_Draw()
  Paint.Brush = Paint.Color(Color.Orange)
  Paint.Font = Font["Ubuntu,Bold,32"]
  Paint.Text("Este é o Texto", 10, 10, 350, 50, Align.Center)
  Paint.Fill()
End