Функция TextOut

Declare Function TextOut Lib "gdi32" Alias "TextOutA" ( _
    ByVal hdc As Long, _
    ByVal x As Long, _
    ByVal y As Long, _
    ByVal lpString As String, _
    ByVal nCount As Long) As Long

hdc

Контекст устройства для отображения строки текста

x

Координата x начальной точки для отображения текста

y

Координата y начальной точки для отображения текста

lpString

Строка,отображаемая на устройстве

nCount

Размер в символах lpString

Пример

' Выводим текст "Русский_Проект"
' на форме в (100,50)
Dim lRet As Long ' возвращаемое значение
' Показываем текст
lRet = TextOut(Form1.hDC, 100, 50, "Русский_Проект", 14)

Смотри также

Категория