Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[15551] HyperGrid 에서 색상 문의
하이네 [] 1944 읽음    2015-08-26 15:55
아래에 HyperGrid의 OnChangeCellAttributes 이벤트인데 색상이 바뀌게 코딩을 해놨습니다..


procedure TF_J30D01M.HG_MAIN02ChangeCellAttributes(Sender: TObject; ACol,
  ARow: Integer; Column: ThgHeading; State: ThgCellStates;
  var AColor: TColor; AFont: TFont; var HAlign: TAlignment;
  var VAlign: ThgVAlignment; var OuterBevel, InnerBevel: TBevelCut);
begin
  if (ARow < HG_MAIN02.FixedRows) or
     (ACol < HG_MAIN02.FixedCols) or
     ((ARow = HG_MAIN02.Row) and (ACol= HG_MAIN02.Col)) then
    Exit;

  if Trim(HG_MAIN02.Cells[12, ARow]) = Trim(HG_MAIN02.Cells[17, ARow]) then
    AFont.Color := clRed
  else
    AFont.Color := clBlack;
end;

색상이 바뀌기는 하는데 HG_MAIN02.Cells[17, ARow] 하나의 열에만 색상이 바뀌네요..

그리고 해당 행을 클릭해야 빨강으로 바뀌던데...

행이 다 바뀌게 하는 방법 아시는분 있나요..??

+ -

관련 글 리스트
15551 HyperGrid 에서 색상 문의 하이네 1944 2015/08/26
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.