*** 키값을 호출할 함수에 반영할려고 합니다.
KeyDown이벤트가 동작하면 key값을 가지고
SGMoveControl로 key값을 반환할려고 하는데
어떻게 하는 건가요? 도와주세요~
--------------------------------------------------------코딩---
procedure TfrmBonBong.StringGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
SGMoveControl(?); // ?에 무엇이 들어가야 할까요?
end;
procedure TfrmBONBONG.SGMoveControl(Key:KeyAscii); //이부분에서도 error!!!
begin
if key = vk_Down then ....
begin
//내용
end;
end;
end.
> *** 키값을 호출할 함수에 반영할려고 합니다.
> KeyDown이벤트가 동작하면 key값을 가지고
> SGMoveControl로 key값을 반환할려고 하는데
> 어떻게 하는 건가요? 도와주세요~
>
> --------------------------------------------------------코딩---
>
> procedure TfrmBonBong.StringGrid1KeyDown(Sender: TObject; var Key: Word;
> Shift: TShiftState);
> begin
> SGMoveControl(?); // ?에 무엇이 들어가야 할까요?
> end;
>
> procedure TfrmBONBONG.SGMoveControl(Key:KeyAscii); //이부분에서도 error!!!
> begin
> if key = vk_Down then ....
> begin
> //내용
> end;
> end;
> end.
>
>
이렇게 하면 될듯한데염..
그럼..
procedure TfrmBonBong.StringGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
SGMoveControl(Key); // ?에 무엇이 들어가야 할까요?
end;
procedure TfrmBONBONG.SGMoveControl(Key:Word);
begin
if key = vk_Down then ....
begin
//내용
end;
end;
end.