root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level :10.0 440

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
0001394: backup
Descrizione  il cliente Sofind chiede che si possa avere il bottone sfoglia nei backup


git-svn-id: svn://10.65.10.50/trunk@19269 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2009-09-10 09:14:29 +00:00
parent 7501c1913d
commit 2f42721ca2
2 changed files with 13 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
ba/ba2200.cpp
View File

@ -56,7 +56,7 @@ TArchive_mask::TArchive_mask() : TAutomask("ba2200")
values.add(str); values.add(str);
TToken_string& message = *lf.message(k++, TRUE); TToken_string& message = *lf.message(k++, TRUE);
if (isrem && is_real_floppy(str)) if (isrem && is_real_floppy(str))
message.format("DISABLE,%d", F_PATH); message.format("CLEAR,%d", F_PATH);
else else
message.format("ENABLE,%d", F_PATH); message.format("ENABLE,%d", F_PATH);
} }
@ -68,6 +68,15 @@ bool TArchive_mask::on_field_event(TOperable_field& o, TField_event e, long joll
{ {
switch (o.dlg()) 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: case F_PATH:
if (e == fe_modify) if (e == fe_modify)
{ {

4
ba/ba2200.uml
View File

@ -10,9 +10,11 @@ BEGIN
ITEM "C|C:" MESSAGE ENABLE,F_PATH ITEM "C|C:" MESSAGE ENABLE,F_PATH
END END
STRING F_PATH 45 STRING F_PATH 256 45
BEGIN BEGIN
PROMPT 15 1 "Percorso " PROMPT 15 1 "Percorso "
DSELECT
FLAGS "M"
END END
BOOLEAN F_DITTA BOOLEAN F_DITTA