Карта сайтаСсылкиКонтакты

Случайная новость

Как выделить узлы в TTreeView

Как некоторые узлы в TTreeView выделить жирным шрифтом? Есть самый простой, но надежный способ реализации этого. Стандартное управление Windows TreeView имеет несколько флагов состояния (в нашем примере TVIS_BOLD и TVIS_CUT). При помощи этих флагов можно добиться нужного результата.

Подробнее ...

Как получить системные изображения Windows

При помощи функции LoadBitmap мы можем захватывать рисунки, которые Windows использует для кнопок полос прокрутки, переключатели и т.д. Здесь мы имеем функцию, которая назначает TImage один из точечных рисунков.

 

Как получить текст чужого окна

Здесь рассматривается, как можно получить текст чужого окна, когда курсор мыши находится над ним. Можно просматривать текст под звездочками в текстовом поле. Для этого поместите компоненты TTimer (Timer1), TEdit (Edit1) и TLabel (Label1) на форму и запишите следующий код:

 

Добавление пункта в системное меню Вашего приложения

Этот пример демонстрирует использование функции AppendMenu() Windows API, чтобы добавить в конец системного меню новый пункт. Мы определим новую системную константу SC_MyMenuItem, которая будет использоваться для идентификации нашего нового пункта меню в системе. После добавления пункта меню, будем ловить сообщение WM_SYSCOMMAND, чтобы проверить, выбран ли наш пункт меню.

 

Изменение стандартной формы

Приведу простой пример, как можно использовать данную форму. Допустим Вам надо сделать программу- напоминалку. Висит эта форма и на ней постоянно отображаются Ваши встречи, дела, праздники или другая полезная информация. Получится этакий Active Desktop :) Но будет он жрать ресурсов на порядки меньше.Реализуется все это очень просто.

 

Как узнать скорость (частоту) Вашего процессора (CPU)

Ниже приведена функция GetCPUSpeed, которая позволит узнать частоту Вашего процессора. Функция не получает никаких параметров, а возвращает число с плавающей точкой. Возвращаемое значение означает частоту Вашего процессора в МГц.

 

Как закрыть приложение с сообщением о фатальной ошибке

Как закрыть программу с предупреждающим сообщением пользователю о фатальной ошибке?

 

Как выделить узлы в TTreeView

Как некоторые узлы в TTreeView выделить жирным шрифтом? Есть самый простой, но надежный способ реализации этого. Стандартное управление Windows TreeView имеет несколько флагов состояния (в нашем примере TVIS_BOLD и TVIS_CUT). При помощи этих флагов можно добиться нужного результата.

 

Как изменить вид всплывающей подсказки

Для того, чтобы изменить вид всплывающей подсказки и сделать ее в виде воздушного шара, как этот делается в некоторый приложениях Windows XP, нужно всего лишь добавить приведенный ниже код в исходный код формы Вашего приложения.

 

Как привязать форму к другому окну

Чтобы привязать свою форму к другому окну, а также отображать ее поверх этого окна, нужно просто переопределить процедуру CreateParams этой формы. Для этого нужно просто знать дескриптор окна.

 

Как сделать, чтобы Enter работала как Tab

Иногда пользователи хотят, чтобы в приложении можно было переходить по полям ввода при нажатии на клавишу Enter, так как намного удобнее, чем Tab. Есть много способов этого добиться, но этот способ намного практичнее, достаточно добавить одну процедуру. В нашем случае эта процедура - EnterAsTab.

 

Как переместить пункты ListBox при помощи мыши

Компонент TLIstBox представляет собой коллекцию элементов в прокручиваемом списке. Delphi позволяет легко прогаммировать перетаскивание элементов списка в приложениях. Это уже было рассмотрено здесь.

 

Как узнать изменение системной даты

Если Вашему приложению нужно отреагировать, когда пользователь изменяет системную дату, то можно перехватить сообщение WM_TIMECHANGE Windows.

 

Как программно добавить пункт в контекстное меню

Когда Вы разрабатываете приложение, которое имеет всплывающее меню, часто возникает необходимость добавлять пункты меню во время работы приложения. Каждый пункт меню представлен классом TMenuItem. Когда пользователь щелкает на пункте меню, происходит событие OnClick. Вам же нужно перехватить это событие и отреагировать на него.

 

Перетаскивание пунктов TreeView

Для того, чтобы позволить перетаскивание пунктов TreeView, нужно установить свойство DragMode в dmAutomatic. А в событии OnDragOver записать следующее:

 

3D эффект шрифта

Для придания 3D эффекта Вашему шрифту, можно применить приведенную ниже функцию ExtFont. Вывод осуществляется на Canvas, так что текст можно выводить в любое окно, которое имеет свойство Canvas.

 

Как сделать снимок экрана - ScreenShot

Чтобы сделать снимок части экрана в Delphi приложении, воспользуйтесь процедурой ScreenShot, которая приведена ниже. В качестве единственного аргумента в процедуру передается переменная TBitmap, куда и будет помещено изображение.

 
Еще статьи...
«В начало12345678910В конец»