Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.21;
Скачать: [xml.tar.bz2];

Вниз

Tmemo   Найти похожие ветки 

 
Leo^Sun   (2002-01-01 04:19) [0]

Помогите пожалуйста сделать так чтобы допустем в TMemo был текст:
Привет МишаRan[10] пока.
И по нажатию кнопки Ran[10] заменялся на рандомное число...


 
Anatoly Podgoretsky   (2002-01-01 12:56) [1]

Memo1.Clear;
Memo1.Lines.Add("МишаRan[" + IntToStr(Random(NUMBER)) + "] пока.");

Надеюсь это для доброго дела?


 
Billy   (2002-01-02 03:01) [2]

2 Anatoly Podgoretsky:
По-моему, тут задачка похитрее - общий вид, видимо, такой:
%sRan[%d]
Так вот мы должны просматривать все строки в Мемо, искать в них "ran[", потом до следующей "]" читать число и записывать назад в виде %s+random(ЭТО_ЧИСЛО)
вот такие пироги :)
с новым годом!


 
Leo^Sun   (2002-01-02 06:42) [3]

Спасибо за советы проблема решена!!!



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.01.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.53 MB
Время: 8.252 c
1-66305
Yuraz
2002-01-04 15:05
2002.01.21
Как отменить это свойство Font.Style:=


1-66237
Billy
2002-01-02 02:52
2002.01.21
все о IOResult


1-66292
SlavaG
2002-01-01 20:02
2002.01.21
Тип переменной


1-66310
Александр Давыдов
2002-01-04 20:06
2002.01.21
сканирование каталогов


1-66257
ЗАА
2002-01-03 17:24
2002.01.21
курсор в StringGrid





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский