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

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

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

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

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

Получить холст экрана

Используйте процедуру Keybd_Event с параметрами VK_SNAPSHOT и 1 для этой операции.

 

Вывод прозрачного текста на холст

Детектив Грузия на http://detective-conrad.com.ua

Используйте Brush.Style для Form.Canvas, если Вы хотите установить цвет фона как цвет формы. И используйте TextOut, если хотите выводить текст на холсте.

 

Изменение Bitmap во время выполнения

Самый простой способ изменить точечный рисунок во время выполнения состоит в том, чтобы использовать метод Assign. Имейте ввиду, что когда свойство является объектом, это связывает память с ним.

 

Создание массива компонентов во время выполнения

В этом примере используется TLabel в качестве примера, чтобы создать массив компонентов TLabel и присвоить им свойство Caption, а также установить другие свойства этих компонентов, таких как Top, Left, Width и других. С таким же успехом можно использовать любой компонент Delphi, чтобы создавать массивы компонентов во время выполнения приложения, написанного на Delphi.

 

Как преобразовать HEX цвета в формат Delphi

Есть ли функция или процедура для преобразования значений цвета в HEX формате в Delphi формат, типа этого: Cornsilk1 Cornsilk1 255 248 220 #FFF8DC в $00DCF8FF? Конечно есть!

 

Активация подсказки из кода

Есть способ отображения подсказки для окна управления из кода Delphi:

 

Создание CD с автозапуском

Это практически не относится к программированию в Delphi, но как программист (использующий любой язык программирования) иногда Вы будете нуждаться в этом.

 

Включение/отключение иконок рабочего стола

Вот пример, как включить / отключить все объекты на Рабочем Столе:

 

Заливка формы градиентом

Этот пример демонстрирует, как залить форму градиентом, подобно программам инсталляции:

 

Получение системной информации (свободная память и т.д.)

Поместите TMemo (Memo1) и TButton (Button1) на форму. Поместите этот код в обработчик события OnClick кнопки Button1:

 

Как поменять Bitmap между двумя TImageList

Если Вам нужно переправить Bitmap изображение из одного TImageList в другой, Вы можете использовать следующую процедуру:

 

Есть ли связь с Интернет?

Для того, чтобы проверить, подключен ли Интернет, используйте следующий код:

 

Активировать кнопку Пуск Windows из кода

Здесь приведен пример, как нажать кнопку Windows Пуск программно из кода Delphi:

 

Активировать подсказку для управления из кода

Чтобы отобразить подсказку (ToolTip) для управления из кода Delphi...

 

Показать/скрыть иконки на рабочем столе

Для того, чтобы скрыть или показать все иконки на рабочем столе Windows, используйте следующую процедуру...

 

Как узнать записывамый ли каталог

Довольно просто узнать, перезаписываемый ли каталог или нет. Если мы можем создать файл в указанном каталоге, значит каталог записываемый, в противном случае - нет.

 
«В начало12345678910В конец»