초봉 님이 쓰신 글 :
: 예제입니다.
: var
: n,n2,n3,n4:integer;
: p1:^integer;
: begin
:
: n:=p1^;
: inc(p1);
:
: n2:=p1^;
: inc(p1);
:
: n3:=p1^;
: inc(p1);
:
: n4:=p1^;
: inc(p1);
:
: callme(n,n2,n3,n4);
:
: callme(p1^,(p1+1)^,(p1+2)^,(p1+3)^);
: 이렇게 대입받아서 함수를 호출하는데요.
: 이렇 아래와 같이 바꾸고 싶습니다.
: 이런식이 적용이 않되나요 ? 자꾸 컴파일 에러 나는군요.
:
: callme(p1^,(p1+1)^,(p1+2)^,(p1+3)^);
:
:
Pinteger(uint(p1))^:=n;
Pinteger(uint(p1)+4)^:=n2;
Pinteger(uint(p1)+8)^:=n3;
Pinteger(uint(p1)+12)^:=n4;
위식 으로 가능합니다 ^^
|