Így első nekifutásra az elv jónak néz ki, csak mégsem jó az arány, amit okozhat ennek a sornak a hibája:
radnezetmag:=((opanelkep.width-4)*form1.height) / palyakep.canvas.height;

opanelkep.width-4 helyett opanelkep.height-4 kellene...