![]() |
|
|
#1
|
|||
|
|||
![]() Здравствуйте, подскажите, пожалуйста про VK_Return.
Есть одно поле Edit и один Label нужно: при нажатии на Enter значение лейбла меняется на содержимое Edit. Все, что нашел на форуме не подходит. |
#2
|
|||
|
|||
![]() Это же элементарно...
Код:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if key = #13 then Label1.Caption:=Edit1.Text; end; |
#3
|
|||
|
|||
![]() Это где писать надо?
![]() |
#4
|
|||
|
|||
![]() Выделяешь Edit1 на форме, слева в инспекторе объектов жмешь на вторую закладку(events), там дважды щелкаешь справа в поле от события OnKeyPress, перебросит в редактор кода, в созданную процедуру, там добавляешь код:
Код:
if key = #13 then Label1.Caption:=Edit1.Text; |
#5
|
|||
|
|||
![]() Я переписывал с этого форума, но там не описано куда это прописывать.
А OnKeyPress говорит, что "if key = #13 then Label1.Caption:=Edit1.Text;" - is not a valid identifier |
#6
|
|||
|
|||
![]() Весь код покажи, тогда скажу в чем дело..
|