Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > библиотека RxLib


Автор: Antarn 8.12.2006, 23:30
на процедуру сворачивания в трей:
Код

procedure TForm1.ApplicationMinimize(Sender : TObject);
begin
 RxTrayIcon1.Show;

 ShowWindow(Application.Handle,SW_HIDE);

end;

дельфи ругается:
Цитата

 Undeclared identifier: 'RxTrayIcon1'


скажите как правильно установить библиотеку RxLib, чтобы присутствовал данный компонент?
где прописать, какие файлы где должны находится, нужно ли добавлять к uses  и т.д. 

объясните так, чтобы дошло для тех, кто в танке  smile 

(использую Delphi7)

Автор: Romikgy 9.12.2006, 00:04
его в самой дельфи установить сначало надо ! а потом юзать

Автор: Antarn 9.12.2006, 00:13
ну вот я и спрашиваю как в саму дельфи установить..

Автор: Romikgy 9.12.2006, 00:37
ищи файлы dpk и 2 раза мышкой
или bpl и установить компаненты - установить пакет

Автор: Antarn 9.12.2006, 12:12
*.bpl файлов не было. 
*.dpk файлы когда 2 раза мышкой их кликал, что-то думали сначала а потом не находили *.res файлы..

или может я ущербную библиотеку скачал?
может кто-то скинуть сюда нормальную, работающую RxLIb ?

Автор: Poseidon 9.12.2006, 16:46
Цитата(Antarn @  9.12.2006,  12:12 Найти цитируемый пост)
может кто-то скинуть сюда нормальную, работающую RxLIb ? 
 В нашем FAQ есть ссылка

Автор: Antarn 9.12.2006, 21:12
Цитата

В нашем FAQ есть ссылка

http://forum.vingrad.ru/index.php?act=module&module=vingradfaq&target=main_panel&section=712 ни в одной статье нету ссылки на RxLib. 

http://forum.vingrad.ru/index.php?act=module&module=vingradfaq&target=main_panel&section=1033 тоже ничего.

тыкните носом.. а то я не вижу  smile 

Автор: dimazu 9.12.2006, 21:59
Я страраюсь сторонними компонентами не пользоваться,
RX у себя не имею (хотя библиотека хорошая), но ошибка 
мол RES файлов нету - не важная, пусть дельфи сам их создает.  smile 

Если же RX надо только для работы с треем, то есть стандартный
способ, обсосанный почти везде:
Код

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, shellapi, AppEvnts, StdCtrls;

const
  WM_ICONTRAY = WM_USER + 1;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    TrayIconData: TNotifyIconData;
    { Private declarations }
  public
    procedure TrayMessage(var Msg: TMessage); message WM_ICONTRAY;
    { Public declarations }
  end;


var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.TrayMessage(var Msg: TMessage);
begin
  If Msg.lParam =  WM_LBUTTONDOWN then
    begin
      ShowMessage('Left button clicked - let''s SHOW the Form!');
      Form1.Show;
   end;
end;


procedure TForm1.Button1Click(Sender: TObject);
begin
  Form1.Hide;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  with TrayIconData do
  begin
    cbSize := SizeOf(TrayIconData);
    Wnd := Handle;
    uID := 0;
    uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP;
    uCallbackMessage := WM_ICONTRAY;
    hIcon := Application.Icon.Handle;
    StrPCopy(szTip, Application.Title);
  end;

  Shell_NotifyIcon(NIM_ADD, @TrayIconData);
  Button1.Caption:='Hide form';
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  Shell_NotifyIcon(NIM_DELETE, @TrayIconData);
end;

end.



Забыл добавить:
В Source проекта перед Application.Create надо добавить:
Код

Application.ShowMainForm := False;

Автор: Antarn 9.12.2006, 22:24
dimazu, этот (или подобный ему) способ я тоже где-то находил.
спасибо за код, но мне хотелось бы имено средствами библиотеки RxLib.

Автор: BsRu 11.12.2006, 01:10
_http://www.rxlib.ru
Там качаешь все это добро, и патч есть для 7 внрсии, а то у меня без патча не работала под 7 Делфю, в README есть полное описание в установке и т.д.. Юзай.

Автор: gambit 11.12.2006, 21:14
А я скачал патч но delphi ругается
Код

[Фатальная ошибка] MaxMin.pas(185): Could not create output file '..\dcu\d7\MaxMin.dcu'

Что делать

Автор: Romikgy 11.12.2006, 21:57
http://www.torry.net/vcl/packs/huge/rx275d7.zip

или 
Цитата(Antarn @  8.12.2006,  22:30 Найти цитируемый пост)
сворачивания в трей:

http://www.delphi32.com/vcl/2306/download,xid,2306.asp
http://www.devarchive.com/f160.html

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)