Pixel auf einer Geraden

[KPBecker]

Hallo, Delphi-Praktiker,

kennt jemand eine Funktion, die in einem Feld die Pixel-Koordinaten (als x-, y-Paare) einer Geraden zwischen zwei Punkten übergibt ?

Das entspricht in etwa einem LineTo, nur daß die Pixel nicht auf einem Canvas gesetzt werden, sondern die entsprechenden Koordinaten in ein Feld geschrieben werden. Die Linienstärke sei mit "1" angenommen.

Das ist nicht ganz elementar, da je nach der Steigung der Geraden zu einem x-Wert auch mehrere Punkte (mit unterschiedlichen y-Werten) gehören können.

Vielen Dank,
K.-P. Becker