Q&A

  • StringGrid에서 이상한 버그인가???
StringGrid를 한폼에 두개을 두고요....
[>], [>>], [<], [<<] 이런 버튼으로 Select 된 내용을 옮기는 건데요...
이상한 것이 있습니다...

======================================================================
procedure TTarget_Frm.SpeedButton3Click(Sender: TObject);
var
i, k:integer;
begin
    for i := 1 to sgridright.RowCount - 1 do
        // 지울것
       if sgridright.Cells[0,i] <> '' then
       begin

        for k := i + 1 to SGridRight.RowCount - 1 do
         begin

          sgridright.Rows[i].Clear;           //선택 Row의 내용을 지워줌
          sgridright.Rows[i]:= sgridright.Rows[k];

        end;

        sgridright.RowCount := sgridright.RowCount - 1;
      end;
    end;
end;
======================================================================
이부분은 왼쪽에서 옮긴내용을 다시 왼상복귀시키는건데요...
그럴때 오른쪽의 StringGrid의  TitleRow를 한개 Fix시켰는데...
Fix된 TitleRow가 사라집니다...
그러니깐 회색의 TitleRow가 흰색으로 변해 버립니다....
고수님들 저에게 한수만 갈켜주세요!!!
1  COMMENTS
  • Profile
    5782_Click 2002.01.22 19:59

    스트링그리드에서 FixedRows는
    스트링그리드의 Rowcount가 2 이상이 되어있을때만 나타납니다.
    1이하가 되면 Fix된 Row가 없어지게 되지여..
    Rowcount를 하나씩 빼도록 코딩되어있던데..거기에 조건을 주어
    항상 2개는 남겨두도록 하시면 될겁니당...^^
    그럼 즐코하세염...^^