Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Nullstellen berechner (https://www.delphipraxis.net/105892-nullstellen-berechner.html)

andiak 1. Jan 2008 19:40


Nullstellen berechner
 
Guten Abend,

ich bin gerade dabei einen Nullstellen (pg) formel berechner zu programieren das man nur p und q eingeben muss und x1,x2 falls vorhanden rausbekommen
Soweit sogut hat alles geklappt
Nun wollte ich das ergebnis noch in einem TImage anzeigen lassen in einen Koordinatensystem
nun wie die Parabel aussieht hängt doch eigentlich erstmal nur von a ab ob sie nun gestaucht oder gestreckt ist oder?
Hat jemand neahnung wie ich das realisieren kann? das die Parabel gezeichnet wird?

mkinzler 1. Jan 2008 19:47

Re: Nullstellen berechner
 
Koordinaten berechnen und auf Canvas zeichnen

Aurelius 1. Jan 2008 19:47

Re: Nullstellen berechner
 
Du brauchst doch eigentlich nur die Punkte-Koordinaten in einem bestimmten Intervall ausrechnen lassen und das ganze hinzeichnen. Ich habe so ein Projekt noch hier liegen, wenn du willst lade ich es hoch.

andiak 1. Jan 2008 19:49

Re: Nullstellen berechner
 
ähh das kannst du gerne machen oder mich besser in icq adden? 272866203 ??

Aurelius 1. Jan 2008 19:56

Re: Nullstellen berechner
 
Liste der Anhänge anzeigen (Anzahl: 1)
Ich hab dir mal das gesamte Projekt angehängt.

andiak 1. Jan 2008 20:01

Re: Nullstellen berechner
 
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?

Aurelius 1. Jan 2008 20:06

Re: Nullstellen berechner
 
Du musst das Bitmap prakt in die Paintbox "reinladen", dazu findest du best. was im Forum...

andiak 1. Jan 2008 20:23

Re: Nullstellen berechner
 
Kann ich das nicht auch mit TImage Canvas machen ??
Wenn ich x1= -0,528
und x2=-9,427 habe wie kann ich das dann entweder auf der Paintbox oder auf nen image einzeichnen?

mkinzler 1. Jan 2008 21:07

Re: Nullstellen berechner
 
Canvas ist Canvas

andiak 1. Jan 2008 21:29

Re: Nullstellen berechner
 
Liste der Anhänge anzeigen (Anzahl: 1)
Ich hoffe ich verstehe es eventuell anhand eines beispieles das programm ist hier


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:11 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz