어떤 델파이 소개서 에서 본것인데,
다음과 같은 for-loop에서 제가 생각해도
잘 될것 같은데 실제 컴파일 하면
Error message 가
Assignment to For-Loop variable "I". 라고
나오거 든요.
자체 Help를 참조 해도 별 도움이 되지 않아
이렇게 올립니다. 도와 주세요...
//셀에 지뢰가 있는 장소와 없는 장소...
for i:= 1 to Nmines do begin
x := Random(Nitems);
y := Random(Nitems);
//만일 지뢰가 없다면..
if not (Map[x,y] = 'M') then
Map[x,y] := 'M' //지뢰 추가
else
Dec(i); //루프 반복
end;
(참고로..., 이 차원 배열에 'M(지뢰)'를 설치 하는
것이고, 랜덤으로 설치하다가 이미 설치 되었을 경우
한번더 루프를 실행 함으로써 Nmines(지뢰갯수) 만큼
지뢰를 설치 하는 것이 고요. 여기서 지뢰 갯수 가
프로 그램에서 실제 큰 역할을 하기 때문에 꼭 2차원
배열에 Nmines 만큼 설치 해야되거든요...........)
참, 저는 Delphi 3.0 클라이언트/서버 버젼을 사용 하고
있고요... ^ ^
^
+++ from .......willy
|