![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вывод сообщения по времени указанному в... [D6, Win95/98, WinXP]
AndrX. © (2002-10-12 17:03:00)
Помогите, пожалуйста, сделать следующее:
Как вывести сообщение в memo1 из memo2.loadfromfile.
Файл выглядит так:
1,2 `hello
4,5 `hello again
5,9 `OK
Так выглядит текст, который загружается в memo2.
Есть timer1 с:
y:=y+1/10;
label1.caption:=floattostr(y);
Как сделать чтобы Y был string"ом в текстовом файле до значка"`"(цифры)? А что находится за знаком "`" выводилось бы в memo1, когда Y равнялся бы string"у(числу) до "`".
Т.е. когда таймер досчитает до 1,2 выведется сообщение в memo1:<\B> hello.
И после, когда дальше, досчитает до 4,5 выйдет в memo1(ниже предсшествующего сообщения):<\B> hello again.
Если можно, пришлите мне полный исходник на andrx@mtc-ch.md<\B><\I><\U>
ZrenBy (2002-10-12 17:17:00) [1]Идея :
Не связываться с десятичной точкой. Делай Integer.
Файл делать в виде
Name=Value
123=йцукен
Грузить в стринглист
По таймеру -> Str := StringList.Values[IntToStr(Y)]
if(sStr<>"")then memo1.add(