김용구 wrote:

> 비유 말씀 잘들엇는데요..

>

> combobox1.items.assign(sky_name); 이나

> combobox1.assgn(sky_name); 이나..

>

> 둘다 에러메세지가 똑같아요..

> nil값을 콤보박스에 넣을 수 없대요.

>

> sky_name 은 item이1개가 아니고.. 스트링 리스트거든요.. 10개짜리

> 그래서 집안과 집안을 연결시켜주려구요..

>

> 근데.. 아무리봐도 sky_name이란 스트링 리스트가 안생기는거 같아요

> 생성소스는 먼저 글에 있거든요.

>

> 죄송하지만 한번 더 봐주실래요?



소스가 틀리게 되어 있으니

언뜻 보기에 그게 틀려 있길레 그랬죠... 전..

procedure prc_list(sqls:string; name,code:TStrings);



부분을



procedure prc_list(sqls:string; var name,code:TStrings);



이렇게 해 보세요



파라미터를 넘길때 변수명만 넘겨주면 constant 로 인식하거든요

이렇게 되면 그냥 그 함수(프로시져) 내에서만 유효하게 됩니다.

무슨값을 넣든지 말이죠

하지만 변수명 앞에 var 를 추가하면 호출된 함수에서 수정된 내용이

호출한 곳 까지 유지됩니다.



- 프리랜서 유효종-