Ошибка при округлении.

[Jekasea]

Опять не точно.
Вот так правильно будет:
Не совсем точно я сформулировал вопрос, извиняйте!
Каким оператором "отбросить" целую часть и превратить ее в целую?
Таким образом сосчитаю копейки, т е. по два числа после запятой.

[Человек_Борща]

Как-то так:

s:=FloatToStr(Pi/2);
ShowMessage(Copy(s,1,Pos(s,'.')));

Каким оператором "отбросить" целую часть и превратить ее в целую?

Вы выкинули яблоко, что у вас осталось в руке? НИЧЕГО. Нельзя ничего превратить в что-то.

Выкинуть дробную часть можно Round'ом.

[Jekasea]

Опять не точно.
Вот так правильно будет:
Не совсем точно я сформулировал вопрос, извиняйте!
Каким оператором "отбросить" целую часть и превратить дробную в целую?
Таким образом сосчитаю копейки, т е. по два числа после запятой.
Еще раз извините, устал.

[northener]

Сообщение от Jekasea

FloatToStrF конвентирует, а не определяет.

FloatToStrF конвертирует с округлением по стандартному алгоритму.
Последущие твои посты я не понял.

[Аватар]

Выдернуть копейки в виде целого числа? Trunc(x*100) mod 100
Не понятно зачем их вообще в таком виде иметь. Какая-то тайная фишка

[Jekasea]

Да ни какой тайны!
Рубли идут на зарплату, а накопившиеся копейки на подарки к дню рождения сотрудников.

[northener]

Сообщение от Jekasea

Да ни какой тайны!
Рубли идут на зарплату, а накопившиеся копейки на подарки к дню рождения сотрудников.

Хм. Идея понятна. Но не совсем. Как ваша бухгалтерия скажет - так и надо делать. Сидеть, в случае чего придётся им. Но если они умнее, то сидеть придётся тебе.

[Jekasea]

Это пока лишь программа, а за идею не судят!

[Человек_Борща]

Это пока лишь программа, а за идею не судят!

Судят по факту, а чего-там было и кто начал - уже не имеет значения.

[Jekasea]

МОДЕРАТОРАМ!
Щелкаю АВАТАР-у по весам за хорошую подсказку, а в ответ сообщение:
Вы должны добавить отзыв кому-то еще.........
Я уже добавлял отзывы двум участникам форума.

Всем спасибо, разобрался!