var
am01,am02,am03,am04 : Double;
amArray:Array [1..4] of pDouble;
i:integer;
begin
amArray[1]:=@am01;
amArray[2]:=@am02;
amArray[3]:=@am03;
amArray[4]:=@am04;
am01:=1.23;
am02:=2.34;
am03:=3.45;
am04:=4.56;
for i:=1 to 4 do begin
showmessage(FloatToStr((amArray[i])^));
end;
end;
var am01,am02,am03......am13 : Double; begin for i := 1 to 13 do begin showmessage(floattostr(XXXXXXXXX)); end; 변수를 저렇게 선언을 했을때 위처럼 for문 또는 동적으로 변수의 값을 참조하고자 합니다. 어떻한 방법이 있을까요?...
양상훈
•
2002.08.01 11:06
포인터 배열을 사용하면...
var
am01,am02,am03,am04 : Double;
amArray:...
한원희
•
2002.07.31 06:39
글쎄요. 배열로 선언하지 않고 위와 같이 할 수는 없을것 같습니다만,
어셈을 잘 하신다면, 스택 번지...
포인터 배열을 사용하면...
var
am01,am02,am03,am04 : Double;
amArray:Array [1..4] of pDouble;
i:integer;
begin
amArray[1]:=@am01;
amArray[2]:=@am02;
amArray[3]:=@am03;
amArray[4]:=@am04;
am01:=1.23;
am02:=2.34;
am03:=3.45;
am04:=4.56;
for i:=1 to 4 do begin
showmessage(FloatToStr((amArray[i])^));
end;
end;