GetClipboardImage()

Синтаксис

Result = GetClipboardImage(#Image [, Depth])

Описание

Создает новое изображение из данных изображения буфера обмена (если таковые имеются).

Параметры

#Image	Номер нового изображения, которое будет создано. Вместо #Image можно использовать #PB_Any, чтобы Номер выделился автоматически.
Depth (дополн.)	Глубина нового изображения. Допустимые значения: 24-битное (по умолчанию) или 32-битное.

Возвращаемое значение

Возвращает не нулевое значение, если изображение создать удалось, иначе - ноль. Если вместо '#Image' использовалось #PB_Any, то в качестве результата будет возвращён Номер нового изображения.

Комментарии

Созданное изображение может быть удалено при помощи функции FreeImage(). Для дальнейшего использования созданного изображения можно применить функции DrawImage() или ImageGadget().

Пример (Фран)

If CreateImage(0, 26, 20)
    StartDrawing(ImageOutput(0))
    Box(0, 0, 26, 20, RGB(255, 255, 255))
    Circle(13, 10, 5, RGB(255, 0, 0))
    StopDrawing()
    SetClipboardImage(0)
EndIf

If OpenWindow(0, 0, 0, 220, 100, "Буфер обмена", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    If StartDrawing(WindowOutput(0))
        DrawImage(GetClipboardImage(0), 10, 10)
        DrawImage(GetClipboardImage(0), 100, 30, 65, 50)
        StopDrawing()
    EndIf

    Repeat
        Event = WaitWindowEvent()
    Until Event = #PB_Event_CloseWindow
EndIf

; Вы также можете открыть программу для рисования (например, "Paint")
; и вставьте содержимое буфера обмена (Правка, а затем Вставить),
; и вы увидите японский флаг;-)

См. также

GetClipboardText()

Поддерживаемые OS

Все