디자인된 폼에 디비에서 불러온 데이타를 반영하여 출력하고자 합니다.

가족이나, 상벌등은 한사람에게 여러개의 데이타가 있을 수 있습니다..

현재 작성되어진 코딩은...



ex1...>>



QRGood8 .Caption:='';

QRGood9 .Caption:='';

QRGood10 .Caption:='';//이상 Clear



Query2.close;

Query2.Sql.Clear;

Query2.Sql.Add('select * ');

Query2.Sql.Add(' from INSA_PRIZE ');

Query2.Sql.Add(' where ID_CODE=:id_code');

Query2.Sql.Add(' and TAG=0 ');

Query2.Sql.Add(' order by IO_DATE desc ');

Query2.ParamByName('id_code').AsString:=MaskEditID_CODE.Text;

Query2.open;

Query2.First; //SQL(데이타 가져오기)



i1:=1;

while not Query2.EOF do begin

case i1 of

1:begin

QRGood_Date1.Caption:=Query2.FieldByName('IO_DATE' ).AsString;

QRGood1 .Caption:=Query2.FieldByName('BIGO' ).AsString;

end;

2:begin

QRGood_Date2.Caption:=Query2.FieldByName('IO_DATE' ).AsString;

QRGood2 .Caption:=Query2.FieldByName('BIGO' ).AsString;

end;



--------------------







이런식으로 케이스문을 씁니다...

이런식으로 코딩을 하다보니까.. 소스코드가 상당히 길어지고..효율적이지 못한것

같아서요.. 개선할 수 있는 방법은.. 없을까요??

Record라는 구조체 같은게.. 있다는데..

좀.. 조언부탁드려요.......