Kann mir jemand bei der erstellung eines Quelltextes helfen?

[Bloodhound]

Delphi-Quellcode:

unit Unit1;

interface

uses
* math, Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
* Dialogs, StdCtrls;

type
* TForm1 = class(TForm)
* * a: TEdit;
* * b: TEdit;
* * fi: TEdit;
* * Ergebnis: TEdit;
* * Berechnen: TButton;
* * CheckBox1: TCheckBox;
* * procedure ErgebnisChange(Sender: TObject); 
* * procedure BerechnenClick(Sender: TObject);
* * procedure CheckBox1Click(Sender: TObject);
* private
* * { Private declarations }
* public
* * { Public declarations }
* * procedure aChange;
* * procedure bChange;
* * procedure fiChange;
* end;
var
* Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.aChange;
begin
* *//Eingabe fließt als a in ergebnis ein
end;
procedure TForm1.bChange;
begin
* *//2*3,14159 geteilt durch Eingabe b fließt als B in Ergebnis ein
end;
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
* *{wenn Checkbox markiert wird eingabe in b* (b mal mit 3,14159 multipliziert)}
end;
procedure TForm1.fiChange;
begin
* *//Eingabe fließt als fi in Ergabnis ein
end;
procedure TForm1.BerechnenClick(Sender: TObject);
begin
* *//Bei klick des Buttons wird ergebnis angezeigt
end;
procedure TForm1.ErgebnisChange(Sender: TObject);
begin
* *(*Ergebnis grundform* f(x)=Eingabe in feld a*sin(eingabe in feld b(x-eingabe in feld fi))*)
* *{mit sin bzw. x muss nichts gerechnet werden es müssen nur die eingaben eingesetzt werden.}
end;
end.