목록프로그래밍 (3)

아브아카의 세상 빼꼼 바라보기

델파이 stringlist Natural Order 정렬하기

Natural Order가 무엇이냐하면 윈도우 탐색기의 정렬방식이다.A1 A2 A10 B2 B21 B10 이것을 정렬하면 사전식순이다. Stringlist.Sort로 정렬하는 방법이다.A1A10A2B10 B2B21 Natural Order순은 숫자부분을 크기순으로 정렬한다. A1A2A10B2B10B21 구글에 Delphi Natural Order로 검색해보니 C소스를 국내에 번역해놓은 분이 계셨다. 이것을 Stringlist CustomSort에 붙여봤다. function NaturalOrderCompareString( const A1, A2: string; ACaseSensitive: Boolean ): Integer; var Str1, Str2: PChar; Pos1, Pos2: Integer; En..
컴퓨터/Delphi 코딩 2015. 8. 5. 17:54
Delphi lisbox drag and drop

var StartingPoint : TPoint; implementation ... procedure TForm1.FormCreate(Sender: TObject) ; begin ListBox1.DragMode := dmAutomatic; end; procedure TForm1.ListBox1DragDrop(Sender, Source: TObject; X, Y: Integer); var ListBox: TListBox; i, TargetIndex: Integer; SelectedItems: TStringList; begin Assert(Source=Sender); ListBox := Sender as TListBox; TargetIndex := ListBox.ItemAtPos(Point(X, Y), Fa..
컴퓨터/Delphi 코딩 2015. 6. 17. 01:00
생활코딩 강좌 사이트

https://opentutorials.org/course/62 php와 codeigniter 강좌 http://modernpug.github.io/php-the-right-way/ 모던 PHP 코딩 스타일
컴퓨터/웹 코딩 2015. 5. 31. 22:12
이전 Prev 1 Next 다음