목록전체 글 (60)

DevHyun

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

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,fnInc..
Delphi 2021. 6. 3. 16:39
1 : N의 관계인 테이블 A와 B를 JOIN 할 때, 테이블 B의 데이터는 한개만 가져오고 싶을 때

1 : N의 관계인 테이블 A와 B를 JOIN 할 때, 테이블 B의 데이터는 한개만 가져오고 싶을 때, TABLE_A ( IDX INT, NAME VARCHAR ) TABLE_B ( IDX INT, COUNT INT, SUBJECT VARCHAR ) TABLE_A IDX NAME 1 김철수 2 나영희 3 박소영 TABLE_B IDX COUNT SUBJECT 1 1 국어 1 1 영어 2 5 도덕 3 4 체육 일반적으로 JOIN을 걸게되면 SELECT A.IDX, NAME,COUNT,SUBJECT FROM TABLE_A AS A LEFT JOIN TABLE_B AS B ON A.IDX = B.IDX IDX NAME COUNT SUBJECT 1 김철수 1 국어 1 김철수 1 영어 2 나영희 5 도덕 3 박소영..
SQL/Query 2021. 4. 27. 15:27
[TMS AdvColumnGrid] header 클릭 시 금액순으로 정렬하기

advcolumngrid property 셋팅을 아래와 같이 진행 procedure TForm1.AdvColumnGrid1GetFormat(Sender: TObject; ACol: Integer; var AStyle: TSortStyle; var aPrefix, aSuffix: string); begin if ACol in [ 2,3,4] then // col number( 2번 3번 4번 컬럼만 금액순으로 정렬) AStyle := ssFinancial; // 금액순으로 정렬 end;
Delphi 2021. 4. 27. 15:15
Prev 1 2 3 4 5 6 7 8 ··· 20 Next