PureBasic Forums - English

Hi,

i found this code on the board but it doesn't work anymore (no error, no result on the screen):
Has the GDI changed in the meantime or something?

Thanks!

Works here: win10 x64, PB 5.72 x86

Maybe this is 'safer'

PHP wrote:Hi,

i found this code on the board but it doesn't work anymore (no error, no result on the screen):

Code: Select all

Procedure Triangle(hdc,x1.l, y1.l, x2.l, y2.l, x3.l, y3.l)
  ProcedureReturn Polygon_(hdc, @x1, 3)
EndProcedure

OpenWindow(0, 0, 0, 320, 240, "Triangle", #PB_Window_MinimizeGadget|#PB_Window_ScreenCentered)
Repeat
  hdc = StartDrawing( WindowOutput(0) )
  If hdc
    FrontColor(RGB(255, 0, 0))
    Triangle(hdc,10, 10, 10, 100, 100, 10)
    ;     Polygon_(hdc, @x1, 3)
   
    StopDrawing()
  EndIf
Until WaitWindowEvent() = #PB_Event_CloseWindow

Has the GDI changed in the meantime or something?

Thanks!

You shouldn't use WindowOutput(), it's an old command and still here for compatibility, but it can be erased by OS repainting etc. Better try with a CanvasOutput() instead.

Fred wrote:You shouldn't use WindowOutput(), it's an old command and still here for compatibility, but it can be erased by OS repainting etc. Better try with a CanvasOutput() instead.

Seems like I've got some extra work to do! I've just run a search on my program and have found 12 instances of StartDrawing(WindowOutput(...)).