Q&A
- FormKeyPress로 Key값을 전달하려면?
코드를 조회하는 하나의 공통프로시져를 작성하려고 하는데요.....
해당 조회폼의 FormKeyPress 이벤트에는 아래와 같이 코딩이 돼있습니다.
procedure TfrmTest.FormKeyPress(Sender: TObject; var Key: Char);
if Key = #13 then
begin
if ActiveControl = Edit1 then
ShowMessage(Edit1.Text);
end;
공통프로시져에서 조회폼으로 해당 Object와 Key값을 넘기려고 하는데
frmTest.FormKeyPress(Edit1, XXX);
XXX 부분에 키값을 어떻게 넘겨야 하나요? 도와주세요. 답변 부탁드립니다...
해당 조회폼의 FormKeyPress 이벤트에는 아래와 같이 코딩이 돼있습니다.
procedure TfrmTest.FormKeyPress(Sender: TObject; var Key: Char);
if Key = #13 then
begin
if ActiveControl = Edit1 then
ShowMessage(Edit1.Text);
end;
공통프로시져에서 조회폼으로 해당 Object와 Key값을 넘기려고 하는데
frmTest.FormKeyPress(Edit1, XXX);
XXX 부분에 키값을 어떻게 넘겨야 하나요? 도와주세요. 답변 부탁드립니다...
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- harris
- 2001.09.29 02:23
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁금이
- •
- 2001.09.29 02:21
- 2 COMMENTS
- /
- 0 LIKES
-
이선경•2001.09.29 18:31물론 어찌 어찌해서 되는 방법도 있겠지만 만수무강을 위해서 퀵을 포기하시고 장치로 직접 출력하셔야 할...
-
코스엑스•2001.10.04 22:53이선경 wrote: > 물론 어찌 어찌해서 되는 방법도 있겠지만 만수무강을 위해서 > 퀵을 포기하시고 장치로...
-
- 두꺼비
- 2001.09.29 01:51
- 0 COMMENTS
- /
- 0 LIKES
-
- 허접델피언
- •
- 2001.09.29 01:32
- 1 COMMENTS
- /
- 0 LIKES
코드를 조회하는 하나의 공통프로시져를 작성하려고 하는데요..... 해당 조회폼의 FormKeyPress 이벤트에는 아래와 같이 코딩이 돼있습니다. procedure TfrmTest.FormKeyPress(Sender: TObject; var Key: Char); if Key = #13 then begin ...-
하기•2001.09.29 19:21var TmpKey : Char; ... TmpKey := #13; ... frmTest.FormKeyPress(Edit1, TmpKey); 이렇게 하면...
-
- 문철민
- 2001.09.29 00:25
- 0 COMMENTS
- /
- 0 LIKES
-
- 남호진
- 2001.09.28 21:51
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초보
- 2001.09.28 21:01
- 0 COMMENTS
- /
- 0 LIKES
-
- 강성찬
- 2001.09.28 20:56
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보맨
- •
- 2001.09.28 20:51
- 7 COMMENTS
- /
- 0 LIKES
-
stoney•2001.09.28 20:57
-
초보맨•2001.09.28 22:01
-
stoney•2001.09.28 22:15
-
초보맨•2001.09.28 22:37
-
초미소년•2001.10.30 01:48
-
남호진•2001.09.28 22:29
-
초보맨•2001.09.28 22:38
-
- 이성용
- •
- 2001.09.28 20:09
- 2 COMMENTS
- /
- 0 LIKES
-
아폴론•2001.09.28 21:09StartTrancation 을 발생시키면 수정이든 삭제든 반드시 Commit 또는 RollBack을 만나야 합니다. 트랜...
-
이성용•2001.09.28 23:451
-
- 델파이사랑
- 2001.09.28 20:00
- 0 COMMENTS
- /
- 0 LIKES
-
- 이선경
- 2001.09.28 19:47
- 0 COMMENTS
- /
- 0 LIKES
-
- 델파이사랑
- •
- 2001.09.28 19:36
- 1 COMMENTS
- /
- 0 LIKES
-
major•2001.09.29 03:34델파이사랑 wrote: > 안녕하세요. > > 제가 다니는 회사에서 AS400을 사용하고 있는데.. > 이번에 델...
-
- 초보
- 2001.09.28 19:35
- 0 COMMENTS
- /
- 0 LIKES
-
- 어린왕자A
- 2001.09.28 19:32
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보
- 2001.09.28 19:32
- 0 COMMENTS
- /
- 0 LIKES
-
- 이경호
- 2001.09.28 19:31
- 0 COMMENTS
- /
- 0 LIKES
-
- 이지인
- 2001.09.28 19:17
- 0 COMMENTS
- /
- 0 LIKES
-
- 문상연
- •
- 2001.09.28 19:14
- 1 COMMENTS
- /
- 0 LIKES
-
irookie•2001.09.28 23:49TPrinter가 있습니다. 도움말에 자세한 설명이 있고, 사용법도 간단합니다. TPrinter.PageNumber; 를...
-
- aparadin
- •
- 2001.09.28 19:06
- 2 COMMENTS
- /
- 0 LIKES
-
stoney•2001.09.28 19:38질문의 의도가 기본 프린터가 없으면 에러없이 메세지 띄우실려고 하시는 거나요?? 그럼 이렇게 해보시...
-
aparadin•2001.09.28 19:58이런......................................................... 디버깅모드때문에 안되는거였다니...ㅠ...
TmpKey : Char;
...
TmpKey := #13;
...
frmTest.FormKeyPress(Edit1, TmpKey);
이렇게 하면 되지 않을까요???
허접델피언 wrote:
> 코드를 조회하는 하나의 공통프로시져를 작성하려고 하는데요.....
>
> 해당 조회폼의 FormKeyPress 이벤트에는 아래와 같이 코딩이 돼있습니다.
>
> procedure TfrmTest.FormKeyPress(Sender: TObject; var Key: Char);
> if Key = #13 then
> begin
> if ActiveControl = Edit1 then
> ShowMessage(Edit1.Text);
> end;
>
> 공통프로시져에서 조회폼으로 해당 Object와 Key값을 넘기려고 하는데
> frmTest.FormKeyPress(Edit1, XXX);
>
> XXX 부분에 키값을 어떻게 넘겨야 하나요? 도와주세요. 답변 부탁드립니다...
>
>
>
>