Цитата:
Сообщение от artemavd
PashaXP, код попробовал). Теперь он дробную часть отделяет точкой. Это хорошо. Но получится ли у меня в StringGrid-e сложить столбец с дробями и разделить на 4? Про настройки я понял. Не буду менять. Phedor, а что делает функция StringReplace?)
|
1. Нужно просто разделить отображение и арифметику.
2. function StringReplace(const S: string; const OldPattern: string; const NewPattern: string; Flags: TReplaceFlags): string;
S - Исходная строка
OldPattern - подстрока
NewPattern - на что заменить
Flags - TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);
rfReplaceAll - заменить все
frIgnoreCase - игнорировать регистр
3. a1:=StrToFloat(Edit1.Text);
Такие вещи лучше в try ... except ... включать. Очень часто человеки ставят и запятую и точку как разделитель, кто что хочет то пишет (особенно любители Excel), еще бывает ставят разделители тыс. части типа: "1 200,20", "1,200.20", "1'200,20".
Вообще смотря кто будет пользоваться :-)