[카테고리:] 프로그램 관련
퀀텀그리드(cxGrid)에 checkBox에 체크된 넘을 Footer에 뿌려주기.
FooterSummary 에 checkBox에 체크된 넘을 Footer에 표시하시고싶다면 일단 Footer에 Count로 출력합니다. 이벤트에서 Summary->FooterSummaryItems->OnSummary 에
|
1 2 3 4 5 |
if ASender.DataController.GetValue(Arguments.RecordIndex , 체크컬럼.Index) = False then begin OutArguments.CountValue:=OutArguments.CountValue-1; //만일 체크박스가 False 이면 Count를 하나 감소한다.(summry kind 가 count 일때) OutArguments.Value:=0; //만일 체크박스가 False 이면 Value값을 0으로 돌린다.(summry kind 가 sum 과 같은경우) end; |
처럼 하면 됩니다. 델마당의 헤벌레 (infojin) 님의 글을보고 퀀텀의 도움말 그리고 예제를…
퀀텀의 RibbonBar 따라 하기.
쓰다보니 좀 중구 난방이되었습니다. 따라서 하시면 뭔가 되지 않을까요? Ribbon Bar이용하여 메뉴 만들기. 1. 우선 리본바를 내려 놓습니다. 2. RibbonBar는 TdxBarManager를 사용해야만 합니다. 따라서 폼에 TdxBarManager를 올려 놓습니다. 3….
시스템의 논리 드라이브명 가져오고 가져온 드라이브의 종류(Type)을 알아내기.
조금 연식이 오래된 프로그램의 하드 코딩입니다. 아래는 간단히 전체 드라이브의 모든 드라이브를 가져 옵니다. GetLogicalDrives API 함수와 약간 혼동은 되지만. GetLogicalDrive라고 이름을 붙여 사용합니다. 일단…
듀얼 모니터에서 두번째 모니터에 폼을 띄우기
듀얼 모니터라는 것을 알아 내는 방법은 간단히 Screen.MonitorCount로 알수 있습니다. 근데, 두번째 폼에 폼을 띄우려면 좌표를 알아야 겠지요. Screen.Monitors[0],[1]..[n]까지 모니터의 갯수에 맞게 Monitor의 좌표를 얻어…
System ICon을 ImageList에 가져오고 파일에 따라 보여주기
자신의 컴퓨터에 확장자에 맞는 아이콘을 가져 와서 ImageList에 넣어 줄때 사용하는 함수이다. Uses문에 ShellAPI, ShlObj를 추가한뒤에 사용한다. 전에 만들어 두었던것이 사라져서 다시 만들었다.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 |
procedure GetSysstemICon(sImageList, lImageList: TImageList); var sfi: TShFileInfo; begin // ImageList에 파일의 내용을 넣는다. // get access to the shell imagelist... sImageList.handle := shgetfileinfo('', 0, sfi, sizeof(TShFileInfo), SHGFI_SYSICONINDEX or SHGFI_SMALLICON); sImageList.shareimages := true; sImageList.BlendColor := clHighlight; lImageList.handle := shgetfileinfo('', 0, sfi, sizeof(TShFileInfo), SHGFI_SYSICONINDEX or SHGFI_LARGEICON); lImageList.shareimages := true; lImageList.BlendColor := clHighlight; end; |
아래…
WinPcap – Packet Snooping용 드라이버 및 컴포넌트입니다
WinPcap 이라는 Packet Snooping용 드라이버 및 컴포넌트입니다. 뭐 소스는 C, VCC이고 PDA용 Win-CE 드라이버도 제공 합니다. 아직 사용법은 모르겠고 WIn-CE용은 설치 방법도 모르겟습니다. 일단 소개를…
DBISAM 동적 쿼리에서 필드명을 자동으로만들기 예제.
간단히 구성해 본내용입니다. 동적 쿼리에서 필드명을 자동으로만들기 예제입니다. Bold체를 눈여겨 보시면 될듯.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 |
with DBISAMQuery2 do begin Close; SQL.Clear; SQL.Text := 'Select * from Clean_Drop'; Open; S := ''; S1 := ''; for I := 0 to FieldCount - 1 do begin S := S + Fields[I].FieldName + ','; S1 := S1 + ':' + Fields[I].FieldName + ','; end; S := Copy(S, 1, length(S) - 1) + ') Values ( '; S1 := Copy(S1, 1, length(S1) - 1) + ') '; DBISAMQuery3.Close; DBISAMQuery3.SQL.Clear; DBISAMQuery3.SQL.Text := 'Insert into Temp_Clean_Drop (' + S + S1; while not Eof do begin for I := 0 to FieldCount - 1 do DBISAMQuery3.Params[I].Assign(Fields[I]); DBISAMQuery3.ExecSQL; next; end; end; |
참고만 하세요.
쿼리 안쓰고, table의 내용을 다른 table에 복사하기.
뭐 전 간단히 DBISAM을 예를 든거지만, 어떤 방식이던 아래처럼 하면 빠릅니다. 쿼리를 이용하면 더 빠르지만, 쿼리를 이용할수 없을때 사용하세요. Session이 다르거나, Server를 Local디비로 내리거나 올릴때…
ShellListView, ShellTreeView에서 Folders 사용하기
가끔 질문이 들어옵니다. ShellTreeView나 ShellListView에서 폴더 또는 화일의 내용을 어찌 해야 하나요? 하고는 물론 ‘잘~~~’ 이라고 애기해 줍니다. ShellTreeView특정 폴더를 안보이게 하기. 안보이게 하는게 아니라…
포스트잇 처럼 내려가지도 않고 항상 최상단이게 만드는 방법
단지 최상단에 놓기만 하는 겁니다. 포스트잇 처럼 내려가지도 않고 항상 최상단이게 만드는 방법입니다. 참고만 하세요.. 중요 키포인트는 아래 두줄입니다. ExStyle := ExStyle or WS_EX_TOOLWINDOW or WS_EX_TOPMOST ;…
최신 댓글