ModeDrawA

Синтаксис

Sub ModeDrawA(ByVal mode As Integer)

Описание

Устанавливает режим сглаживания при рисовании

Параметры

mode - режим сглаживания. Можно использовать:

ANTIALIAS_NONE - нет сглаживания
ANTIALIAS_FAST - быстрый режим сглаживания, упор делается на скорость
ANTIALIAS_GOOD - золотая середина, хорошо сглаживает при приемлемой скорости
ANTIALIAS_BEST - самое лучшее сглаживание , в ущерб скорости

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Dim As Any Ptr Gpbitmap=Create_ImageA(250,270)
Dim As Hbitmap bmp
Dim As HWND hw
ImageStartDrawA(Gpbitmap)
  ModeDrawA(ANTIALIAS_BEST)
  lineDrawA(15,30,100,100,7) ' with mode smoothing
  ModeDrawA(ANTIALIAS_NONE)
  LineDrawA(185,30,100,100,7) ' Not mode smoothing
StopDrawA
hw=OpenWindow("GDI+",100,100,250,270)
CenterWindow(hw)
bmp=CreateHBitmapFromGpBitmap(GpBitmap,&hf0f0F0)
ImageGadget(1, 0,0,300,300, bmp)
Do:Loop Until WaitEvent()= eventclose
FreeGpBitmap(Gpbitmap):Free_Image(bmp)

Результат

Created with the Personal Edition of HelpNDoc: Free help authoring tool