'All variants script
x = 100%x /10
y = 100%y /10
fontAdjust = ((100%x + 100%y) / (320dip + 480dip) - 1) * 3
' les panels
pnlOPT1.SetLeftAndRight(0*x, 5*x)
pnlOPT1.SetTopAndBottom(0*y, 1*y)
pnlOPT2.SetLeftAndRight(5*x, 10*x)
pnlOPT2.SetTopAndBottom(0*y, 1*y)
pnlOPT3.SetLeftAndRight(0*x, 5*x)
pnlOPT3.SetTopAndBottom(9*y, 10*y)
pnlBLANC.SetLeftAndRight(10*x, 12*x)
pnlBLANC.SetTopAndBottom(1*y, 6*y)
Scroll1.SetLeftAndRight(5*x, 10*x)
Scroll1.SetTopAndBottom(1*y, 6*y)
scroll2.SetLeftAndRight(5*x, 10*x)
scroll2.SetTopAndBottom(1*y, 6*y)
' les boutons de panOPT1
d = pnlOPT1.Width /3
f = pnlOPT1.Height
btnCOUV.SetLeftAndRight(0*d, 1*d)
btnCOUV.SetTopAndBottom(0*f, 1*f)
btnCAT.SetLeftAndRight(1*d, 2*d)
btnCAT.SetTopAndBottom(0*f, 1*f)
btnTABL.SetLeftAndRight(2*d, 3*d)
btnTABL.SetTopAndBottom(0*f, 1*f)
' les boutons de panOPT2
g = pnlOPT2.Width /4
h = pnlOPT2.Height
btnCLEAR.SetLeftAndRight(0*g, 1*g)
btnCLEAR.SetTopAndBottom(0*h, 1*h)
btnSUPP_ART.SetLeftAndRight(1*g, 2*g)
btnSUPP_ART.SetTopAndBottom(0*h, 1*h)
btnHELP.SetLeftAndRight(2*g, 3*g)
btnHELP.SetTopAndBottom(0*h, 1*h)
btnENVOI.SetLeftAndRight(3*g, 4*g)
btnENVOI.SetTopAndBottom(0*h, 1*h)
pnlGRIL.SetLeftAndRight(0*x, 5*x)
pnlGRIL.SetTopAndBottom(1*y, 9*y)
pnlSEARCH.SetTopAndBottom(1*y, 9*y)
pnlSEARCH.SetLeftAndRight(0*x, 5*x)
pnlFONC.SetLeftAndRight(5*x, 10*x)
pnlFONC.SetTopAndBottom(6*y, 10*y)
' les boutons de panFONC
a = (pnlFONC.Width / 5)
b = (pnlFONC.Height / 4)
z = 5dip
' avec les boutons du pavé
b1.SetTopAndBottom(0*b+z, 1*b)
b1.SetLeftAndRight(0*a+z, 1*a)
b2.SetLeftAndRight(1*a, 2*a)
b2.SetTopAndBottom(0*b+z, 1*b)
b3.SetLeftAndRight(2*a, 3*a)
b3.SetTopAndBottom(0*b+z, 1*b)
b4.SetLeftAndRight(0*a, 1*a)
b4.SetLeftAndRight(0*a+z, 1*a)
b4.SetTopAndBottom(1*b, 2*b)
b5.SetLeftAndRight(1*a, 2*a)
b5.SetTopAndBottom(1*b, 2*b)
b6.SetLeftAndRight(2*a, 3*a)
b6.SetTopAndBottom(1*b, 2*b)
b7.SetLeftAndRight(0*a+z, 1*a)
b7.SetTopAndBottom(2*b, 3*b)
b8.SetLeftAndRight(1*a, 2*a)
b8.SetTopAndBottom(2*b, 3*b)
b9.SetLeftAndRight(2*a, 3*a)
b9.SetTopAndBottom(2*b, 3*b)
b10.SetLeftAndRight(2*a, 3*a)
b10.SetTopAndBottom(3*b, 4*b-z)
b11.SetTopAndBottom(3*b, 4*b-z)
b11.SetLeftAndRight(1*a, 2*a)
b12.SetLeftAndRight(0*a+z, 1*a)
b12.SetTopAndBottom(3*b, 4*b-z)
' les boutons de fonction pavé
tgPM.SetTopAndBottom(1*b, 2.5*b)
tgPM.SetLeftAndRight(3*a, 4*a)
tgSUP1.SetLeftAndRight(3*a, 4*a)
tgSUP1.SetTopAndBottom(2.5*b, 4*b)
tgSUP2.SetLeftAndRight(4*a, 5*a)
tgSUP2.SetTopAndBottom(2.5*b, 4*b)
btnModif_Suite.SetLeftAndRight(4*a, 5*a)
btnModif_Suite.SetTopAndBottom(1*b, 2.5*b)
lblPRIX.SetLeftAndRight(3*a+5DIP, 5*a-3DIP)
lblPRIX.SetTopAndBottom(0*b+2DIP, 1*b -5DIP)
lblART.SetLeftAndRight(3.2*a+5DIP, 5*a-3DIP)
lblART.SetTopAndBottom(0.7*b,1*b -5DIP)
' les boutons du panOPT3
r = pnlOPT3.Width / 5
t = pnlOPT3.Height
btnSEARCH.SetLeftAndRight(0*r, 1*r)
btnSEARCH.SetTopAndBottom(0, t)
btnVENDEUR.SetTopAndBottom(0, t)
btnVENDEUR.SetLeftAndRight(1*r, 2*r)
btnGRID_MOINS.SetTopAndBottom(0, t)
btnGRID_MOINS.SetLeftAndRight(2*r, 3*r)
btnGRID_RESULT.SetTopAndBottom(0, t)
btnGRID_RESULT.SetLeftAndRight(3*r, 4*r)
btnGRID_PLUS.SetTopAndBottom(0, t)
btnGRID_PLUS.SetLeftAndRight(4*r, 5*r)
panHELP.SetLeftAndRight(0*x, 10*x)
panHELP.SetTopAndBottom(0*y, 10*y)
WebHELP.SetLeftAndRight(0*x, 10*x)
WebHELP.SetTopAndBottom(1*y, 10*y)
btnWEB.SetLeftAndRight(0*x, 10*x)
btnWEB.SetTopAndBottom(0*y, 1*y)