Patch level : 10.0 500

Files correlati     : ba2 ba2200.msk
Ricompilazione Demo : [ ]
Commento            :
0001460: 001668 - salvataggio su unità esterna
patch 438 - se faccio un backup su unità diversa da C esce il messaggio riportato nell'allegato.


git-svn-id: svn://10.65.10.50/trunk@19572 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2009-11-04 14:40:51 +00:00
parent bbaf613496
commit f659503802
2 changed files with 18 additions and 13 deletions

View File

@ -10,6 +10,7 @@
#include "ba2200.h"
#include "ba2201.h"
#include <user.h>
#include <nditte.h>
struct TAFile_info : public TObject
@ -68,16 +69,18 @@ bool TArchive_mask::on_field_event(TOperable_field& o, TField_event e, long joll
{
switch (o.dlg())
{
case F_FLOPPY:
if (e == fe_modify)
{
const TString& path = get(F_PATH);
const TString& curr = o.get();
if (!path.starts_with(curr))
set(F_PATH, curr);
}
break;
case F_PATH:
if (e == fe_button)
{
TFilename path = get(F_FLOPPY); path << SLASH; path.add(o.get());
DIRECTORY dir; xvt_fsys_convert_str_to_dir(path, &dir);
if (xvt_dm_post_dir_sel(&dir) == FL_OK)
{
xvt_fsys_convert_dir_to_str(&dir, path.get_buffer(), path.size());
o.set(path);
e = fe_modify;
}
}
if (e == fe_modify)
{
TFilename path = o.get();
@ -86,6 +89,9 @@ bool TArchive_mask::on_field_event(TOperable_field& o, TField_event e, long joll
set(F_FLOPPY, path.left(2));
o.set(path.mid(2));
}
path = get(F_FLOPPY); path << SLASH; path.add(o.get());
if (!path.exist())
return error_box(FR("Percorso non valido: %s"), (const char*)path);
}
break;
case F_DITTA:
@ -126,8 +132,8 @@ bool TArchive_app::create()
utenti.open(_excllock);
for (int err = utenti.first(); err == NOERR; err = utenti.next())
{
const TString16 u = utenti.get("USERNAME");
if (u != user() && utenti.get_bool("CONNECTED"))
const TString& u = utenti.get(USR_USERNAME);
if (u != user() && utenti.get_bool(USR_CONNECTED))
#ifdef DBG
ok = yesno_box("L'archiviazione non puo' essere effettuata\nse ci sono altri utenti collegati (%s)", (const char*)u);
#else

View File

@ -13,8 +13,7 @@ END
STRING F_PATH 256 45
BEGIN
PROMPT 15 1 "Percorso "
DSELECT
FLAGS "M"
FLAGS "B"
END
BOOLEAN F_DITTA