Q&A

  • 델파이에서 DB에서 select 한것을 스트링그리드에 바로 넣는 방법??
DB에서 select 한것을 DB그리드를 사용하지 않고 바로

스트링그리드에 넣으려고 하는데...

ex)

그리드 명 : sgTestGrid

Query 명 : qyTestsql

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

sgTestFrid.RowCount := DataModule1.qyTestsql.RecordCount;

for i := 0 To sgTestFrid.RowCount - 1 do

begin

sgTestFrid.Cells[1, i] := ?????

sgTestFrid.Cells[2, i] := ?????

end; // End Of for

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

위의 ????? 부분에 스트링그리드의 Cells[ i, j] 와 같이

쿼리의 각 필드에 대한 인덱스로 그 값을 넣어야 될 것 같은데...

아시는 분 메일이나 리필을 해주시길.....^.^;





2  COMMENTS
  • Profile
    정계훈 2001.02.21 22:39
    sgTestFrid.RowCount := DataModule1.qyTestsql.RecordCount;

    for i := 0 To sgTestFrid.RowCount - 1 do

    begin

    sgTestFrid.Cells[1, i] := qyTestsql.FieldByName('aaa').AsString;

    sgTestFrid.Cells[2, i] := qyTestsql.FieldByName('bbb').AsString;

    end; // End Of for







    zerosik wrote:

    > DB에서 select 한것을 DB그리드를 사용하지 않고 바로

    > 스트링그리드에 넣으려고 하는데...

    > ex)

    > 그리드 명 : sgTestGrid

    > Query 명 : qyTestsql

    > ---------------------------------------------------------

    > sgTestFrid.RowCount := DataModule1.qyTestsql.RecordCount;

    > for i := 0 To sgTestFrid.RowCount - 1 do

    > begin

    > sgTestFrid.Cells[1, i] := ?????

    > sgTestFrid.Cells[2, i] := ?????

    > end; // End Of for

    > ---------------------------------------------------------

    > 위의 ????? 부분에 스트링그리드의 Cells[ i, j] 와 같이

    > 쿼리의 각 필드에 대한 인덱스로 그 값을 넣어야 될 것 같은데...

    > 아시는 분 메일이나 리필을 해주시길.....^.^;

    >

    >

  • Profile
    zerosik 2001.02.22 03:54
    정계훈 wrote:

    > sgTestFrid.RowCount := DataModule1.qyTestsql.RecordCount;

    > for i := 0 To sgTestFrid.RowCount - 1 do

    > begin

    > sgTestFrid.Cells[1, i] := qyTestsql.FieldByName('aaa').AsString;

    > sgTestFrid.Cells[2, i] := qyTestsql.FieldByName('bbb').AsString;

    > end; // End Of for

    >

    >

    >

    > zerosik wrote:

    > > DB에서 select 한것을 DB그리드를 사용하지 않고 바로

    > > 스트링그리드에 넣으려고 하는데...

    > > ex)

    > > 그리드 명 : sgTestGrid

    > > Query 명 : qyTestsql

    > > ---------------------------------------------------------

    > > sgTestFrid.RowCount := DataModule1.qyTestsql.RecordCount;

    > > for i := 0 To sgTestFrid.RowCount - 1 do

    > > begin

    > > sgTestFrid.Cells[1, i] := ?????

    > > sgTestFrid.Cells[2, i] := ?????

    > > end; // End Of for

    > > ---------------------------------------------------------

    > > 위의 ????? 부분에 스트링그리드의 Cells[ i, j] 와 같이

    > > 쿼리의 각 필드에 대한 인덱스로 그 값을 넣어야 될 것 같은데...

    > > 아시는 분 메일이나 리필을 해주시길.....^.^;

    > >

    > >