The Winamp Remote Control suite
a remote control client and plugin for Winamp 2.x, 5.x
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Pages
CommandF.cpp
Go to the documentation of this file.
1 /*
2 winamp remote control suite �Patrick Michael Martin 2000, 2001, 2002
3 
4 Copyright (C) 2000,2001,2002 Patrick M. Martin
5 
6 This program is free software; you can redistribute it and/or
7 modify it under the terms of the GNU General Public License
8 as published by the Free Software Foundation; either version 2
9 of the License, or (at your option) any later version.
10 
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
15 
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19 
20 Patrick M. Martin may be reached by email at patrickmmartin@gmail.com.
21 */
22 
23 #include <vcl.h>
24 #pragma hdrstop
25 
26 #include "CommandF.h"
27 #include "GlassExtender.h"
28 #include "remoteDM.h"
29 
30 
31 #pragma package(smart_init)
32 #pragma resource "*.dfm"
33 
34 
35 
37 
38 __fastcall TfrmCommands::TfrmCommands(TComponent* Owner)
39  : TForm(Owner)
40 {
41 }
42 
43 void __fastcall TfrmCommands::FormShow(TObject *)
44 {
45  GlassExtender * ge = new GlassExtender(this);
46  if (ge->isCompositionActive())
47  {
48  this->Color = clNone;
49  tbCommands->EdgeInner = esNone;
50  tbCommands->EdgeOuter = esNone;
51  tbCommands->Transparent = true;
52  }
53 }
54 
55 
56 void __fastcall TfrmCommands::FormCreate(TObject *Sender)
57 {
58  dmRemote->registerForm(this);
59 }
60 
61 
62 void __fastcall TfrmCommands::FormDestroy(TObject *Sender)
63 {
64  dmRemote->unRegisterForm(this);
65 }
66 
67