Separator desimal

saya pakai coding ini buat perkalian bilangan decimal dan bulat tapi error..!!! Menurut anda semua ada masalah di apanya yach ..!!

procedure TFrmlabel.NorollA ;
var
bil1,bil2 :real ;
kali, x :real ;

begin
bil1 :=StrToFloat(AEBW.Text);// berisi bilangan Decimal contoh 13.5
bil2:=10;
kali :=(bil1*bil2);
x :=int(kali);

end;

Bang Imam Chalimi Bin Moeslim, Errornya gini Project Gaproc_System.exe raised exception class EconvertError With Message"13.5" is not a valid floating point value.

Imam Chalimi Bin Moeslim
itu karena regional setting di komputer agan desimalnya pake koma bukan titik.
solusinya masukkan 13,5 (pake koma) atau tambahkan code berikut pada FormCreate ..

procedure TForm1.FormCreate(Sender: TObject);
begin
ThousandSeparator:=',';
DecimalSeparator:='.';
end;