Поддержка / Donate Благодарю за поддержку! Новости сайта Новости форума Архив исходников Automatic translation
Поддержка / Donate
Благодарю за поддержку!
Архив исходников
Automatic translation
Delphi FAQ - Часто задаваемые вопросы | Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа || ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |
Оформил: DeeCo Автор: http://www.swissdelphicenter.ch
procedure TFormMain.Listview1ColumnClick(Sender: TObject; Column: TListColumn); var ColumnNr: Integer; begin ColumnNr := Listview1.Column[Column.Index].Index; ShowMessage(IntToStr(ColumnNr)); end;