procedure TIBSH_FORM.GET_LIST;
Var
S : String;

begin
  LIST.ITEMS.CLEAR;

  qy1.close;
  qy1.sql.clear;
  qy1.sql.add('SELECT * FROM ILBO_MST'+Myear+' WHERE HCODE = :HCODE ORDER BY WDATE DESC');
  qy1.parambyname('HCODE').asstring := HGCODE_LABEL.CAPTION;
  여기에서 코드값을 caption 값으로 받았는데 잘못된 것입니까...?
  도와주세요..
  
  qy1.Open;
  if qy1.recordcount > 0 then
    begin
      repeat
        S := QY1.fieldbyname('CODE').asstring +'   '+ setmsk(Myear+Qy1.Fieldbyname('WDATE').asstring,'####.##.##')+ '   ' + Qy1.Fieldbyname('ILGI').asstring+'  ('+qy1.fieldbyname('YO').asstring+')';
        LIST.ITEMS.ADD(S);
        qy1.next;
      until qy1.eof;
    end;
end;