ReportSql.INI file 내용
[sql]
query = select * from emp


//////////////////////////////////시작///////////////////////
procedure TForm1.FormCreate(Sender: TObject);
begin
        //프로그램이 실행되는 디렉토리
        Dir := GetCurrentDir;
        //sql문을 가지고 온다.
        SqlINI := TIniFile.Create(Dir+'ReportSql.INI');
        //DB 연결을 위해서.
        DBINI  := TIniFile.Create(Dir+'Database.INI');
        Sections := TMemo.Create(nil);
        Sections.Visible := false;
        Sections.parent := Form1;
        SqlINI.ReadSections(Sections.Lines);
        if Sections.Lines.Count <> 0 then begin
                SectionPoint := 0;
                SecName := Sections.Lines.Strings[SectionPoint];
                Querytxt := SqlINI.ReadString('sql','query','');
        end;
        showmessage(Querytxt);
        Query1.Active := false;
        //Query1.ParamByName('sql').asstring := Querytxt;
        Query1.Close;
        Query1.SQL.Clear;
        Query1.SQL.Add(Querytxt);
        Query1.ExecSQL;
        //Query1.Active := true;
////////////////////////////끝////////////////////////////////////


이렇게 했는데 오류는 없는데 내용이 보이지를 않습니다.
해결좀 해주세여..