Помощь - Поиск - Пользователи - Календарь
Полная версия: Вещественные числа
Форум «Всё о Паскале» > Delphi, Assembler и другие языки. > Delphi
Екатерина
Здравствуйте! Пишу программу Генератор вещественных чисел
Никак не могу сообразить с проверкой на стохастичность Генератора Вещественных Чисел.
Подскажите, как должен выглядеть цикл приклеивания разных комбинаций символов (т.е. чисел) друг к другу в компоненте Edit. Про работу со строками я в курсе – операция сцепления “+”, но тут их 200, и я растерялась.
Хочу пояснить: у меня есть 200 сгенерированных вещ. чисел (от 0 до 1), выведенных в Memo1. Все числа имеют 8 знаков после запятой.
С ними я должна сделать следующее: у каждого отбросить целую часть (т. е ноль), а дробные части склеить. Таким образом получается некое огромное число из 1600 символов, с которыми я должна буду основательно поработать. Первое что пришло в голову - загнать это число в Edit и работать там с ним как со строкой.
Но вот по поводу того как выдернуть из Memo двести чисел и всем им сделать обрезание, пока ничего в голову не приходит.
Могу показать свою программу
-123-
В мемо, каждое число с новой строки?
Цитата(Екатерина @ 20.04.2013 18:48) *

Могу показать свою программу

Покажи.
А ещё покажи пример того что в Memo1
IUnknown
Цитата(Екатерина @ 20.04.2013 18:48) *
Но вот по поводу того как выдернуть из Memo двести чисел
Не надо ничего выдергивать. Если каждое число - на отдельной строке, то:
var s : string;
// ...
s := StringReplace(sLineBreak + Memo1.Text, sLineBreak + '0.', '', [rfReplaceAll]);
, и в s будет строка, состоящая из склеенных дробных частей всех чисел.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.