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가 흰색으로 변해 버립니다....
고수님들 저에게 한수만 갈켜주세요!!!
스트링그리드에서 FixedRows는
스트링그리드의 Rowcount가 2 이상이 되어있을때만 나타납니다.
1이하가 되면 Fix된 Row가 없어지게 되지여..
Rowcount를 하나씩 빼도록 코딩되어있던데..거기에 조건을 주어
항상 2개는 남겨두도록 하시면 될겁니당...^^
그럼 즐코하세염...^^