유경희 wrote:

> type

> rectype = record

> pstr1 : array[0..25] of char;

> pstr2 : array[0..25] of char;

> end;

>

> 위와 같이 레코드형으로 된 데이터 pstr1에 스트링으로 들어온 데이터를 어떻게 변환하면 되나요?

>

> var

> var1 : array[0..25] of char;

> 하고 나서

> strpcopy(var1,edt1.text);

> rectype.pstr1 :=var1

> 을 하면 될 것 같은데 안되니요.





선언된 레코드형은 그 형태만 가지고 있지 실제 인스탄스가

생기지 않아서 그렇습니다.

그러므로, 선언을 해 주시면 간단히 해결 됩니다.

예를 들면



type

rectype = record

pstr1 : array[0..25] of char;

pstr2 : array[0..25] of char;

end;

...

var aaa: rectype;//<-- 레코드형 변수 선언

begin

StrCopy(aaa.pstr1, PChar('1234'));

ShowMessage(aaa.pstr1); //뭐..이런식으로 해보세요. 될겁니다.

end;



그럼, 즐거운 프로그래밍 되시길~