IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

 
 Ответить  Открыть новую тему 
> Вещественные числа, Переброс чисел из Memo в Edit
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 24
Пол: Женский
Реальное имя: Екатерина

Репутация: -  0  +


Здравствуйте! Пишу программу Генератор вещественных чисел
Никак не могу сообразить с проверкой на стохастичность Генератора Вещественных Чисел.
Подскажите, как должен выглядеть цикл приклеивания разных комбинаций символов (т.е. чисел) друг к другу в компоненте Edit. Про работу со строками я в курсе – операция сцепления “+”, но тут их 200, и я растерялась.
Хочу пояснить: у меня есть 200 сгенерированных вещ. чисел (от 0 до 1), выведенных в Memo1. Все числа имеют 8 знаков после запятой.
С ними я должна сделать следующее: у каждого отбросить целую часть (т. е ноль), а дробные части склеить. Таким образом получается некое огромное число из 1600 символов, с которыми я должна буду основательно поработать. Первое что пришло в голову - загнать это число в Edit и работать там с ним как со строкой.
Но вот по поводу того как выдернуть из Memo двести чисел и всем им сделать обрезание, пока ничего в голову не приходит.
Могу показать свою программу
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






В мемо, каждое число с новой строки?
Цитата(Екатерина @ 20.04.2013 18:48) *

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

Покажи.
А ещё покажи пример того что в Memo1
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Гуру
*****

Группа: Пользователи
Сообщений: 1 013
Пол: Мужской
Ада: Разработчик
Embarcadero Delphi: Сторонник
Free Pascal: Разработчик

Репутация: -  627  +


Цитата(Екатерина @ 20.04.2013 18:48) *
Но вот по поводу того как выдернуть из Memo двести чисел
Не надо ничего выдергивать. Если каждое число - на отдельной строке, то:
var s : string;
// ...
s := StringReplace(sLineBreak + Memo1.Text, sLineBreak + '0.', '', [rfReplaceAll]);
, и в s будет строка, состоящая из склеенных дробных частей всех чисел.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Бывалый
***

Группа: Пользователи
Сообщений: 155
Пол: Мужской

Репутация: -  0  +


Why not settling on games that is fun and at the same time your earning. Well it'll make suspense because the game is well but dude just try it and it gave me hope while pandemic is real rn. Slot Themes
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 28.03.2024 16:23
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name