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

Header per colonne finkate su più righe in automatico

Browse Source 
Header per colonne finkate con centratura a scelta


git-svn-id: svn://10.65.10.50/trunk@5452 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-10-27 10:23:23 +00:00
parent f42b7c405e
commit 2ff7eba156
1 changed files with 41 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

48
include/form.cpp
View File

@ -4267,18 +4267,52 @@ bool TForm::genera_intestazioni(
header->destroy_field(k); header->destroy_field(k);
const word items = body->fields(); const word items = body->fields();
TForm_string* s;
for (word j=0;j<items;j++) for (word j=0;j<items;j++)
{// Scans all body items to print, and append header items... {// Scans all body items to print, and append header items...
TForm_item& fi = body->field(j); TForm_item& fi = body->field(j);
if (!fi.shown() || fi.is_section()) if (!fi.shown() || fi.is_section())
continue; continue;
TForm_string* s = new TForm_string(header); char align='\0';
s->id() = -1; if (fi.col_head()[0]=='@')
s->set_x(fi.x()); {
s->y() = y; switch (fi.col_head()[1])
s->set_prompt(fi.col_head()); {
s->temp() = TRUE; case 'C': // centered
header->add_field(s); case 'c':
align='c';
break;
case 'R': // right just
case 'r':
align='r';
break;
default: // left just
align='l';
break;
}
}
TParagraph_string prompts(fi.col_head().mid(align ? 2:0),fi.width());
// Paragraph_string has as many items as lines needed...
for (int c=0;c < prompts.items(); c++)
{
TString p(prompts.get(c));
switch (align)
{
case 'c':
p.center_just(fi.width());
break;
case 'r':
p.right_just(fi.width());
break;
}
s = new TForm_string(header);
s->id() = -1;
s->set_x(fi.x());
s->y() = y+c;
s->set_prompt(p);
s->temp() = TRUE;
header->add_field(s);
}
} }
return TRUE; return TRUE;
} }