델파이로 mssql 데이터베이스 데이터 가져오기

델파이로 mssql 콤포넌트를 사용해서 mssql 연결을 했습니다.

http://ljh3326.tistory.com/24 

연결한 디비에서 테이블의 필드값을 가져오는 거를 해보려 합니다.

procedure GetFieldContents;
var
  qryTemp : TMSQuery;
begin

     qryTemp := TMSQuery.Create( nil );
     qryTemp.Connection := msConnection;
     qryTemp.FetchAll := True;


     try
       with qryTemp do
       begin
         close; sql.Clear;
         sql.text := ' select fieldnm1 from tablename ';
         Open;


         while not Eof do
         begin
           memo.Lines.Add(FieldByName('fieldnm1').AsString));

           next;
         end;


       end;

     finally
       qryTemp.Free;
     end;


end;

1. TMSQuery컴포넌트 선언후 create를 합니다. 

2. 동적으로 create를 합니다. 할때 연결한 connetion을 가져옵니다.

3. sql에 쿼리를 넣고

4. Open해줍니다. 그리고 EndOfFile까지 while로 루프를 돌리면서

5. 메모 콤포넌트에 필드값을 뿌려줍니다.

아주 단순한 예제라 바로 이해가 되실겁니다.