DevHyun

[TMS AdvColumnGrid] 그리드 내에서 검색하기 본문

Delphi

[TMS AdvColumnGrid] 그리드 내에서 검색하기

D3V3L0P3R 2021. 6. 3. 16:39

procedure Tform1.button1Click(Sender: TObject);

var 

    str1: string;
    tPos : TPoint;
    tp : integer;

begin

      str1 := '';

 

      tPos.X := 0;
      tPos.Y := 1;

      tp := 'AdvColumnGrid Name'.Find(tPos, str1 , [fnMatchStart]).Y;
      if tp > 0 then 'AdvColumnGrid Name'.Row := tp;

end;

 

- 검색 방법은 여러가지가 있는듯?

{ fnMatchCase, fnMatchFull, fnMatchRegular,fnDirectionLeftRight, fnMatchStart, fnFindInCurrentRow, fnFindInCurrentCol,fnIncludeFixed, fnAutoGoto, fnIgnoreHTMLTags, fnBackward,fnIncludeHiddenColumns }

 

- 이 방법의 단점은 예를들어 아래와 같은 그리드에서 '철수'로 검색했을때 발생한다.

- 나는 3번 '철수'를 찾고 싶은데 위와 같은 방법을 사용하면 1번 '김철수'가 검색됨.

1 김철수
2 박철수
3 철수
4 그냥철수
5 오로지 철수

 

Comments