Типы программирования, программирование, языки программирования, книги программирование На сайте представлена информация про программирование в Интернете и работу  

Перехват вызовов функций, Способы перехвата
NetBios in Delphi, у кого есть решение?
!!!!!!!!!!!!ПОМОГИТЕ&#, КТО ЗАНИМАЕТЬСЯ ВЗЛОМОМ ПРОГРАММ
Вопрос обо всем
Обсчёт трафика!
как вычислить IP адрес, programmnym putem!
Как можно получить звук с микрофона?, Пример кода
Удалить все файлы вместе с директорией
Сортировка ListView при нажатии на заголовок, Пример кода
Активная форма, Определить активная или нет
сведения ICQ, Как получить сведения о ICQ
Как работать с Outlook в Delphi, !!!!!!!!!!1ПОМОГИТЕ!!&
Работа с почтой, НУЖНА ПОМОЩЬ
Как найти окно по неполному названию, Пример кода
ОПЫТНЫЙ и не только помогите!!!, ДВА ВОПРОСА
Снова TQRCompositeReport
Как обновить данные в программе? [D3, Win95/98], Как обновить данные в программе? [D3, Wi
TreeView
Определение версии винды..., определение версии винды
Как узнать имя компьютера?, Пример кода
Как Вы относитесь к курящим девушкам?
Можно ли снести BIOS, Помогите пожайлуста!!!!!!
Как програмно прокрутить Memo, Пример кода
Как установить дополнительные компоненты ?
Цвета, Как перекрасить TPageControl и TTabCon.
Папка -> Файл, Как из папки сделать файл?
анимированные изображения
Как правильно закрыть..., ... модальную форму...
Редактирование Шрифтов для матричных принтеров, Способы и методы
exe формат
Как перебрать контролы..., ... на форме или в панели..
QuickReport
ПОМОГИТЕ ПОЖАЙЛУСТА, ОЧЕНЬ МНОГО ВОПРОСОВ
FAQ по форуму, почему-бы не сделать..., ...и не выложить где-нить...
Как спрятать окно..., ...при запуске приложения...
Копирование с поврежденного носителя..., Копирование с поврежденного носителя...
Как заказать сервисный процесс ?
Создание экземпляра TWebBrowser в runtime
FTP client, Киньте в меня сырцами клиента
Delphi и Excel!!! Срочно, Delphi и Excel!!! Срочно
Книги по Windows API, Кто может подсказать удачные?
Не глобальный хук, Не глобальный хук
Вращение для OpenGL, OGL
Delphi Games, Кто хочет сделать игру на Delphi, заходи
Обработка ошибок в ADODataSet
Отжор памяти и как с ним бороться :)
Плагины, Взаимодействие Программы с DLL
Запись цвета в реестр...
Как работать с Excel из Дельфи??
Одолевают сомнения, Периодический опрос буфера
Извлечение иконок из EXE и DLL, Пример кода
Нифига не понимаю...., API под XP и 98'ой ....:(
Как Вы относитесь к курящим девушкам?
Библиотека Ctr и Pentium2, Паскаль под Дос
Таскание окошка...
Определение IP. ЗАЧЕМ???
Перехват нажатия клавиши, Перехват нажатия клавиши
Диалог выбора директории aka папки!
Применение функции проверки..., Применение функции проверки...
Изменить иконку, Как изменить иконку у exe-файла?
Дядька Борланд - БРАКОДЕл или глюк в DELPHI 5.0, Глюк в Delphi 5
Насчет опроса про программирование в Delphi
Обработка BMP
Слежение за нажатием клавиш.
Считать текст с IE
Hook, hook
Чужой COM объект, Есть ли доступ?
Проги
Из файла в массив.....
Plug-in для IE, Как написать?

Платные хостинги     Раскрутка сайта     Книги по программированию


Сортировка ListView при нажатии на заголовок, Пример кода

Только здесь 1000 посетителей на Ваш сайт всего за 3 у.е.!

- пример взят из рассылки "Мастера DELPHI. Новости мира компонент, FAQ, статьи..."Сортировка ListView в режиме vsReport при нажатии на заголовок колонкиКод function CustomDateSortProc(Item1, Item2: TListItem; ParamSort: integer): integer; stdcall;beginresult:=0;if strtodatetime(item1.SubItems[0])>strtodatetime(item2.SubItems[0]) then Result :=1 elseif strtodatetime(item1.SubItems[0])<strtodatetime(item2.SubItems[0]) then Result :=-1;end;function CustomNameSortProc(Item1, Item2: TListItem; ParamSort: integer): integer; stdcall;beginResult := CompareText(Item1.Caption,Item2.Caption);end;procedure TForm1.GetFilesClick(Sender: TObject);var sr:tsearchrec;Item: TListItem;beginif FindFirst('e:\*.*',faAnyFile, sr) = 0 then repeat     if (sr.Attr and faDirectory) <> sr.Attr then     begin       item:=lv1.items.add;       item.Caption:=sr.name;       Item.SubItems.Add(datetimetostr(filedatetodatetime(sr.time)));     end;until FindNext(sr) <> 0;FindClose(sr);end;procedure TForm1.lv1ColumnClick(Sender: TObject; Column: TListColumn);beginif column =lv1.columns[0] then LV1.CustomSort(@CustomNameSortProc, 0) else  LV1.CustomSort(@CustomDateSortProc, 0)end; highlightSyntax('delphikMWVmY','delphi');

Интернет казино     Онлайн игры     Увеличение члена     Купить DVD


Главная страница | программирование 1с учебник | программирование сотовых | офшорное программирование | примеры линейное программирование | анализ программирование | программирование делфи | cgi программирование | программирование atmel | школа программирования | типы программирования | практика программирования | программирование autocad | программирование профессиональное | обзор языков программирования | среда программирования delphi | задачи целочисленного программирования | характеристика языка программирования | стиль программирования | постановка задачи программирование | программирование серверов | программирование диплом скачать | применение программирования | Ссылки

Все про практика программирования