자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다.
- 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)
Firemonkey InputBox 질문입니다.
2017.03.28 18:41
본 게시판 사용시 당부 사항
* 이 게시판은 자유롭게 질문을 올리고 자발적으로 답변을 공유하는 게시판입니다.
* 어느 누구도 답변을 달아야만 하는 책임은 없습니다.
* 따라서 질문을 올리실 때에는 최대한 자세하고 정중하게 질문을 올려 주세요.
* 최대한 질문을 자세히 올려야 답변도 자세히 올라 옵니다.
* 본 질문에 답변을 주시는 여러 개발자님들께 미리 감사드립니다.
-----------------------------------------------------------------------------------------------
예전에 질문을 올린후 혼자 연구하다 해결하지 못해 다시 질문드립니다.
InputBox('타이틀','입력하세요.','0',
procedure(const AResult: TModalResult; const AValue: string)
begin
case AResult of
mrOk: begin TEdit(Sender).Text := AValue;
mrCancel: begin end;
end;
end);
InputBox 함수가 실행되어진후 반드시 입력박스을 클릭해야만 입력키보드가 나타납니다.
( KeyBoardType 이 기본(한글)으로 나옵니다.)
전 InputBox 실행과 동시에 숫자키보드을 보여줄려고 합니다.
감사합니다.
댓글 0
Firemonkey InputBox 질문입니다.
2017.03.28 18:41
본 게시판 사용시 당부 사항
* 이 게시판은 자유롭게 질문을 올리고 자발적으로 답변을 공유하는 게시판입니다.
* 어느 누구도 답변을 달아야만 하는 책임은 없습니다.
* 따라서 질문을 올리실 때에는 최대한 자세하고 정중하게 질문을 올려 주세요.
* 최대한 질문을 자세히 올려야 답변도 자세히 올라 옵니다.
* 본 질문에 답변을 주시는 여러 개발자님들께 미리 감사드립니다.
-----------------------------------------------------------------------------------------------
예전에 질문을 올린후 혼자 연구하다 해결하지 못해 다시 질문드립니다.
InputBox('타이틀','입력하세요.','0',
procedure(const AResult: TModalResult; const AValue: string)
begin
case AResult of
mrOk: begin TEdit(Sender).Text := AValue;
mrCancel: begin end;
end;
end);
InputBox 함수가 실행되어진후 반드시 입력박스을 클릭해야만 입력키보드가 나타납니다.
( KeyBoardType 이 기본(한글)으로 나옵니다.)
전 InputBox 실행과 동시에 숫자키보드을 보여줄려고 합니다.
감사합니다.