Autor Beitrag
codeman130188
Hält's aus hier
Beiträge: 9



BeitragVerfasst: Mo 24.03.03 16:01 
hi
wir haben gerade in Mathe Quadratische Funktionen z.B:

y=(x+d)² :x :evil: :x

ich habe mal eine frage ob ich die Funktionen durch ein Programm anzeigen kann?
In einem Koordinatensystem :D

Danke im voraus

Warte auf Rückantwort

cu codeman

Der >Mensch< glaubt zu sein was er ist.
Klabautermann
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Veteran
Beiträge: 6366
Erhaltene Danke: 60

Windows 7, Ubuntu
Delphi 7 Prof.
BeitragVerfasst: Mo 24.03.03 16:43 
Hallo,
codeman130188 hat folgendes geschrieben:
ich habe mal eine frage ob ich die Funktionen durch ein Programm anzeigen kann?
In einem Koordinatensystem :D

sicherlich kannst du das. Dazu machst du dir ein Koordinaten System (z.B. mit tCanvas) Errechnest die Werte in einer Schleife (also x = Schleifenvariable) und zeichnest das in dein Koordinatensystem. Am besten du verbindest die einzelnen Punkte.
Wenn du das koordinatensystem nicht selber machen willst (wobei ich der meinung bin, das jeder Programmierer soetwas einmal gemacht haben sollte) findest du sicherlich auch sehr schöne varianten auf den Komponenten-Seiten.

Gruß
Klabautermann
codeman130188 Threadstarter
Hält's aus hier
Beiträge: 9



BeitragVerfasst: Mo 24.03.03 18:31 
bitte etwas genauer erklären bin noch ein anfanger :oops: :oops:

cu codeman
mars
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 238

Debian Woody, Win 2000, Win XP
D7 Ent, Kylix 3
BeitragVerfasst: Mo 24.03.03 20:41 
Nun, du stellst dir dein Formular als Koordinatensystem vor. Du kannst die Achsen mit folgendem Code zeichnen:
ausblenden Quelltext
1:
2:
3:
4:
Canvas.Pen.Color := clBlack;
Canvas.Pen.Style := psSolid;
Canvas.MoveTo(Anfangspositionx,Anfangspositiony);
Canvas.LineTo(Endpositionx,Endpositiony);

Nun gehst du in einer Schleife sozusagen die x-Achse durch:
ausblenden Quelltext
1:
2:
3:
4:
For x:= Anfang to Ende do begin
//Hier errechnest du den y Wert mit deiner quadratischen Funktion
Canvas.Pixels[x,y] := clBlack;
end;


Ich denke, du hast das Prinzip nun begriffen. Den Rest kannst du sicher selber...ist ja nicht mehr allzu viel :wink:
Klabautermann
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Veteran
Beiträge: 6366
Erhaltene Danke: 60

Windows 7, Ubuntu
Delphi 7 Prof.
BeitragVerfasst: Mo 24.03.03 20:51 
Hallo,
codeman130188 hat folgendes geschrieben:
bitte etwas genauer erklären bin noch ein anfanger :oops: :oops:

also, das tCanvas Objekt ist so eine Art Leinwand, auf der du über verschiedene Funktionen Zeichenen kannst. Eignetlich besitzt jedes sichtbare Objekt ein Canvas. Dies erlaubt dir bei jedem Objekt enstrechend einzugreifen (z.B. in einem Stringrid die Texte Rot schreiben, wenn sie eine negative Zahl angeben).
Wenn du wirklich nur Zeichenn willst, wie in diesem Fall, dann empfiehlt es sich eine PaintBox oder ein Image zu nehmen (letzeres ist langsamer bietet aber mehr möglichkeiten, wie z.B. die Grafik als Bitmap zu speichern).
Ein Tutoiad dazu kannst du dir hier runterladen.
Weitere Interessante informationen findest du selbstverständlich in der Delphi-Hilfe.

Gruß
Klabautermann
codeman130188 Threadstarter
Hält's aus hier
Beiträge: 9



BeitragVerfasst: Di 25.03.03 14:44 
seid echt super

danke

cu codeman