Q&A
- Random 함수를 이용하여 1~15 사이의 수가 한번씩 나오게 하려면?
RANDOM 함수 1~15까지 수자 한번씩 나오게 할려고 하는데 않되네요 뭐가 갈못된건가요..
(버튼에 수작응무작이로 올리려고 하는데...)
for k:= 0 to 15 do
begin
for m:= 0 to k do
begin
Randomize;
n:= random(15);
if strtoint(bbutton[m].caption)= n then
kn:=kn+1;
end;
if kn<=0then
begin
bbutton[l].Caption:=inttostr(n);
kn:=0;
END;
end;
(버튼에 수작응무작이로 올리려고 하는데...)
for k:= 0 to 15 do
begin
for m:= 0 to k do
begin
Randomize;
n:= random(15);
if strtoint(bbutton[m].caption)= n then
kn:=kn+1;
end;
if kn<=0then
begin
bbutton[l].Caption:=inttostr(n);
kn:=0;
END;
end;
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
-
델사랑•2000.11.23 20:44var xl_title:array[0..4] of integer; i:integer; begin for i:=0 to 4 do xl_title[i]:=...
-
-
- 조영진
- •
- 2000.11.23 20:35
- 1 COMMENTS
- /
- 0 LIKES
-
한하눌•2000.11.23 20:37-------------------------------------- group band1 expression부분에 성명 -------------------------...
-
- 오병주
- •
- 2000.11.23 20:34
- 2 COMMENTS
- /
- 0 LIKES
-
송수정•2000.11.24 02:26오병주 wrote: > [컴퍼넌트] 고수님들 - 리얼그리드의 사용법좀 아려주세요 > > 제가 개발하고 있는 사...
-
몰러•2000.11.23 22:23오병주 wrote: > [컴퍼넌트] 고수님들 - 리얼그리드의 사용법좀 아려주세요 > > 제가 개발하고 있는 사...
-
- 왕초보
- 2000.11.23 20:23
- 0 COMMENTS
- /
- 0 LIKES
-
- won
- 2000.11.23 20:20
- 0 COMMENTS
- /
- 0 LIKES
-
- 허접 델초보
- 2000.11.23 20:13
- 0 COMMENTS
- /
- 0 LIKES
-
- 해당화
- •
- 2000.11.23 20:09
- 1 COMMENTS
- /
- 0 LIKES
-
어린왕자•2000.11.23 22:36해당화 wrote: > API플그래밍을 하고 있는데 HWND가 확실히 뭔지 딱히 설명을 해주는 사람이 없더군요~~ ...
-
- 김성준
- •
- 2000.11.23 20:08
- 4 COMMENTS
- /
- 0 LIKES
-
나그네야•2000.11.30 09:59FastBmp를 사용하지 않는 방법도 있습니다. TBitmap에는 ScanLine이라는 row단위로 픽셀정보를 read/writ...
-
조규춘•2000.11.24 01:46김성준 wrote: > 그림을 창에 불러와서, 그 다음에 > 그림 전체의 명도를 조절하거나, 채도를 조절하는...
-
이경문•2000.11.23 21:37FastImage 컴포넌트(FastBmp 유닛 포함)를 사용해 보세요. 토리 사이트(http://www.torry.ru)에 가 보면 ...
-
김성준•2000.11.24 17:54답변, 고맙습니다. 아직 구현은 안했지만, 한번 가르쳐 주신대로 해 보겠습니다. 그리고 안되면 또 ...
-
- 나이요
- •
- 2000.11.23 20:04
- 1 COMMENTS
- /
- 0 LIKES
-
까마귀•2000.11.23 20:56나이요 wrote: > 모든폼에서 값이 변하면 같이 변하도록... > 알려주세요.. 안녕하세요. 까마귀입니...
-
- 유진
- 2000.11.23 20:02
- 0 COMMENTS
- /
- 0 LIKES
-
- 허진
- 2000.11.23 19:59
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁금이
- 2000.11.23 19:53
- 0 COMMENTS
- /
- 0 LIKES
-
- tiangti
- 2000.11.23 19:48
- 0 COMMENTS
- /
- 0 LIKES
-
- 윤미영
- 2000.11.23 19:36
- 0 COMMENTS
- /
- 0 LIKES
-
- 급한사람
- 2000.11.23 18:29
- 0 COMMENTS
- /
- 0 LIKES
-
- 자라목
- •
- 2000.11.23 18:04
- 1 COMMENTS
- /
- 0 LIKES
-
조규춘•2000.11.23 22:09자라목 wrote: > 밑은 스트링 그리드의 한 셀 입니다. > > +------------------------+------------+--...
-
- 한재홍
- •
- 2000.11.23 17:55
- 1 COMMENTS
- /
- 0 LIKES
-
컴맹•2000.11.23 19:01안녕하세여... 델파이5 버전에는 콤포넌트가 있다던데... 잘모르겠구여... 그이전 버전에서는... 요렇...
-
- 송종근
- •
- 2000.11.23 17:15
- 1 COMMENTS
- /
- 0 LIKES
-
까마귀•2000.11.23 18:34송종근 wrote: > 안녕하세요 > 델파이4로 만든 Database프로그램을 MS SQL7.0과 연결해서 쓰고 있습니다....
-
- 최 승
- •
- 2000.11.23 19:01
- 1 COMMENTS
- /
- 0 LIKES
RANDOM 함수 1~15까지 수자 한번씩 나오게 할려고 하는데 않되네요 뭐가 갈못된건가요.. (버튼에 수작응무작이로 올리려고 하는데...) for k:= 0 to 15 do begin for m:= 0 to k do begin Randomize; n:= random(15); if strtoint(bbutton...-
까마귀•2000.11.24 01:53최 승 wrote: > RANDOM 함수 1~15까지 수자 한번씩 나오게 할려고 하는데 않되네요 뭐가 갈못된건가요.. ...
-
- D빌더
- 2000.11.23 15:10
- 0 COMMENTS
- /
- 0 LIKES
> RANDOM 함수 1~15까지 수자 한번씩 나오게 할려고 하는데 않되네요 뭐가 갈못된건가요..
> (버튼에 수작응무작이로 올리려고 하는데...)
>
> for k:= 0 to 15 do
> begin
> for m:= 0 to k do
> begin
> Randomize;
> n:= random(15);
> if strtoint(bbutton[m].caption)= n then
> kn:=kn+1;
> end;
> if kn<=0then
> begin
> bbutton[l].Caption:=inttostr(n);
> kn:=0;
> END;
> end;
>
안녕하세요. 까마귀입니다.
뭐가 문제인지 아무런 말도 없이 그냥 않된다고 하니 답하기 곤한하네요.
에러 메세지라던가 무슨 설명이 있어야 쉽게 답을 구하지 않겠어요?
그리고, 변수선언을 어떻게 했는지도 않나와 있고...
일단 k,m,n은 integer로 선언되었다고 보고... bbutton[..]가 뭐로 선언된거예요?
버튼같기도 한데... 이름을 그런식으로 못 주는걸로 아는데...
마무런 부연 설명이 없으니 답이 나올것 같지가 않네요..
위대한 단군혼이 살아있는 나라.... 대한민국.