Показать сообщение отдельно
  #5  
Старый 21.07.2012, 16:44
MiraLaklamon MiraLaklamon вне форума
Новичок
 
Регистрация: 07.06.2012
Сообщения: 59
Версия Delphi: 6, 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от Electronic_Arts
просто TrayIcon1 это компонент...

попробовал так у меня программа ругается почему не подскажете??
Код:
procedure error;
var
TrayIcon1: TTrayIcon;
begin
TrayIcon1.BalloonHint:='ОШИБКА';
TrayIcon1.BalloonTitle:='Внимание!';
TrayIcon1.BalloonFlags:=bfError;
TrayIcon1.ShowBalloonHint;
end;

голова уже не варит...торможу...
Потомучто переменная TrayIcon1 у тебя ссылается вникуда. Сначала нужно создать объект компонента с помощью его конструктора и ссылку на этот объект присвоить переменной TrayIcon1.
Примерно так:
Код:
var
  TrayIcon1: TTrayIcon;
begin
  TrayIcon1:=TTrayIcon.Create(Application);
  TrayIcon1.BalloonHint:='ОШИБКА';
  // и т. д.
И потом, когда объект уже больше не нужен, не забывать его разрушать:
Код:
  TrayIcon1.Free
иначе будут утечки памяти...
Ответить с цитированием