win32.so: Makefile
rm -f win32.mak
- $(BCBUILDER)/Bin/bpr2mak win32.bpr -s | sed 's#^LIBPATH = .*#&;$$(RELEASELIBPATH)# ; s#^USERDEFINES = .*#& -DWIN32 -D__PLUGIN__ -D__VLC__ -DMODULE_NAME_IS_win32 -DMODULE_NAME=win32 -DMODULE_PATH=modules_gui_win32_win32#' > win32.mak
+ $(BCBUILDER)/Bin/bpr2mak win32.bpr -s | sed 's#^LIBPATH = .*#&;$$(RELEASELIBPATH)# ; s#^USERDEFINES = .*#& -DMODULE_NAME=win32 -DMODULE_PATH=modules_gui_win32_win32#' > win32.mak
$(BCBUILDER)/Bin/make -f win32.mak -b
-/*****************************************************************************\r
- * about.cpp: The "About" dialog box\r
- *****************************************************************************\r
- * Copyright (C) 2002 VideoLAN\r
- *\r
- * Authors: Olivier Teuliere <ipkiss@via.ecp.fr>\r
- *\r
- * This program is free software; you can redistribute it and/or modify\r
- * it under the terms of the GNU General Public License as published by\r
- * the Free Software Foundation; either version 2 of the License, or\r
- * (at your option) any later version.\r
- *\r
- * This program is distributed in the hope that it will be useful,\r
- * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
- * GNU General Public License for more details.\r
- *\r
- * You should have received a copy of the GNU General Public License\r
- * along with this program; if not, write to the Free Software\r
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.\r
- *****************************************************************************/\r
-\r
-#include <vcl.h>\r
-#pragma hdrstop\r
-\r
-#include <vlc/vlc.h>\r
-#include <vlc/intf.h>\r
-\r
-#include "about.h"\r
-#include "win32_common.h"\r
-\r
-//---------------------------------------------------------------------------\r
-//#pragma package(smart_init)\r
-#pragma resource "*.dfm"\r
-\r
-extern intf_thread_t *p_intfGlobal;\r
-\r
-//---------------------------------------------------------------------------\r
-__fastcall TAboutDlg::TAboutDlg( TComponent* Owner )\r
- : TForm( Owner )\r
-{\r
- Image1->Picture->Icon = p_intfGlobal->p_sys->p_window->Icon;\r
- LabelVersion->Caption = "Version " VERSION;\r
-}\r
-//---------------------------------------------------------------------------\r
-\r
-\r
+/*****************************************************************************
+ * about.cpp: The "About" dialog box
+ *****************************************************************************
+ * Copyright (C) 2002 VideoLAN
+ *
+ * Authors: Olivier Teuliere <ipkiss@via.ecp.fr>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
+ *****************************************************************************/
+
+#include <vcl.h>
+#pragma hdrstop
+
+#include <vlc/vlc.h>
+#include <vlc/intf.h>
+
+#include "about.h"
+#include "misc.h"
+#include "win32_common.h"
+
+//---------------------------------------------------------------------------
+//#pragma package(smart_init)
+#pragma resource "*.dfm"
+
+extern intf_thread_t *p_intfGlobal;
+
+//---------------------------------------------------------------------------
+__fastcall TAboutDlg::TAboutDlg( TComponent* Owner )
+ : TForm( Owner )
+{
+ Image1->Picture->Icon = p_intfGlobal->p_sys->p_window->Icon;
+ LabelVersion->Caption = "Version " VERSION;
+ Translate( this );
+}
+//---------------------------------------------------------------------------
+
PixelsPerInch = 96\r
TextHeight = 13\r
object Label1: TLabel\r
+ Tag = 3\r
Left = 114\r
Top = 18\r
Width = 132\r
ParentFont = False\r
end\r
object Label2: TLabel\r
+ Tag = 3\r
Left = 10\r
Top = 64\r
Width = 267\r
Caption = '(C) Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002'\r
end\r
object Label4: TLabel\r
+ Tag = 3\r
Left = 15\r
Top = 123\r
Width = 253\r
WordWrap = True\r
end\r
object Label3: TLabel\r
+ Tag = 3\r
Left = 30\r
Top = 80\r
Width = 227\r
Height = 49\r
end\r
object Label5: TLabel\r
+ Tag = 3\r
Left = 83\r
Top = 96\r
Width = 121\r
Caption = 'http://www.videolan.org/'\r
end\r
object LabelVersion: TLabel\r
+ Tag = 3\r
Left = 114\r
Top = 40\r
Width = 59\r
Caption = 'Version x.y.z'\r
end\r
object BitBtnOk: TBitBtn\r
+ Tag = 3\r
Left = 64\r
Top = 178\r
Width = 145\r
#include <vlc/intf.h>\r
\r
#include "disc.h"\r
+#include "misc.h";\r
#include "win32_common.h"\r
\r
//---------------------------------------------------------------------------\r
{\r
/* Simulate a click to get the correct device name */\r
RadioGroupTypeClick( RadioGroupType );\r
+ Translate( this );\r
}\r
//---------------------------------------------------------------------------\r
void __fastcall TDiscDlg::FormShow( TObject *Sender )\r
PixelsPerInch = 96\r
TextHeight = 13\r
object LabelDevice: TLabel\r
+ Tag = 3\r
Left = 8\r
Top = 105\r
Width = 63\r
Caption = 'Device name'\r
end\r
object GroupBoxPosition: TGroupBox\r
+ Tag = 3\r
Left = 96\r
Top = 8\r
Width = 153\r
Caption = 'Starting position'\r
TabOrder = 1\r
object LabelTitle: TLabel\r
+ Tag = 3\r
Left = 16\r
Top = 24\r
Width = 20\r
Caption = 'Title'\r
end\r
object LabelChapter: TLabel\r
+ Tag = 3\r
Left = 16\r
Top = 52\r
Width = 37\r
end\r
end\r
object RadioGroupType: TRadioGroup\r
+ Tag = 3\r
Left = 8\r
Top = 8\r
Width = 81\r
OnClick = RadioGroupTypeClick\r
end\r
object BitBtnOk: TBitBtn\r
+ Tag = 3\r
Left = 8\r
Top = 136\r
Width = 113\r
OnClick = BitBtnOkClick\r
end\r
object BitBtnCancel: TBitBtn\r
+ Tag = 3\r
Left = 136\r
Top = 136\r
Width = 113\r
OnClick = BitBtnCancelClick\r
end\r
object EditDevice: TEdit\r
+ Tag = 5\r
Left = 88\r
Top = 101\r
Width = 161\r
#include "preferences.h"\r
#include "messages.h"\r
#include "playlist.h"\r
+#include "misc.h"\r
#include "win32_common.h"\r
\r
#include "netutils.h"\r
Caption = VOUT_TITLE " (Win32 interface)";\r
\r
StringListPref = new TStringList();\r
+ \r
+ Translate( this );\r
}\r
//---------------------------------------------------------------------------\r
__fastcall TMainFrameDlg::~TMainFrameDlg()\r
object MainFrameDlg: TMainFrameDlg\r
- Left = 179\r
- Top = 442\r
+ Left = 285\r
+ Top = 170\r
Width = 541\r
Height = 306\r
BorderIcons = [biSystemMenu, biMinimize]\r
ShowCaptions = True\r
TabOrder = 0\r
object ToolButtonFile: TToolButton\r
+ Tag = 3\r
Left = 0\r
Top = 0\r
Action = OpenFileAction\r
end\r
object ToolButtonDisc: TToolButton\r
+ Tag = 3\r
Left = 39\r
Top = 0\r
Action = OpenDiscAction\r
end\r
object ToolButtonNet: TToolButton\r
+ Tag = 3\r
Left = 78\r
Top = 0\r
Action = NetworkStreamAction\r
Style = tbsSeparator\r
end\r
object ToolButtonBack: TToolButton\r
+ Tag = 3\r
Left = 125\r
Top = 0\r
Action = BackAction\r
end\r
object ToolButtonPlay: TToolButton\r
+ Tag = 3\r
Left = 164\r
Top = 0\r
Action = PlayAction\r
end\r
object ToolButtonPause: TToolButton\r
+ Tag = 3\r
Left = 203\r
Top = 0\r
Action = PauseAction\r
end\r
object ToolButtonStop: TToolButton\r
+ Tag = 3\r
Left = 242\r
Top = 0\r
Action = StopAction\r
end\r
object ToolButtonEject: TToolButton\r
+ Tag = 3\r
Left = 281\r
Top = 0\r
Action = EjectAction\r
Style = tbsSeparator\r
end\r
object ToolButtonSlow: TToolButton\r
+ Tag = 3\r
Left = 328\r
Top = 0\r
Action = SlowAction\r
end\r
object ToolButtonFast: TToolButton\r
+ Tag = 3\r
Left = 367\r
Top = 0\r
Action = FastAction\r
Style = tbsSeparator\r
end\r
object ToolButtonPlaylist: TToolButton\r
+ Tag = 3\r
Left = 414\r
Top = 0\r
Action = PlaylistAction\r
Style = tbsCheck\r
end\r
object ToolButtonPrev: TToolButton\r
+ Tag = 3\r
Left = 453\r
Top = 0\r
Action = PreviousAction\r
end\r
object ToolButtonNext: TToolButton\r
+ Tag = 3\r
Left = 492\r
Top = 0\r
Action = NextAction\r
SimplePanel = True\r
end\r
object GroupBoxFile: TGroupBox\r
+ Tag = 3\r
Left = 0\r
Top = 90\r
Width = 533\r
TabOrder = 2\r
Visible = False\r
object LabelFileName: TLabel\r
+ Tag = 3\r
Left = 2\r
Top = 15\r
Width = 529\r
TabOrder = 3\r
Visible = False\r
object LabelChannel: TLabel\r
+ Tag = 3\r
Left = 288\r
Top = 16\r
Width = 42\r
Caption = 'Channel:'\r
end\r
object LabelServer: TLabel\r
+ Tag = 3\r
Left = 64\r
Top = 16\r
Width = 49\r
Caption = 'No server!'\r
end\r
object ButtonGo: TButton\r
+ Tag = 3\r
Left = 384\r
Top = 10\r
Width = 25\r
TabOrder = 4\r
Visible = False\r
object LabelDisc: TLabel\r
+ Tag = 3\r
Left = 32\r
Top = 11\r
Width = 21\r
Caption = 'Disc'\r
end\r
object LabelTitle: TLabel\r
+ Tag = 3\r
Left = 96\r
Top = 11\r
Width = 23\r
Caption = 'Title:'\r
end\r
object LabelChapter: TLabel\r
+ Tag = 3\r
Left = 296\r
Top = 11\r
Width = 40\r
Caption = '---'\r
end\r
object ButtonTitlePrev: TButton\r
+ Tag = 3\r
Left = 152\r
Top = 8\r
Width = 33\r
TabOrder = 0\r
end\r
object ButtonTitleNext: TButton\r
+ Tag = 3\r
Left = 184\r
Top = 8\r
Width = 33\r
TabOrder = 1\r
end\r
object ButtonChapterPrev: TButton\r
+ Tag = 3\r
Left = 368\r
Top = 8\r
Width = 33\r
TabOrder = 2\r
end\r
object ButtonChapterNext: TButton\r
+ Tag = 3\r
Left = 400\r
Top = 8\r
Width = 33\r
end\r
end\r
object GroupBoxSlider: TGroupBox\r
+ Tag = 3\r
Left = 0\r
Top = 50\r
Width = 533\r
Left = 40\r
Top = 208\r
object MenuFile: TMenuItem\r
+ Tag = 3\r
Caption = '&File'\r
object MenuOpenFile: TMenuItem\r
+ Tag = 3\r
Action = OpenFileAction\r
Caption = 'Open &file...'\r
end\r
object MenuOpenDisc: TMenuItem\r
+ Tag = 3\r
Action = OpenDiscAction\r
Caption = 'Open &disc...'\r
end\r
object MenuNetworkStream: TMenuItem\r
+ Tag = 3\r
Action = NetworkStreamAction\r
Caption = '&Network stream...'\r
end\r
Visible = False\r
end\r
object MenuEjectDisc: TMenuItem\r
+ Tag = 3\r
Action = EjectAction\r
Caption = '&Eject disc'\r
end\r
Caption = '-'\r
end\r
object MenuExit: TMenuItem\r
+ Tag = 3\r
Action = ExitAction\r
end\r
end\r
object MenuView: TMenuItem\r
+ Tag = 3\r
Caption = '&View'\r
object MenuHideinterface: TMenuItem\r
+ Tag = 3\r
Caption = '&Hide interface'\r
Hint = 'Hide the main interface window'\r
OnClick = MenuHideinterfaceClick\r
end\r
object MenuFullscreen: TMenuItem\r
+ Tag = 3\r
Action = FullscreenAction\r
end\r
object N2: TMenuItem\r
Caption = '-'\r
end\r
object MenuProgram: TMenuItem\r
+ Tag = 3\r
Caption = 'Progr&am'\r
Enabled = False\r
Hint = 'Select program'\r
end\r
object MenuTitle: TMenuItem\r
+ Tag = 3\r
Caption = '&Title'\r
Enabled = False\r
Hint = 'Select title'\r
end\r
object MenuChapter: TMenuItem\r
+ Tag = 3\r
Caption = '&Chapter'\r
Enabled = False\r
Hint = 'Select chapter'\r
end\r
object MenuAngle: TMenuItem\r
+ Tag = 3\r
Caption = 'An&gle'\r
Enabled = False\r
Hint = 'Select angle'\r
Caption = '-'\r
end\r
object MenuPlaylist: TMenuItem\r
+ Tag = 3\r
Action = PlaylistAction\r
Caption = '&Playlist...'\r
end\r
object MenuMessages: TMenuItem\r
+ Tag = 3\r
Action = MessagesAction\r
end\r
end\r
object MenuSettings: TMenuItem\r
+ Tag = 3\r
Caption = '&Settings'\r
object MenuAudio: TMenuItem\r
+ Tag = 3\r
Caption = '&Audio'\r
Enabled = False\r
Hint = 'Select audio language'\r
end\r
object MenuSubtitles: TMenuItem\r
+ Tag = 3\r
Caption = '&Subtitles'\r
Enabled = False\r
Hint = 'Select subtitles language'\r
Caption = '-'\r
end\r
object MenuPreferences: TMenuItem\r
+ Tag = 3\r
Action = PreferencesAction\r
end\r
end\r
object MenuHelp: TMenuItem\r
+ Tag = 3\r
Caption = '&Help'\r
object MenuAbout: TMenuItem\r
+ Tag = 3\r
Action = AboutAction\r
end\r
end\r
Left = 72\r
Top = 208\r
object PopupClose: TMenuItem\r
+ Tag = 3\r
Caption = '&Close this popup'\r
OnClick = PopupCloseClick\r
end\r
object PopupToggleInterface: TMenuItem\r
+ Tag = 3\r
Caption = '&Toggle interface'\r
OnClick = PopupToggleInterfaceClick\r
end\r
Caption = '-'\r
end\r
object Control1: TMenuItem\r
+ Tag = 3\r
Caption = 'Control'\r
object PopupBack: TMenuItem\r
+ Tag = 3\r
Action = BackAction\r
end\r
object PopupPlay: TMenuItem\r
+ Tag = 3\r
Action = PlayAction\r
end\r
object PopupPause: TMenuItem\r
+ Tag = 3\r
Action = PauseAction\r
end\r
object PopupStop: TMenuItem\r
+ Tag = 3\r
Action = StopAction\r
end\r
object PopupSlow: TMenuItem\r
+ Tag = 3\r
Action = SlowAction\r
end\r
object PopupFast: TMenuItem\r
+ Tag = 3\r
Action = FastAction\r
end\r
object N5: TMenuItem\r
Caption = '-'\r
end\r
object PopupPrev: TMenuItem\r
+ Tag = 3\r
Action = PreviousAction\r
end\r
object PopupNext: TMenuItem\r
+ Tag = 3\r
Action = NextAction\r
end\r
object PopupJump: TMenuItem\r
+ Tag = 3\r
Caption = '&Jump...'\r
OnClick = PopupJumpClick\r
end\r
Caption = '-'\r
end\r
object PopupFullscreen: TMenuItem\r
+ Tag = 3\r
Action = FullscreenAction\r
ShortCut = 70\r
end\r
end\r
object PopupNavigation: TMenuItem\r
+ Tag = 3\r
Caption = 'Navigation'\r
end\r
object PopupProgram: TMenuItem\r
+ Tag = 3\r
Caption = 'Program'\r
end\r
object PopupAudio: TMenuItem\r
+ Tag = 3\r
Caption = 'Audio'\r
end\r
object PopupSubtitles: TMenuItem\r
+ Tag = 3\r
Caption = 'Subtitles'\r
end\r
object N10: TMenuItem\r
Caption = '-'\r
end\r
object PopupPlaylist: TMenuItem\r
+ Tag = 3\r
Action = PlaylistAction\r
Caption = 'Playlist...'\r
end\r
object PopupPreferences: TMenuItem\r
+ Tag = 3\r
Action = PreferencesAction\r
end\r
object PopupFile: TMenuItem\r
+ Tag = 3\r
Caption = 'New stream'\r
object PopupOpenFile: TMenuItem\r
+ Tag = 3\r
Action = OpenFileAction\r
Caption = 'Open file...'\r
end\r
object PopupOpenDisc: TMenuItem\r
+ Tag = 3\r
Action = OpenDiscAction\r
Caption = 'Open disc...'\r
end\r
object PopupNetworkStream: TMenuItem\r
+ Tag = 3\r
Action = NetworkStreamAction\r
Caption = 'Network stream...'\r
end\r
Caption = '-'\r
end\r
object PopupExit: TMenuItem\r
+ Tag = 3\r
Action = ExitAction\r
end\r
end\r
Left = 168\r
Top = 208\r
object OpenFileAction: TAction\r
+ Tag = 3\r
Category = 'Menu'\r
Caption = 'File'\r
Hint = 'Open a file'\r
OnExecute = OpenFileActionExecute\r
end\r
object OpenDiscAction: TAction\r
+ Tag = 3\r
Category = 'Menu'\r
Caption = 'Disc'\r
Hint = 'Open a DVD or VCD'\r
OnExecute = OpenDiscActionExecute\r
end\r
object NetworkStreamAction: TAction\r
+ Tag = 3\r
Category = 'Menu'\r
Caption = 'Net'\r
Hint = 'Open a network stream'\r
OnExecute = NetworkStreamActionExecute\r
end\r
object BackAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Back'\r
Enabled = False\r
OnExecute = BackActionExecute\r
end\r
object PlayAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Play'\r
Hint = 'Play stream'\r
OnExecute = PlayActionExecute\r
end\r
object PauseAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Pause'\r
Enabled = False\r
OnExecute = PauseActionExecute\r
end\r
object StopAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Stop'\r
Enabled = False\r
OnExecute = StopActionExecute\r
end\r
object EjectAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Eject'\r
Enabled = False\r
OnExecute = EjectActionExecute\r
end\r
object SlowAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Slow'\r
Enabled = False\r
OnExecute = SlowActionExecute\r
end\r
object FastAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Fast'\r
Enabled = False\r
OnExecute = FastActionExecute\r
end\r
object PreviousAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Prev'\r
Hint = 'Previous file'\r
OnExecute = PreviousActionExecute\r
end\r
object NextAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Next'\r
Hint = 'Next file'\r
OnExecute = NextActionExecute\r
end\r
object PlaylistAction: TAction\r
+ Tag = 3\r
Category = 'Menu'\r
Caption = 'Playlist'\r
Hint = 'Open the playlist window'\r
OnExecute = PlaylistActionExecute\r
end\r
object ExitAction: TAction\r
+ Tag = 3\r
Category = 'Menu'\r
Caption = 'Exit'\r
Hint = 'Exit the program'\r
OnExecute = ExitActionExecute\r
end\r
object FullscreenAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Fullscreen'\r
Hint = 'Toggle fullscreen'\r
OnExecute = FullscreenActionExecute\r
end\r
object PreferencesAction: TAction\r
+ Tag = 3\r
Category = 'Menu'\r
Caption = 'Preferences...'\r
Hint = 'Configure the application'\r
OnExecute = PreferencesActionExecute\r
end\r
object MessagesAction: TAction\r
+ Tag = 3\r
Category = 'Menu'\r
Caption = 'Messages...'\r
Hint = 'Open the messages window'\r
OnExecute = MessagesActionExecute\r
end\r
object AboutAction: TAction\r
+ Tag = 3\r
Category = 'Menu'\r
Caption = 'About...'\r
Hint = 'About this application'\r
OnExecute = AboutActionExecute\r
end\r
object PrevTitleAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Prev'\r
Hint = 'Jump to previous title'\r
OnExecute = PrevTitleActionExecute\r
end\r
object NextTitleAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Next'\r
Hint = 'Jump to next title'\r
OnExecute = NextTitleActionExecute\r
end\r
object PrevChapterAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Prev'\r
Hint = 'Jump to previous chapter'\r
OnExecute = PrevChapterActionExecute\r
end\r
object NextChapterAction: TAction\r
+ Tag = 3\r
Category = 'Control'\r
Caption = 'Next'\r
Hint = 'Jump to next chapter'\r
void __fastcall StopActionExecute( TObject *Sender );\r
void __fastcall SlowActionExecute( TObject *Sender );\r
void __fastcall FastActionExecute( TObject *Sender );\r
+ void __fastcall EjectActionExecute( TObject *Sender );\r
void __fastcall PlaylistActionExecute( TObject *Sender );\r
- void __fastcall ExitActionExecute( TObject *Sender );\r
void __fastcall PreviousActionExecute( TObject *Sender );\r
void __fastcall NextActionExecute( TObject *Sender );\r
void __fastcall FullscreenActionExecute( TObject *Sender );\r
void __fastcall PreferencesActionExecute( TObject *Sender );\r
void __fastcall MessagesActionExecute( TObject *Sender );\r
void __fastcall AboutActionExecute( TObject *Sender );\r
- void __fastcall EjectActionExecute( TObject *Sender );\r
+ void __fastcall ExitActionExecute( TObject *Sender );\r
void __fastcall PrevTitleActionExecute( TObject *Sender );\r
void __fastcall NextTitleActionExecute( TObject *Sender );\r
void __fastcall PrevChapterActionExecute( TObject *Sender );\r
#include <vlc/vlc.h>\r
#include <vlc/intf.h>\r
\r
-#include "win32_common.h"\r
#include "messages.h"\r
+#include "misc.h"\r
+#include "win32_common.h"\r
\r
//---------------------------------------------------------------------------\r
#pragma package(smart_init)\r
: TForm( Owner )\r
{\r
Icon = p_intfGlobal->p_sys->p_window->Icon;\r
+ Translate( this );\r
}\r
//---------------------------------------------------------------------------\r
void __fastcall TMessagesDlg::ButtonOKClick( TObject *Sender )\r
WantReturns = False\r
end\r
object ButtonOK: TButton\r
+ Tag = 3\r
Left = 144\r
Top = 437\r
Width = 145\r
--- /dev/null
+/*****************************************************************************\r
+ * misc.cpp: miscellaneous functions.\r
+ *****************************************************************************\r
+ * Copyright (C) 2002 VideoLAN\r
+ *\r
+ * Authors: Olivier Teuliere <ipkiss@via.ecp.fr>\r
+ *\r
+ * This program is free software; you can redistribute it and/or modify\r
+ * it under the terms of the GNU General Public License as published by\r
+ * the Free Software Foundation; either version 2 of the License, or\r
+ * (at your option) any later version.\r
+ *\r
+ * This program is distributed in the hope that it will be useful,\r
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
+ * GNU General Public License for more details.\r
+ *\r
+ * You should have received a copy of the GNU General Public License\r
+ * along with this program; if not, write to the Free Software\r
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.\r
+ *****************************************************************************/\r
+\r
+#include <vcl.h>\r
+#pragma hdrstop\r
+\r
+#include "misc.h"\r
+\r
+/****************************************************************************\r
+ * This function replaces "Hint", "Caption" and "Text" properties of each\r
+ * component of the form by the appropriate translation.\r
+ ****************************************************************************/\r
+void __fastcall Translate( TForm *Form )\r
+{\r
+#if 0\r
+ Form->Hint = N_( Form->Hint );\r
+ Form->Caption = N_( Form->Caption );\r
+\r
+ int i;\r
+ for( i = 0; i < Form->ComponentCount; i++ )\r
+ {\r
+ // Does this component need a translation ?\r
+ if( Form->Components[i]->Tag > 0 )\r
+ {\r
+ TComponent *Component = Form->Components[i];\r
+\r
+ // Hint property\r
+ if( Component->Tag & 1 )\r
+ {\r
+ if( Component->InheritsFrom( __classid( TControl ) ) )\r
+ {\r
+ TControl *Object = (TControl *) Component;\r
+ Object->Hint = N_( Object->Hint );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TMenuItem ) ) )\r
+ {\r
+ TMenuItem *Object = (TMenuItem *) Component;\r
+ Object->Hint = N_( Object->Hint );\r
+ }\r
+ }\r
+\r
+ // Caption property\r
+ if( Component->Tag & 2 )\r
+ {\r
+ if( Component->InheritsFrom( __classid( TMenuItem ) ) )\r
+ {\r
+ TMenuItem *Object = (TMenuItem *) Component;\r
+ Object->Caption = N_( Object->Caption );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TLabel ) ) )\r
+ {\r
+ TLabel *Object = (TLabel *) Component;\r
+ Object->Caption = N_( Object->Caption );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TButton ) ) )\r
+ {\r
+ TButton *Object = (TButton *) Component;\r
+ Object->Caption = N_( Object->Caption );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TToolButton ) ) )\r
+ {\r
+ TToolButton *Object = (TToolButton *) Component;\r
+ Object->Caption = N_( Object->Caption );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TRadioButton ) ) )\r
+ {\r
+ TRadioButton *Object = (TRadioButton *) Component;\r
+ Object->Caption = N_( Object->Caption );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TCheckBox ) ) )\r
+ {\r
+ TCheckBox *Object = (TCheckBox *) Component;\r
+ Object->Caption = N_( Object->Caption );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TRadioGroup ) ) )\r
+ {\r
+ TRadioGroup *Object = (TRadioGroup *) Component;\r
+ Object->Caption = N_( Object->Caption );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TGroupBox ) ) )\r
+ {\r
+ TGroupBox *Object = (TGroupBox *) Component;\r
+ Object->Caption = N_( Object->Caption );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TTabSheet ) ) )\r
+ {\r
+ TTabSheet *Object = (TTabSheet *) Component;\r
+ Object->Caption = N_( Object->Caption );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TListView ) ) )\r
+ {\r
+ TListView *Object = (TListView *) Component;\r
+ int iCol;\r
+ for( iCol = 0; iCol < Object->Columns->Count; iCol++ )\r
+ Object->Columns->Items[iCol]->Caption =\r
+ N_( Object->Columns->Items[iCol]->Caption );\r
+ }\r
+ }\r
+\r
+ // Text property\r
+ if( Component->Tag & 4 )\r
+ {\r
+ if( Component->InheritsFrom( __classid( TEdit ) ) )\r
+ {\r
+ TEdit *Object = (TEdit *) Component;\r
+ Object->Text = N_( Object->Text );\r
+ }\r
+ else if( Component->InheritsFrom( __classid( TComboBox ) ) )\r
+ {\r
+ TComboBox *Object = (TComboBox *) Component;\r
+ Object->Text = N_( Object->Text );\r
+ }\r
+ }\r
+ }\r
+ }\r
+#endif\r
+}\r
+ \r
--- /dev/null
+/*****************************************************************************\r
+ * misc.h: Prototype for main window\r
+ *****************************************************************************\r
+ * Copyright (C) 2002 VideoLAN\r
+ *\r
+ * Authors: Olivier Teuliere <ipkiss@via.ecp.fr>\r
+ *\r
+ * This program is free software; you can redistribute it and/or modify\r
+ * it under the terms of the GNU General Public License as published by\r
+ * the Free Software Foundation; either version 2 of the License, or\r
+ * (at your option) any later version.\r
+ * \r
+ * This program is distributed in the hope that it will be useful,\r
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
+ * GNU General Public License for more details.\r
+ *\r
+ * You should have received a copy of the GNU General Public License\r
+ * along with this program; if not, write to the Free Software\r
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.\r
+ *****************************************************************************/\r
+\r
+#ifndef miscH\r
+#define miscH\r
+\r
+void __fastcall Translate( TForm *Form );\r
+\r
+#endif\r
#include <vlc/intf.h>\r
\r
#include "network.h"\r
+#include "misc.h"\r
#include "win32_common.h"\r
\r
#include "netutils.h"\r
}\r
\r
SpinEditCSPort->Value = config_GetInt( p_intfGlobal, "channel-port" );\r
+\r
+ Translate( this );\r
}\r
//---------------------------------------------------------------------------\r
void __fastcall TNetworkDlg::FormShow( TObject *Sender )\r
PixelsPerInch = 96\r
TextHeight = 13\r
object BitBtnOk: TBitBtn\r
+ Tag = 3\r
Left = 40\r
Top = 168\r
Width = 177\r
Kind = bkOK\r
end\r
object BitBtnCancel: TBitBtn\r
+ Tag = 3\r
Left = 256\r
Top = 168\r
Width = 177\r
Kind = bkCancel\r
end\r
object GroupBoxMode: TGroupBox\r
+ Tag = 3\r
Left = 8\r
Top = 8\r
Width = 465\r
Caption = 'Network mode'\r
TabOrder = 2\r
object LabelUDPPort: TLabel\r
+ Tag = 3\r
Left = 148\r
Top = 26\r
Width = 22\r
Caption = 'Port:'\r
end\r
object LabelMulticastPort: TLabel\r
+ Tag = 3\r
Left = 364\r
Top = 54\r
Width = 22\r
Enabled = False\r
end\r
object LabelCSPort: TLabel\r
+ Tag = 3\r
Left = 364\r
Top = 82\r
Width = 22\r
Enabled = False\r
end\r
object LabelMulticastAddress: TLabel\r
+ Tag = 3\r
Left = 139\r
Top = 54\r
Width = 41\r
Enabled = False\r
end\r
object LabelCSAddress: TLabel\r
+ Tag = 3\r
Left = 139\r
Top = 82\r
Width = 41\r
Enabled = False\r
end\r
object LabelHTTPURL: TLabel\r
+ Tag = 3\r
Left = 147\r
Top = 110\r
Width = 25\r
Enabled = False\r
end\r
object RadioButtonUDP: TRadioButton\r
+ Tag = 3\r
Left = 16\r
Top = 24\r
Width = 97\r
OnEnter = RadioButtonUDPEnter\r
end\r
object RadioButtonMulticast: TRadioButton\r
+ Tag = 3\r
Left = 16\r
Top = 52\r
Width = 97\r
OnEnter = RadioButtonMulticastEnter\r
end\r
object RadioButtonCS: TRadioButton\r
+ Tag = 3\r
Left = 16\r
Top = 80\r
Width = 97\r
OnEnter = RadioButtonCSEnter\r
end\r
object RadioButtonHTTP: TRadioButton\r
+ Tag = 3\r
Left = 16\r
Top = 108\r
Width = 97\r
OnEnter = RadioButtonHTTPEnter\r
end\r
object ComboBoxMulticastAddress: TComboBox\r
+ Tag = 5\r
Left = 184\r
Top = 50\r
Width = 161\r
TabOrder = 5\r
end\r
object ComboBoxCSAddress: TComboBox\r
+ Tag = 5\r
Left = 184\r
Top = 78\r
Width = 161\r
'vlcs')\r
end\r
object EditHTTPURL: TEdit\r
+ Tag = 5\r
Left = 184\r
Top = 106\r
Width = 265\r
#include <vlc/intf.h>\r
\r
#include "playlist.h"\r
+#include "misc.h"\r
#include "win32_common.h"\r
\r
//---------------------------------------------------------------------------\r
: TForm( Owner )\r
{\r
Icon = p_intfGlobal->p_sys->p_window->Icon;\r
+ Translate( this );\r
}\r
//---------------------------------------------------------------------------\r
char * __fastcall TPlaylistDlg::rindex( char *s, char c )\r
object PlaylistDlg: TPlaylistDlg\r
- Left = 162\r
- Top = 364\r
+ Left = 346\r
+ Top = 231\r
Width = 335\r
Height = 436\r
Caption = 'Playlist'\r
PixelsPerInch = 96\r
TextHeight = 13\r
object BitBtnOk: TBitBtn\r
+ Tag = 3\r
Left = 76\r
Top = 356\r
Width = 176\r
OnClick = BitBtnOkClick\r
end\r
object ListViewPlaylist: TListView\r
+ Tag = 3\r
Left = 11\r
Top = 10\r
Width = 305\r
Left = 8\r
Top = 352\r
object MenuAdd: TMenuItem\r
+ Tag = 3\r
Caption = '&Add'\r
object MenuAddFile: TMenuItem\r
+ Tag = 3\r
Caption = '&File'\r
OnClick = MenuAddFileClick\r
end\r
object MenuAddDisc: TMenuItem\r
+ Tag = 3\r
Caption = '&Disc'\r
OnClick = MenuAddDiscClick\r
end\r
object MenuAddNet: TMenuItem\r
+ Tag = 3\r
Caption = '&Network'\r
OnClick = MenuAddNetClick\r
end\r
object MenuAddUrl: TMenuItem\r
+ Tag = 3\r
Caption = '&Url'\r
Enabled = False\r
OnClick = MenuAddUrlClick\r
end\r
end\r
object MenuDelete: TMenuItem\r
+ Tag = 3\r
Caption = '&Delete'\r
object MenuDeleteAll: TMenuItem\r
+ Tag = 3\r
Action = DeleteAllAction\r
end\r
object MenuDeleteSelected: TMenuItem\r
+ Tag = 3\r
Action = DeleteSelectionAction\r
Caption = '&Selection'\r
end\r
end\r
object MenuSelection: TMenuItem\r
+ Tag = 3\r
Caption = '&Selection'\r
object MenuSelectionCrop: TMenuItem\r
+ Tag = 3\r
Action = CropSelectionAction\r
end\r
object MenuSelectionInvert: TMenuItem\r
+ Tag = 3\r
Action = InvertSelectionAction\r
end\r
end\r
Left = 40\r
Top = 352\r
object PopupPlay: TMenuItem\r
+ Tag = 3\r
Action = PlayStreamAction\r
end\r
object N1: TMenuItem\r
Caption = '-'\r
end\r
object PopupInvertSelection: TMenuItem\r
+ Tag = 3\r
Action = InvertSelectionAction\r
Caption = '&Invert selection'\r
end\r
object PopupCropSelection: TMenuItem\r
+ Tag = 3\r
Action = CropSelectionAction\r
Caption = '&Crop selection'\r
end\r
Caption = '-'\r
end\r
object PopupDeleteSelected: TMenuItem\r
+ Tag = 3\r
Action = DeleteSelectionAction\r
Caption = '&Delete selection'\r
end\r
object PopupDeleteAll: TMenuItem\r
+ Tag = 3\r
Action = DeleteAllAction\r
Caption = 'Delete &all'\r
end\r
Left = 264\r
Top = 352\r
object InvertSelectionAction: TAction\r
+ Tag = 3\r
Caption = 'Invert'\r
Hint = 'Invert selection'\r
OnExecute = InvertSelectionActionExecute\r
end\r
object CropSelectionAction: TAction\r
+ Tag = 3\r
Caption = 'Crop'\r
Hint = 'Crop selection'\r
OnExecute = CropSelectionActionExecute\r
end\r
object DeleteSelectionAction: TAction\r
+ Tag = 3\r
Caption = 'Delete'\r
Hint = 'Delete selection'\r
OnExecute = DeleteSelectionActionExecute\r
end\r
object DeleteAllAction: TAction\r
+ Tag = 3\r
Caption = 'All'\r
Hint = 'Delete all items'\r
OnExecute = DeleteAllActionExecute\r
end\r
object PlayStreamAction: TAction\r
+ Tag = 3\r
Caption = 'Play'\r
Hint = 'Play the selected stream'\r
OnExecute = PlayStreamActionExecute\r
USEUNIT("win32.cpp");\r
-USEUNIT("intf_win32.cpp");\r
USEFORM("mainframe.cpp", MainFrameDlg);\r
USEFORM("network.cpp", NetworkDlg);\r
USEFORM("playlist.cpp", PlaylistDlg);\r
USE("win32_common.h", File);\r
USEUNIT("menu.cpp");\r
USEFORM("messages.cpp", MessagesDlg);\r
+USEUNIT("misc.cpp");\r
//---------------------------------------------------------------------------\r
This file is used by the project manager only and should be treated like the project file\r
-\rDllEntryPoint
\ No newline at end of file
+\rDllEntryPoint
<MACROS>\r
<VERSION value="BCB.05.03"/>\r
<PROJECT value="win32.so"/>\r
- <OBJFILES value="win32.obj mainframe.obj network.obj playlist.obj \r
- preferences.obj about.obj disc.obj control.obj menu.obj messages.obj"/>\r
+ <OBJFILES value="win32.obj mainframe.obj network.obj playlist.obj preferences.obj about.obj \r
+ disc.obj control.obj menu.obj messages.obj misc.obj"/>\r
<RESFILES value=""/>\r
<DEFFILE value=""/>\r
<RESDEPEN value="$(RESFILES) mainframe.dfm network.dfm playlist.dfm preferences.dfm \r
<DEBUGLIBPATH value="$(BCB)\lib\debug"/>\r
<RELEASELIBPATH value="$(BCB)\lib\release"/>\r
<LINKER value="tlink32"/>\r
- <USERDEFINES value="_DEBUG"/>\r
+ <USERDEFINES value="_DEBUG;WIN32;__VLC__;__PLUGIN__;MODULE_NAME_IS_win32"/>\r
<SYSDEFINES value="NO_STRICT"/>\r
<MAINSOURCE value="win32.bpf"/>\r
<INCLUDEPATH value="..\..\win32;$(BCB)\include;$(BCB)\include\vcl;..\..\..\include;..\..\.."/>\r
Comments=\r
\r
[HistoryLists\hlIncludePath]\r
-Count1=\r
-Item0=..\win32;..\..\win32;$(BCB)\include;$(BCB)\include\vcl;..\..\include;..\..\src\misc\r
+Count=1\r
+Item0=..\..\win32;$(BCB)\include;$(BCB)\include\vcl;..\..\..\include;..\..\src\misc\r
\r
[HistoryLists\hlLibraryPath]\r
-Count=1\r
-Item0=..\win32;..\..\win32;$(BCB)\lib\obj;$(BCB)\lib\r
+Count=2\r
+Item0=..\..\win32;$(BCB)\lib\obj;$(BCB)\lib\r
+Item1=..\win32;..\..\win32;$(BCB)\lib\obj;$(BCB)\lib\r
\r
[HistoryLists\hlDebugSourcePath]\r
Count=1\r
Item0=$(BCB)\source\vcl\r
\r
[HistoryLists\hlConditionals]\r
-Count=1\r
-Item0=_DEBUG\r
+Count=5\r
+Item0=_DEBUG;WIN32;__VLC__;__PLUGIN__;MODULE_NAME_IS_win32\r
+Item1=_DEBUG;WIN32;__VLC__;__PLUGIN__;MODULE_NAME_IS_win32;MODULE_NAME=win32;MODULE_PATH=modules_gui_win32_win32\r
+Item2=_DEBUG;__VLC__;__PLUGIN__;MODULE_NAME_IS_win32;MODULE_NAME=win32;MODULE_PATH=modules_gui_win32_win32\r
+Item3=_DEBUG;__VLC__;__PLUGIN__\r
+Item4=_DEBUG\r
\r
[Debugging]\r
DebugSourceDirs=$(BCB)\source\vcl\r
ProjectLang=\r
RootDir=\r
</IDEOPTIONS>\r
-</PROJECT>\r
+</PROJECT>
\ No newline at end of file