Was ist denn genau die Aufgabe die du damit lösen willst? Ich hab den Hintergrund nicht ganz verstanden, aber mein Ansatz wäre zu versuchen, eine Art Funktion für diese Pixel aufzustellen:
Vom Pixel A(0,0) zum Pixel B(10,20) sähe das dann so aus:
f(x)=[(20-0)/(10-0)]*x. // Steigungsdreieck wie aus der 8. Klasse
Und dann
Delphi-Quellcode:
for i:= A.x to B.x do
Pixel[A.x+i,A.y+f(i)].color:=ClLiegtdrauf.
Nur beim Runden gibts Probleme.