Here is part the code but even this don’t work
d=New Group2D
//create a picture object for displaying the images
pp = new picture(700*defE,700*defE,0)
if pp=nil then
messagebox( "pb!")
else
//rectangle bords arrondis ext.
rectext ctrx,ctry,xht,yht
d.scale=0.1'0.25
pp.objects.append d
rectext is a function :
f=New figureshape
dim a As Integer
a=3*z
f.border=100
f.borderwidth=EpTrai
f.fill=0
'f.fillcolor=rgb(255,255,255)
f.addLine x,y+h/2,x-w/2+a,y+h/2
f.addQuad x-w/2+a,y+h/2, x-w/2,y+h/2-a,x-w/2,y+h/2//bas gauche
f.addline x-w/2,y+h/2-a,x-w/2,y-h/2+a
f.addQuad x-w/2,y-h/2+a, x-w/2+a,y-h/2,x-w/2,y-h/2//Haut gauche
f.addline x-w/2+a,y-h/2,x+w/2-a,y-h/2
f.addQuad x+w/2-a,y-h/2,x+w/2,y-h/2+a,x+w/2,y-h/2// Haut droit
f.addline x+w/2,y-h/2+a,x+w/2,y+h/2-a
f.addQuad x+w/2,y+h/2-a,x+w/2-a,y+h/2,x+w/2,y+h/2// Bas droit
f.addLine x+w/2-a,y+h/2,x,y+h/2
d.append f
Since I am drawing the picture with the app, I would guess it’s on the server ?
Thanks
Chris