Q&A

  • [질문] Excel Down
BDE 걷어내고 dbExpress 사용하는 작업중입니다..ㅎㅎㅎ

var XLDB : TDataSet;    //요 변수형..win7 64bit 랑 관련 없을려나요?..

XLDB := ClientDataSet1;   //TQuery 는 에러 없이 잘됩니다.
while not XLDB.EOF do begin    
    j := 1;
    while j <= XLDB.FieldCount do begin
       if XLDB.Fields[j-1].DataType = ftString then
         XArr[j]    := XLDB.Fields[j-1].Value
       else XArr[j] := XLDB.Fields[j-1].Value;
       Inc(j);
    end;
    
    Excel.Range['A' + IntToStr(k+3), ALPTWO + IntToStr(k+3)].Value := XArr; //==>EolesysError 잘못된변수유형입니다..에러..
    XLDB.Next;
    Inc(k);
end;

dbExpress사용하면서 XLDB에  SQLQuery랑 연결된 ClientDataSet을 넘겨 주었는데..

XArr 에는 데이터 값이 쿼리든 데이터셋이든 잘 보이는데요...

Rang에 값을 나타내는데에서 어러가 빵빵 뜨네요..

무엇을 바꾸어야 할까요?..
0  COMMENTS