Delphi VCL ile koordinat sistemini değiştirmek bir kaç komutla mümkün. Böylece toplama çıkarmalarla uğraşmak zorunda kalmazsınız.
Örnekte ayrıca koordinat merkezi değiştirmede gösterilmekte
var HDC01 : HDC;
begin
Image1.Height := 250;
Image1.Width := 250;
HDC01 := Image1.Canvas.Handle; //Nesne handle al
SetMapMode(hDC01, MM_LOENGLISH); //Koordinat sistemini değiştir
SetViewportOrgEx(hDC01, 0, 250, nil); //Koordinat merkezini*değiştir
Image1.Canvas.MoveTo(0, 0);
Image1.Canvas.LineTo(100, 10);
end;
Örnekte ayrıca koordinat merkezi değiştirmede gösterilmekte
var HDC01 : HDC;
begin
Image1.Height := 250;
Image1.Width := 250;
HDC01 := Image1.Canvas.Handle; //Nesne handle al
SetMapMode(hDC01, MM_LOENGLISH); //Koordinat sistemini değiştir
SetViewportOrgEx(hDC01, 0, 250, nil); //Koordinat merkezini*değiştir
Image1.Canvas.MoveTo(0, 0);
Image1.Canvas.LineTo(100, 10);
end;