창조유저그룹-커즈닷컴

질문게시판
- 반드시 검색을 하신 후 원하는 답변을 찾을 수 없을 때, 질문을 올려주세요.

LIST ALL

Posted by BLUE

2004-09-03 20:11:11, Hit : 3013

창조 초보가 또 질문 몇가지 올려놓고 갑니다. ㅡㅡ;

Post URL : http://cugz.sjworks.net/bbs/zboard.php?id=qna&no=900

1 예를 들어 입력창이 있고 버튼과 메모가 있습니다.(입력창에 버튼이 있으며 자동으로 입력창이 실행되거나 또는 무슨 버튼을 눌르면 입력창이 실행되게....이런식으로 하면 되겠죠?)
입력창에다 무엇인가를 쓴 후 버튼을 클릭하면 입력창에 쓴 것이 메모에 써져 있게 됩니다.
이런걸 구현하고 싶습니다. ㅜ.ㅜ

2 난수 질문입니다.
버튼을 눌르면 난수가 초기화 되고 난수중에 랜덤으로 숫자가 선택되게 만든 뒤...그 다음이 문제입니다.
예를 들어 10까지 난수가 선택되게 만든 후...
1이 선택되면 무슨 일이 일어나고...
2가 선택되면 역시 또다른 일이 일어나는....
숫자가 선택되는 걸 인식하게 하고 싶으며 인식한다음 무슨 사건을 벌어지게 하고 싶은데...도저히 못하겠군요 ㅜ.ㅜ

3 예/아니오는 어떻게 구현할까요? 아아...너무 모르는 게 많군요.

이상입니다.
고수님들의 답변 부탁드립니다. ^^::

최재일 2004-09-03 PM 9:24:37


모두 창조도움말에 잘 설명되어 있는 내용인데요.. ^^;; 간단히 답변 달아드리지요.. 1. 창에 메모하나와 버튼하나를 올려두고, 버튼을 눌렀을때 명령어에 다음과 같이 넣으세요.. 문자 : 창이름; 창이름 := 입력창보여("입력창", "내용을 입력하세요!", " NULL"); 메모0.내용.추가(창이름); =====> 도움말의 [객체와 명령어]-[기본명령어]-[명령어]-[입력창보여] 참고 2. 난수 추출후 결과에 따른 사건발생하기 난수초기화; 실수 : 수; 수 := 난수(3); 만일(수 = 0) 문자창보여("0이 선택되었습니다"); 아니면 만일(수 = 1) 문자창보여("1이 선택되었습니다"); 아니면 만일(수 = 2) 문자창보여("2가 선택되었습니다"); *** 난수(3)이라 구현했지만 추출되는 번호 범위는 0~2입니다!! 3. 예/아니오 창 구현하기 실수 : 대화결과; 대화결과 := 대화창보여("나의 대화창", "나는 바보인가?", ㄷㅇ질문, ㄷㅂ예_아니오); 만일(대화결과 = ㄷㅊ예) 문자창보여("나는 바보구나! 히히!"); 아니면 만일(대화결과 = ㄷㅊ아니오) 문자창보여("암! 난 바보가 아니고 말고! 하하!"); =====> 도움말의 [객체와 명령어]-[기본명령어]-[명령어]-[대화창보여] 참고

BLUE 2004-09-03 PM 9:41:02


아...정말 감사드립니다.^^::

ps.이진백 2004-09-04 PM 12:40:03


창조에서 왜 case 문이 없는지 의문이죠. 참고삼아 델파이에서는 여러 수에 따른 명령을 어떻게 하나 살펴보세요. var a: integer; begin case a of //case = 틀이라는 뜻, a = 변수 이름, of = 영어의 of와 같음 0: Showmessage('숫자가 0 이군요'); //0이 될 경우 1: Showmessage('이번에는 숫자가 1이네요.'); // 1 의 경우 -1: Showmessage('뭐지? -1이 있네?'); //-1 의 경우 end; 왜 이렇게 빠르고 간단한 case 문이 창조에는 없는지...