Kann mir jemand bei der erstellung eines Quelltextes helfen?

[MrSpock]

Hallo Bloodhound,

dann lass und mal anfangen:

Zunächst einmal kannst du auf die Mathematische Bibliothek von Delphi zugreifen. Dazu fügst du ganz oben im "implementation Teil" die uses Anweisung:

uses math; hinzu. Das ist schon einmal der erste Schritt.

Jetzt kannst du einmal versuchen eine Procedure zu schreiben, die wie folgt deklariert ist:

function TForm1.SinWithScale(a, x, b, fi: extended; useRad: Boolean): extended; Diese Funktion übernimmt die von dir gegebenen Werte und soll den Funktionswert zurückgeben. Der Rückgabewert wird in Pascal der Variable Result zugewiesen, also:

Delphi-Quellcode:

...
Result := a*sin(...);

Den Parameter useRad habe ich hinzugefügt, um die Werte b, x, fi und den Funktionswert entweder in Rad oder in Grad angeben zu können. Du musst also eine if-Abfrage einfügen und die Werte entsprechend interpretieren.

Wenn du die Funktion geschrieben hast, melde dich wieder. Wenn du damit Probleme hast, sage genau, wo du nicht weiterkommst.