Как реализовать рандомизацию вида {abc|def|ghi}

[FleXik]

Как реализовать рандомизацию вида {abc|def|ghi}

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

как-то так:

sAlpha := 'abcdefghjkli.... алфвит короче';
for i:=1 to 3 do
begin
 Randomize;
 Result := REsult + sAlpha[RandomRange(1,Length(sAlpha)-1)];
end;

[FleXik]

Человек_Борща, нет, шаблон вбивается заранее, это русские слова

вообще я знаю как это примерно можно реализовать, но может кто-то проще способ подскажет

1. Парсим текст из {} т.е получаем на выходе такое abc|def|ghi
2. Тут уже сложнее т.к надо правильно рандомно спарсить abc, def и ghi

[Аватар]

На выходе получить динамический массив строк и рандомить согласно его размерности

[FleXik]

короче план действий такой:

Имеем шаблон:
{abc|def|ghi}

1. Парсим текст из {} т.е получаем на выходе такое abc|def|ghi
2. С помощью DelimitedText убираем | и записываем в TStringList
3. Получаем в TStringList такое:

abc
def
ghi

и потом из TStringList рандомно (функция Random) выводим строку...

[ZuBy]

так я не понял, в чем проблема?

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

так я не понял, в чем проблема?

походу он уже все сам решил

[FleXik]

походу он уже все сам решил

от вас же не дождешься, не решил, но сейчас решу, думал у кого наброски может есть...

[Аватар]

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

от вас же не дождешься

А чего ждал - кода для решения элементарной задачи? Хороший способ программирования

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

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

от вас же не дождешься, не решил, но сейчас решу, думал у кого наброски может есть...

Я потому и решил, что вы сами уже все написали, т.к. написанный вами план и есть решение задачи.

А че вы от нас ждете? Готового кода? Извольте сами его написать.
Рандомную выборку я показал во втором посте.