Delphi listview 열 헤더를 클릭하여 정렬
1278 단어 ListViewDelphi열 헤더를 클릭하여 정렬
listview의 숫자 정렬입니다.
글로벌 변수 먼저 추가
m_bSort: Boolean = false; CustomSortProc(Item1, Item2: TListItem; ParamSort: Integer): Integer;;
다음에 정렬할 listview 컨트롤의 OnColumClick 이벤트에 코드를 작성합니다
TMainForm.lv_UpLoadListColumnClick(Sender: TObject;
Column: TListColumn);
(Column. = 1) (Column. = 3)
lv_UpLoadList.CustomSort(@CustomSortProc, Column.);
m_bSort := m_bSort; ; ;
이후 전역 함수 작성
CustomSortProc(Item1, Item2: TListItem;
ParamSort: Integer): Integer; ;
txt1, txt2: Integer;
ParamSort <> 0
try
txt1 := StrToInt(Item1.SubItems.Strings[ParamSort - 1]);
txt2 := StrToInt(Item2.SubItems.Strings[ParamSort - 1]); m_bSort
Result := txt1 - txt2;
Result := -(txt1 - txt2);
;
except ;
m_bSort
Result := CompareText(Item1.Caption, Item2.Caption);
Result := -CompareText(Item1.Caption, Item2.Caption); ;
; ;
이상은 숫자의 정렬입니다. 한자 같은 정렬이 필요하면 위의strtoint를 제거하고 위의 주석 줄을 위줄로 바꾸면 됩니다
이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
Flutter의 ListTile에서 높이를 지정하면 레이아웃이 무너지는 문제현재 업무로 1개월 반 정도 Flutter를 사용하고 있습니다. 아주 좋은 팀으로, 최근에는 Flutter 자체에도 열중해 왔습니다. title, subtitle, leading, trailing 등을 설정하는 것만...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.