Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Edit(нестандартные символы) [D5, Win95/98]


DIMAS777 ©   (2002-08-16 14:44:00) 

такой вопросик. можно как нить реализовать ввод в Edit спецсимволов типа #1 #2 #10 #13 и т.п.?
Тоесть жмешь alt+13 и появляется этот символ.

Заранее благодарен.


DIMAS777   (2002-08-18 19:05:00) [1]

это неудобно, т.к. требуеся вставквка из клипберда и многих еще вещей...


Esu   (2002-08-16 16:41:00) [2]

Навскидку делаешь свой edit readonly. И в KeyPress пишешь нечто такое:
Ну и по желанию разбираешься какой символ спец, а какой нет.

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
edit1.Text := edit1.Text + "#" + IntToStr(Ord(Key));
end;


DIMAS777   (2002-08-16 15:30:00) [3]

3 #00 - и ненадо ;)


DIMAS777   (2002-08-16 15:24:00) [4]

млин, так что? невозможно чтоли?


Opuhshii   (2002-08-16 15:19:00) [5]


а как вы будете хранить 3 #00 подряд, а?,.. %)


{bas}   (2002-08-16 15:08:00) [6]

Сам не пробовал - но м.б. можно через KeyPress, а пар-ер Key устанавливаешь какой надо(например #13)

P.S. #13 - это я на угад написал, это типа какой то спец. символ


Наверх

Титульная страница Поиск, карта сайта Написать письмо