Графика в Delphi 7

[_Санек_]

Создаю программу вроде Paint, хочу чтобы выводилась длина отрезка в сантиметрах, но разрешение у каждого компа разное, подскажите, пожалуйста.

[Скандербег]

  //экранные точки в мм
  function PtIntoMM(Pt : Integer) : Integer; //mm
  begin
    Result := Round(Pt*25.4 / Screen.PixelsPerInch)
  end;
  //мм в экранные точки
  function MMIntoPt(MM : Integer) : Integer;
  begin
    Result := Round(MM * (Screen.PixelsPerInch / 25.4))
  end;

Не зависит от разрешения монитора

[_Санек_]

Спасибо!!!

[RuVarez]

Используй GLScene!