Einzelnen Beitrag anzeigen

andiak

Registriert seit: 1. Nov 2007
89 Beiträge
 
#6

Re: Nullstellen berechner

  Alt 1. Jan 2008, 20:01
Im prinzip geht es um diesen button klick oder?
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var x, y : integer;
begin
  Paintbox1.Canvas.Brush.Color:=clolive;
  Paintbox1.Canvas.Rectangle(0,0,width,height);
  x:=-100;
  While x<=100 do
    begin
         y:=round(x*x/100);
         Paintbox1.Canvas.Pixels[x+100,200-y] := clnavy;
         x:=x+1;
    end;

Ich werde in meinen Projekt jetzt erstmal ne PaintBox einfügen ich würde aber gerne das die Paintbox irgendwie so aussiehst
http://www.stauff.de/matgesch/bilder...tensystem2.gif
Ist das möglich?
  Mit Zitat antworten Zitat