Fehler bei Dateneingabe

[snboy2010]

Ok. Habe es so gelöst

Code:

procedure TForm1.Button1Click(Sender: TObject);
var aktpreis, ver100ben, jahrkm, ausgabevbj, ausgabebkj : double;
begin
  if TryStrToFloat(Edit6.Text,aktpreis) then
    begin
      //ShowMessage('Ungültige Eingabe');
      aktpreis := StrToFloat(Edit6.Text);
    end
  else
   begin
      ShowMessage('HAHA');
    end;
    //aktpreis := StrToFloat(Edit6.Text);
    ver100ben := StrToFloat(Edit3.Text);
    jahrkm := StrToFloat(Edit4.Text);
    ausgabevbj := VerbrauchBenzinJahr(ver100ben, jahrkm);
    ausgabebkj := BenzinkostenJahr(aktpreis, ausgabevbj);

    Panel1.Caption := FloatToStr(ausgabevbj);
    Panel4.Caption := FloatToStr(ausgabebkj);

end;

Funktioniert auf jeden Fall.
Könnt Ihr mir bitte noch erklären wie das gemeint war, dass ich Dezimalzahlen auch mit Punkt schreiben kann. Also das beides funktioniert sowohl , als auch . ?