|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
18.02.2008, 23:50 | #1 |
Веб-разработчик
Форумчанин
Регистрация: 16.01.2008
Сообщений: 451
|
Текст
Нужен еффект текста печати на клавиатуре, чтобы текст выводился по 1 букве. Что то типа delay(400) сделать только как етот процесс автоматизировать?
Я ваш новый друг, смиритесь!
|
19.02.2008, 12:31 | #2 |
Форумчанин
Регистрация: 04.09.2007
Сообщений: 155
|
ты сам и ответил на свой вопрос, только Delay - в милисек.
Код:
|
19.02.2008, 15:01 | #3 |
Веб-разработчик
Форумчанин
Регистрация: 16.01.2008
Сообщений: 451
|
так дело в том что программа практически вся будет состоять из текста, тоесть там примерно 100-150кб текста, такой метод не оч удобный...придется описать сотни переменных для етого.
Я ваш новый друг, смиритесь!
|
19.02.2008, 15:34 | #4 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
Просто сделай массив строк в них загони текст и в циклах пусть он печатается
I'm learning to live...
|
|
19.02.2008, 17:42 | #5 |
Веб-разработчик
Форумчанин
Регистрация: 16.01.2008
Сообщений: 451
|
ну массив...
massiv[str1]:= что то там massiv[str2]:= что то там ... massiv[strn]:= что то там опять все переменный str описывать
Я ваш новый друг, смиритесь!
|
19.02.2008, 17:56 | #6 |
Новичок
Джуниор
Регистрация: 18.01.2008
Сообщений: 1,720
|
var str : array[0..XXX] of string;
str[0] := 'что то там 0'; str[1] := 'что то там 1'; ......... str[N-1] := 'что то там N-1'; ......... |
19.02.2008, 18:26 | #7 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Можно исходный текст загнать в текстовый файл, оттуда построчно считывать в массив.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
TreeView и текст | Stanislav | Общие вопросы Delphi | 5 | 28.03.2008 00:25 |
Текст с прозрачностью | mutabor | Общие вопросы Delphi | 3 | 10.03.2008 20:33 |
Текст | Sanek_ntsk | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 10.03.2008 15:23 |
Текст в формате RTF | Mikola | Помощь студентам | 2 | 10.08.2007 10:28 |