-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathCreateVersionFrm.cpp
More file actions
113 lines (92 loc) · 3.54 KB
/
CreateVersionFrm.cpp
File metadata and controls
113 lines (92 loc) · 3.54 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
/*
Project: DocMan
Module:
Description:
Author: Martin Gäckler
Address: Hofmannsthalweg 14, A-4030 Linz
Web: https://www.gaeckler.at/
Copyright: (c) 1988-2024 Martin Gäckler
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, version 3.
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>.
THIS SOFTWARE IS PROVIDED BY Martin Gäckler, Austria, Linz ``AS IS''
AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR
CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
SUCH DAMAGE.
*/
//---------------------------------------------------------------------------
#include <vcl.h>
#include <gak/directory.h>
#pragma hdrstop
#include "CreateVersionFrm.h"
#include "PermissionsFrm.h"
#include "File.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TVersionCreateForm *VersionCreateForm;
ACTION_ADD_VERSION theCreateVersionAction;
//---------------------------------------------------------------------------
RefhreshType ACTION_ADD_VERSION::perform( PTR_ITEM theItem )
{
PTR_FILE_BASE theFile = theItem;
if( theFile )
{
STRING downloadPath = theFile->getDownloadPath();
VersionCreateForm->OpenDialog->InitialDir = (const char *)downloadPath;
downloadPath += theFile->getName();
if( !isFile( downloadPath ) )
downloadPath = "";
VersionCreateForm->EditFilePath->Text = (const char *)downloadPath;
VersionCreateForm->OpenDialog->FileName = (const char *)downloadPath;
if( VersionCreateForm->ShowModal() == mrOk )
{
theFile->createVersion(
VersionCreateForm->EditFilePath->Text.c_str(),
VersionCreateForm->MemoDescription->Text.c_str()
);
theFile->updateDatabase();
return rtREDRAW;
}
}
return rtNONE;
}
//---------------------------------------------------------------------------
const char *ACTION_ADD_VERSION::getLabel( void ) const
{
return "Add Version...";
}
//---------------------------------------------------------------------------
bool ACTION_ADD_VERSION::acceptItem( THE_ITEM *theItem )
{
doEnterFunctionEx(gakLogging::llDetail, "ACTION_ADD_VERSION::acceptItem");
bool accepted = false;
const THE_FILE_BASE *theFile = dynamic_cast<const THE_FILE_BASE *>(theItem);
if( theFile )
{
accepted = theFile->canCreateVersion() && ACTION_BASE::acceptItem( theItem );
}
return accepted;
}
//---------------------------------------------------------------------------
__fastcall TVersionCreateForm::TVersionCreateForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TVersionCreateForm::ButtonBrowseFileClick(TObject *)
{
if( OpenDialog->Execute() )
EditFilePath->Text = OpenDialog->FileName;
}
//---------------------------------------------------------------------------