GetPix

Синтаксис

Function GetPix(ByVal x As Long,ByVal y As Long) As Long

Описание

Используется для получения цвета точки в области рисования

Параметры

X - расположение по оси X

Y - расположение по оси Y

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Var hwnd=OpenWindow("",100,100,300,300)
UpdateInfoXserver
WindowStartDraw(hwnd)
fillrectdraw(10,10,&h0)
RoundDraw(65,65,150,100,255,50000,20)
TextDraw(120,100,Str(GetPix(120,100)),-1)
StopDraw
Do : Loop until  WaitEvent= EventClose

Результат

Created with the Personal Edition of HelpNDoc: Free EPub producer