pozalujsta pomogite s voprosom

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Ответить
00mike00

Сообщение 00mike00 »

:) izvinjajusj slu4ajno nazal na knopku otpravitj!

kak zdelatj 4tob programa posle jeje ze zapusta "minimize to tray"

t.e. 4to bi ne bila na paneli, a svora4ivalasj radom s 4asami i bilabi vidna toko ikonka :)))
SovNarKom
постоялец
Сообщения: 389
Зарегистрирован: 28.05.2005 10:37:39
Откуда: Воронеж [vrn] [36]
Контактная информация:

Сообщение SovNarKom »

00mike00, послушай, дело в том, что твой вопрос касается не лазаруса, и даже не фрипаскаля, а обычного winapi, поэтому рекомендую открыть google и набрать
'Трей + Delphi', а для начала, вот тебе код:

Код: Выделить всё

 uses ShellApi;

 ...

  NotifyIconData.hIcon := application.icon.Handle;
  NotifyIconData.cbSize := SizeOf (NotifyIconData);
  Shell_NotifyIcon (NIM_MODIFY, PNotifyIconData (@NotifyIconData));
Trezub
новенький
Сообщения: 52
Зарегистрирован: 17.09.2005 21:23:04

Сообщение Trezub »

SovNarKom
не совсем так, в Lazarus'e вобще с изображениями какие-то глюки... поэтому и код для Делфи неработает :)

00mike00
<a href='http://www.mi4g.as.ro/lazarus' target='_blank'>http://www.mi4g.as.ro/lazarus</a>
вот тут лежит архивчик - 400 кб. с исходниками. Но если чесно, не пробывал. Как раз сейчас собираюсь. Так что если не заработает - напишу тут. Ну а если не напишу, значит получилось :)
Ответить