Fernando,
is this the code?
*Private Const W As Integer = 2048
Private Const H As Integer = 2048
Public Sub DwgArea_Draw()
Dim angle As Float
Dim eScale As Float
Dim i As Integer
Print "Executing" & Now
dwgArea.width = 800 ' does nothing
dwgArea.Height = 1000 ' does nothing
Print dwgArea.width;
I am trying to create a sundial faceplate. I took the analogic clock,
discarded what I did not need and thought I was ready to work on the
calculations and drawing of the hour angles.
Nevertheless, I am mystified by two things I can't understand:
a) The code produces a loop I can't see why (I am