Das ist ein interessantes Problem. Sowas wollte ich auch schon mal schreiben, mit 'ner Paintbox. Ich versuche mal Quelltext zu rekonstruiren, den ich verwendet habem um mal testweise die Funktion
f(x)=x
darzustellen:
Delphi-Quellcode:
paintbox1.Canvas.MoveTo(0,0);
paintbox1.Canvas.LineTo(100,100);
Das geht zumindest ein bißchen. Aber der doof fängt mit seiner Linie oben Links an. Dann habe ich mal was "parableartiges" probiert:
Delphi-Quellcode:
var x,y,s:integer;
paintbox1.Canvas.MoveTo(0,0);
for s:=1 to 100 do
begin
inc(x);
y :=x*x;
paintbox1.Canvas.LineTo(x,y);
end;
Da kam aber was raus, was nach allem anderen, als nach 'ner Parabel aussah. Aber ich habe mir schon seit längerem mal überlegt 'ne Kompo zu schreiben, die ein Paintbox bedient und in die man nur mit Werten füttern muss, die dann automatisch zeichnet.
Letzter Tipp: Drogen. Machen zwar nicht glücklich, geben einem aber wenigstens das Gefühl glücklich zu sein.
Have a lot of fun!