Преобразование типов

Привет всем!

Никак не получается вставить запись, пример кода:

float val1;

val1 = StrToFloat(MaskEdit1->Text);
str = "insert into table1 (pole1) values ("+val1+")";

UpdateSQL1->Clear();
UpdateSQL1->Add(str);

далее стандартные операторы....

я сам знаю где ошибка....дело в том, что когда действительное значение val1
преобразовывается в AnsiString в строке, где написано str = ..., то его дробная часть
отделяется запятой, а в операторах SQL я должен писать значение val1 отделяя
его дробную часть точкой. Например так: insert into table1 (pole1) values (10.5)
а не так insert into table1 (pole1) values (10,5)

Отсюда и ошибка, а вот как мне ее обойти?
Я конечно могу в MaskEdit1->Text написать через точку, но вопрос чисто принципиальный:
Как преобразовать число типа float в AnsiString, чтобы его дробная часть отделялась точкой,
а не запятой.

Может кто-нибудь подскажет?
Заранее благодарен.