| 일 | 월 | 화 | 수 | 목 | 금 | 토 |
|---|---|---|---|---|---|---|
| 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 |
- SQL
- PostgreSQL
- 파라미터
- 셋업
- 문자열
- 인스톨
- c#
- Visual Basic
- 데이터베이스
- xml
- 델파이
- winsock
- SDK
- 설치
- MySQL
- vb
- VB.NET
- 소니
- 입문
- 기초
- 초보
- Firebird
- 시리얼 통신
- 파이어버드
- MFC
- Delphi
- dll
- WIN32 SDK
- Visual Studio 2005
- 예제
- Today
- Total
목록정렬 (2)
프로그래밍 노트
문자열 배열의 정렬 소스 var arSort: array[1..12] of string = ('d','e','f','a','b','c','h','a','i','j','k','l'); procedure TForm1.Button1Click(Sender: TObject); var sLst: string; iIdx: Integer; bSortingEnd: Boolean; bChange: boolean; i : integer; begin Listbox1.Clear; repeat bSortingEnd := False; iIdx := 1; repeat bChange := false; if checkbox1.Checked then begin // 내림차순(c, b, a ...) if CompareStr(arSort[i..
[델파이]StringGrid에서 오른쪽 정렬과 가운데 정렬하기 예제 오른쪽 정렬하고자하는 StringGrid의 DrawCell 이벤트에 밑의 소스를 카피해서 정렬을 하고자 하는 열이나 행을 설정한다. StringGrid는 기본적으로 왼쪽 정렬 procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); var hdcTemp : HDC; crdOrgAlign : Cardinal; begin with Sender as TStringGrid do begin hdcTemp := Canvas.Handle; if ARow = 0 then Canvas.Font.Style := C..