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

Corretto MI4229.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3583 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-09-13 07:59:44 +00:00
parent 2af280aebd
commit 6ef9104127
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
sc/sc3100.cpp
View File

@ -217,6 +217,12 @@ bool TForm_EC_editor::cpy_handler(TMask_field& f, KEY k)
TLocalisamfile rfr_to_write(LF_RFORM);
frm.put("CODPROF",dcod); //Cambia il codice del profilo con quello di destinazione e lo scrive
frm.put("DESC",mm.get(F_CDESCD)); // Mette la descrizione
if (scod.empty()) // Se la copia avviene dal profilo standard...
{
frm.put("GRID","+++++++++-|"); // copia anche i parametri di default
frm.put("FONTNAME","Courier New");
frm.put("FONTSIZE",7);
}
if (frm.write() != NOERR)
frm.rewrite();
if (frm.status() != NOERR)