![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Посимвольный ввод в Edit [D6, WinXP]
Пасечник © (2002-09-28 22:57:00)Каким образом можно организовать посимвольный,последовательный ввод в Edit, подразумевается использование его как визуального буфера.
Юрий Зотов (2002-09-29 01:17:00) [1]Эт-точно.
Как говорил тов. Сухов.
777 (2002-09-29 00:40:00) [2]финиш...
Пасечник (2002-09-29 00:26:00) [3]>Edit1.Text := Edit1.Text + следующий_символ
как говориться ответ лежал на поверхности...
спасибо.
alena.svt (2002-09-28 23:39:00) [4]2Пасечник © (28.09.02 23:14)
я имею ввиду ввод символов из самой программы, а не вручную
Прошу прощения не увидела
Itap (2002-09-28 23:28:00) [5]Как Ю.Зотов сказал даже легче и переменная не нужна будет.
Юрий Зотов (2002-09-28 23:25:00) [6]Edit1.Text := Edit1.Text + следующий_символ
alena.svt (2002-09-28 23:21:00) [7]procedure TForm1.Edit1Change(Sender: TObject);
begin
ListBox1.Items.Add(Edit1.text)// Пусть ListBox1 и будет буферком или TStringList
end;
Itap (2002-09-28 23:20:00) [8]Записываешь переменной типа string текущий текст в Edit1 а потом пишешь что edit1.Text:= (<твоя переменная>+то что ты хочешь добавить).
Пасечник (2002-09-28 23:14:00) [9]я имею ввиду ввод символов из самой программы, а не вручную
Пасечник (2002-09-28 23:11:00) [10]нет, требуется нечто вроде:
1
13
135
1359
и.т.д
то бишь небольшой сдвиговый визуальный буферок
Itap (2002-09-28 23:05:00) [11]>Пасечник
Что означает "посимвольный,последовательный ввод"?
Если ты имеешь ввиду чтобы происходило что-то после ввода в Edit каждого символа, то напиши то что ты хочешь в событии OnChange.