Помогиете с решением задачи. - Помощь студентам

Ainur · 22.05.2009, 12:08

Написать программу, в которой на главной форме расположены TEdit, TLabel, при нажатии клавиши в Edit происходит запись кода клавиши в Label (использовать событие OnChange).

Sazary · 22.05.2009, 13:00

Код:

procedure TForm1.Edit1Change(Sender: TObject);
var c : char;
begin
c := Edit1.Text[Edit1.SelStart];
Label1.Caption := IntToStr(ord(c));
end;

Ainur · 22.05.2009, 14:14

Спасибо большое братец. Ты меня выручил

22.05.2009, 12:08	#1
Ainur Пользователь Регистрация: 22.05.2009 Сообщений: 29	Помогиете с решением задачи. Написать программу, в которой на главной форме расположены TEdit, TLabel, при нажатии клавиши в Edit происходит запись кода клавиши в Label (использовать событие OnChange).

22.05.2009, 13:00	#2
Sazary В тени Старожил Регистрация: 19.12.2008 Сообщений: 5,788	Код: `procedure TForm1.Edit1Change(Sender: TObject); var c : char; begin c := Edit1.Text[Edit1.SelStart]; Label1.Caption := IntToStr(ord(c)); end;` Вполне очевидно, чтобы что-то понять, необходимо книги читать. Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль]

22.05.2009, 14:14	#3
Ainur Пользователь Регистрация: 22.05.2009 Сообщений: 29	благодарность Спасибо большое братец. Ты меня выручил

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Вкаких случаях может быть полезной процедура SetLength	Ainur	Помощь студентам	2	22.05.2009 12:01
Работа с компонентами Делфи	Ainur	Помощь студентам	2	22.05.2009 11:56
Помогите с решением задачи	Ga-sergey	Помощь студентам	4	11.03.2007 11:13
Помогите с решением задачи!Please!	Инзия	Помощь студентам	3	11.03.2007 07:50