also so sieht zur zeit mein quelltext aus:
Delphi-Quellcode:
var
Form1: TForm1;
zahl1, ergebnis : single;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
zahl1 := StrToFloat(Edit1.text);
ergebnis := zahl1 * 13/100 ;
Label2.Caption := FloatToStr(zahl1) + 'sind ' + FloatToStr(ergebnis);
end;
end.
[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]