graphen zeichnen ?

[B89]

Hi,
ich hab mich für den Physikunterricht mal an ein Programm zur Lichtbrechung gesetzt.
Bin jetzt schon soweit das ich die beiden Dichtewerte und den Winkel Alpha mittels trackbar bestimmen lassen kann und so auch die anderen Winkel ausrechnet.
Ich möchte die Werte nun aber am besten graphisch darstellen lassen, also wenn ich die werte verändere das sich der Graph auch automatisch mit verändert. Hab es schon mit einem TImage versucht aber ich komme einfach nicht weiter.
Hat von vielleicht jmd. eine Idee wie ich das am besten meistern kann??

Danke!!

[Fussball-Robby]

Wo hakt es denn? Weißt du, wie man auf ein Canvas zecihnet? Oder hast du Probleme beim Berechnen o.ä.?

Mfg

PS. herzlich willkommen in der Dp

[B89]

naja ich hab es schon mit move to ..line to versucht, aber so richtig komm ich beim zeichen nicht raus

[Medium]

Bevor du dich an Delphi-Projekte begibst, lerne bitte zunächst ordentliches Fragen stellen. Du hast noch nichtmal gesagt, WAS du überhaupt darstellen willst, von sämtlichen Randinfos mal ganz abgesehen.

[dajuhsa]

versuch doch ne funktion in der art f(x)= ...
und dann so oder so ähnlich:

Delphi-Quellcode:

procedure GraphZeichnen(Graphenbreite:integer);
var i,j:integer;
begin

  for i := 0 to graphenbreite do
  begin
    j := i * XYZ; //statt XYZ halt deine funktion einsetzen
    Paintbox.Canvas.Pixels[i,j] := clblack; 
  end;

end;

oder falls ne funktion nicht hinhaut auch so:

Delphi-Quellcode:

var YWert: Array [0..Graphenbreite] of Integer;

...

procedure GraphZeichnen;
var i:integer;
begin

  for i := 0 to High(YWert) do
    Paintbox.Canvas.Pixels[i,YWert[i]] := clblack;

end;

EDIT: das kommt dann am besten ins OnChange-Event des Trackbars, weil sie ja gezeichnet werden sollen, sobald man einen Wert ändert

mfG,
dajuhsa

[sx2008]

Du könntest deine Daten an das Programm gnuPlot weitergeben. Damit kann man professionelle Diagramme erzeugen, ohne das du dich allzu tief in die komplexe Materie einarbeiten musst.

[B89]

danke schön...werd mal versuchen eure Tipps umzusetzen

[toms]

Du kannst dir auch mal TEasyGraph anschauen (mit Zoom + div. Einstellungsmöglichkeiten)
oder bei (Siehe Anlage) DelphiForFun vorbeischauen.