static DialoG CreateCutoffsDialog (GrouP g, Uint2 rows, Int2 spacing,
Boolean flagIsMatrix)
{
EndPointsDialogPtr epp;
GrouP g1, c, c1;
PrompT es, ee, em;
TagListPtr tlp;
Uint2 columns;
c = HiddenGroup (g, 0 , 0, NULL);
epp = (EndPointsDialogPtr) MemNew (sizeof (EndPointsDialog));
if (epp != NULL)
{
SetObjectExtra (c, epp, CleanupCutoffProc);
epp->dialog = (DialoG) c;
epp->todialog = EndPointValNodeToEndPointDialog;
epp->fromdialog = EndPointDialogToEndPointValNode;
epp->testdialog = NULL;
epp->dialogmessage = NULL;
g1 = HiddenGroup (c, -1, 0, NULL);
SetGroupSpacing (g1, 4, 2);
if (flagIsMatrix)
c1 = HiddenGroup (g1, 3, 0, NULL);
else
c1 = HiddenGroup (g1, 2, 0, NULL);
SetGroupSpacing (c1, spacing, spacing);
es = StaticPrompt (c1, "Start", 0, 0, programFont, 'c');
ee = StaticPrompt (c1, "End", 0, 0, programFont, 'c');
if (flagIsMatrix)
{
em = StaticPrompt (c1, "Strand", 0, 0, programFont, 'c');
columns = 3;
ep_t = ep_types_m;
ep_w = ep_width_m;
}
else
{
columns = 2;
ep_t = ep_types_f;
ep_w = ep_width_f;
}
epp->dep = CreateTagListDialog (g1, rows, columns, spacing,
ep_t, ep_w, NULL,
EndPointToDialog,
DialogToEndPoint);
tlp = (TagListPtr) GetObjectExtra (epp->dep);
if (tlp != NULL)
{
AlignObjects (ALIGN_JUSTIFY, (HANDLE) tlp->control[0],
(HANDLE) es, NULL);
AlignObjects (ALIGN_JUSTIFY, (HANDLE) tlp->control[1],
(HANDLE) ee, NULL);
if (flagIsMatrix)
AlignObjects (ALIGN_JUSTIFY, (HANDLE) tlp->control[2],
(HANDLE) em, NULL);
}
}
return (DialoG) c;
}
NLM_EXTERN DialoG CommentSetDialog (GrouP h)
{
CommentSetDlgPtr dlg;
GrouP p;
dlg = (CommentSetDlgPtr) MemNew (sizeof (CommentSetDlgData));
if (dlg == NULL)
{
return NULL;
}
p = HiddenGroup (h, -1, 0, NULL);
SetObjectExtra (p, dlg, CleanupCommentSetDialog);
dlg->dialog = (DialoG) p;
dlg->todialog = CommentSetToDialog;
dlg->fromdialog = CommentSetFromDialog;
SetupCommentSetDialogFont (dlg);
dlg->rule_list_dlg = DocumentPanel (p, stdCharWidth * 50, stdLineHeight * 12);
SetObjectExtra (dlg->rule_list_dlg, dlg, NULL);
SetDocProcs (dlg->rule_list_dlg, ClickRulesDoc, NULL, NULL, NULL);
SetDocShade (dlg->rule_list_dlg, NULL, NULL, RuleHighlight, NULL);
dlg->rule_editor = CommentRuleDialog (p, UpdateRuleList, dlg);
AlignObjects (ALIGN_CENTER, (HANDLE) dlg->rule_list_dlg, (HANDLE) dlg->rule_editor, NULL);
return (DialoG) p;
}
NLM_EXTERN void LaunchCommentRulesEditor (IteM i)
{
BaseFormPtr bfp;
WindoW w;
DialoG d;
CommentSetDlgPtr dlg;
GrouP h, c;
MenU m;
ButtoN b;
#ifdef WIN_MAC
bfp = currentFormDataPtr;
#else
bfp = GetObjectExtra (i);
#endif
if (bfp == NULL) return;
dlg = (CommentSetDlgPtr) MemNew (sizeof (CommentSetDlgData));
if (dlg == NULL) return;
w = FixedWindow (-50, -33, -10, -10, "Comment Rules Editor", StdCloseWindowProc);
#if 0
m = PulldownMenu (w, "File");
FormCommandItem (m, "Open", (BaseFormPtr)f, VIB_MSG_OPEN);
FormCommandItem (m, "Import", (BaseFormPtr)f, VIB_MSG_IMPORT);
FormCommandItem (m, "Save", (BaseFormPtr)f, VIB_MSG_SAVE);
FormCommandItem (m, "Save As", (BaseFormPtr)f, VIB_MSG_SAVE_AS);
SeparatorItem (m);
FormCommandItem (m, "Quit", (BaseFormPtr)f, VIB_MSG_QUIT);
m = PulldownMenu (w, "Edit");
FormCommandItem (m, "Copy All to Clipboard", (BaseFormPtr) f, VIB_MSG_COPY);
#endif
h = HiddenGroup (w, -1, 0, NULL);
SetGroupSpacing (h, 10, 10);
d = CommentSetDialog (h);
dlg = GetObjectExtra (d);
PointerToDialog (d, LoadCommentRuleSet());
c = HiddenGroup (h, 3, 0, NULL);
b = PushButton (c, "Accept", SaveRuleChanges);
SetObjectExtra (b, d, NULL);
PushButton (c, "Cancel", StdCancelButtonProc);
AlignObjects (ALIGN_CENTER, (HANDLE) d, (HANDLE) c, NULL);
Show (w);
}
void DoReset(HWND hDlg, LPALIGNOBJECTS_PARMS lpAlignParms)
{
RECT uRect;
LPIMAGE lpImage = GetActiveImage();
LPRECT pRect;
LPOBJECT lpObject;
if(!lpImage)
return;
HWND hWnd = GetDlgItem(hDlg, IDC_ALIGN_GRID);
int x,y,i, wind;
RECT cRect;
for( i = 0, wind = GW_CHILD; i < ALIGN_NUM_OBJECTS; i++, wind = GW_HWNDNEXT )
{
hWnd = GetWindow( hWnd, wind );
GetClientRect( hWnd, &cRect );
cRect.right -= 1;
cRect.bottom -= 1;
ShowWindow( hWnd, SW_HIDE );
x = InitPos[i].x - cRect.left;
y = InitPos[i].y - cRect.top;
OffsetRect( &cRect, x, y);
MoveWindow( hWnd, cRect.left, cRect.top, RectWidth( &cRect ),
RectHeight( &cRect ), TRUE );
UpdateWindow( GetDlgItem( hDlg, IDC_ALIGN_GRID ) );
ShowWindow( hWnd, SW_SHOWNA );
}
lpAlignParms->HorzAlign = HA_NONE;
lpAlignParms->VertAlign = VA_NONE;
if( lpAlignParms->bPreview )
{
pRect = lpAlignParms->lpRect;
if( !( lpObject = ImgGetBase(lpImage)))
return;
while ( lpObject = ImgGetSelObject( lpImage, lpObject) )
{
AstralUnionRect(&uRect, &uRect, &lpObject->rObject);
lpObject->rObject = *pRect++;
}
AlignObjects( GetActiveImage(), lpAlignParms );
}
EnableWindow( GetDlgItem( hDlg, IDC_PREVIEW ), TRUE );
lpAlignParms->bPreview = FALSE;
UpdateImage(lpImage, &uRect, YES);
}
static void PreferencesProc (IteM i)
{
ButtoN b;
GrouP c;
EntrezPrefsPtr epp;
GrouP g;
PrefsFormPtr pfp;
WindoW w;
pfp = (PrefsFormPtr) MemNew (sizeof (PrefsForm));
if (pfp == NULL) return;
w = FixedWindow (-50, -33, -10, -10, "Preferences", StdCloseWindowProc);
SetObjectExtra (w, pfp, StdCleanupFormProc);
pfp->form = (ForM) w;
pfp->formmessage = DefaultMessageProc;
g = HiddenGroup (w, -1, 0, NULL);
SetGroupSpacing (g, 10, 10);
pfp->prefs = CreateEntrezPrefsDialog (g, NULL);
c = HiddenGroup (g, 2, 0, NULL);
b = PushButton (c, "Accept", AcceptPrefsProc);
SetObjectExtra (b, pfp, NULL);
PushButton (c, "Cancel", StdCancelButtonProc);
AlignObjects (ALIGN_CENTER, (HANDLE) pfp->prefs, (HANDLE) c, NULL);
RealizeWindow (w);
epp = EntrezPrefsNew ();
if (epp != NULL) {
epp->persistDefault = entrezglobals.persistDefault;
epp->alignDefault = entrezglobals.alignDefault;
epp->lookupDirect = entrezglobals.lookupDirect;
epp->showAsn = entrezglobals.showAsn;
epp->initDatabase = StringSaveNoNull (entrezglobals.initDatabase);
epp->initField = StringSaveNoNull (entrezglobals.initField);
epp->initMode = StringSaveNoNull (entrezglobals.initMode);
epp->initMedLabel = StringSaveNoNull (medviewprocs.initMedLabel);
epp->initNucLabel = StringSaveNoNull (seqviewprocs.initNucLabel);
epp->initProtLabel = StringSaveNoNull (seqviewprocs.initProtLabel);
epp->initGenomeLabel = StringSaveNoNull (seqviewprocs.initGenomeLabel);
}
PointerToDialog (pfp->prefs, (Pointer) epp);
EntrezPrefsFree (epp);
Show (w);
Select (w);
}
static void AboutMoreProc (ButtoN b)
{
DoC d;
CharPtr info;
WindoW w;
Remove (ParentWindow (b));
w = ModalWindow (-50, -33, -1, -1, StdCloseWindowProc);
d = DocumentPanel (w, 30 * stdCharWidth, 16 * stdLineHeight);
b = PushButton (w, "Done", StdCancelButtonProc);
AlignObjects (ALIGN_CENTER, (HANDLE) d, (HANDLE) b, NULL);
RealizeWindow (w);
info = EntrezDetailedInfo ();
if (info == NULL) {
info = "No detailed information available\n";
}
AppendText (d, info, NULL, NULL, programFont);
Show (w);
Select (w);
}
static void DOT_StartupWindow(void)
{
WindoW w;
GrouP c, cg;
DOTStartDataPtr sdata;
PaneL p;
w = FixedWindow (-50, -33, -10, -10, "Welcome to D-Viewer", StdCloseWindowProc);
p = SimplePanel (w, 28 * stdCharWidth, 4 * stdLineHeight, DOT_DrawAbout);
sdata=(DOTStartDataPtr)MemNew(sizeof(DOTStartData));
sdata->hStart=w;
cg=HiddenGroup(w, 4, 0, NULL);
sdata->dot=CheckBox(cg, "Dot plot", DOT_CheckDot);
SetStatus(sdata->dot, TRUE);
sdata->reg_blast=CheckBox(cg, "Bl2Seqs", DOT_CheckRegBlast);
SetStatus(sdata->reg_blast, FALSE);
sdata->auto_blast = CheckBox(cg, "Scoop", DOT_CheckAutoBlast);
SetStatus(sdata->auto_blast, FALSE);
sdata->seqa=CheckBox(cg, "SeqAnnote File", DOT_CheckSA);
SetStatus(sdata->seqa, FALSE);
c = HiddenGroup (w, 1, 3, NULL);
SetGroupMargins(c, 10, 10);
SetGroupSpacing (c, 10, 10);
sdata->entrez=PushButton (c, "Fetch from Entrez", DOT_GetFromNetwork);
Enable(sdata->entrez);
sdata->file=PushButton (c, "Open Local Files", DOT_readExisting);
Enable(sdata->file);
PushButton (c, "Quit Program", DOT_quitProgram);
SetObjectExtra(w, (Pointer)sdata, StdCleanupExtraProc);
AlignObjects (ALIGN_CENTER, (HANDLE) p, (HANDLE) c, NULL, NULL);
Select(w);
Show(w);
ProcessEvents();
}
static void AboutProc (IteM i)
{
GrouP c;
CharPtr info;
PaneL p;
WindoW w;
w = ModalWindow (-50, -33, -1, -1, StdCloseWindowProc);
p = SimplePanel (w, AboutBoxWidth (), 14 * stdLineHeight, DrawAbout);
SetPanelClick (p, NULL, NULL, NULL, CloseAboutPanelProc);
c = HiddenGroup (w, 2, 0, NULL);
SetGroupSpacing (c, 20, 2);
SetGroupMargins (c, 5, 5);
PushButton (c, "Done", StdCancelButtonProc);
info = EntrezDetailedInfo ();
if (info != NULL) {
PushButton (c, "More", AboutMoreProc);
}
AlignObjects (ALIGN_CENTER, (HANDLE) p, (HANDLE) c, NULL);
RealizeWindow (w);
Show (w);
Select (w);
}
NLM_EXTERN DialoG CommentRuleDialog (GrouP h, Nlm_ChangeNotifyProc change_notify, Pointer change_userdata)
{
CommentRuleDlgPtr dlg;
GrouP p, g1, g2;
dlg = (CommentRuleDlgPtr) MemNew (sizeof (CommentRuleDlgData));
if (dlg == NULL)
{
return NULL;
}
p = HiddenGroup (h, -1, 0, NULL);
SetObjectExtra (p, dlg, StdCleanupExtraProc);
dlg->dialog = (DialoG) p;
dlg->todialog = CommentRuleToDialog;
dlg->fromdialog = CommentRuleFromDialog;
dlg->change_notify = change_notify;
dlg->change_userdata = change_userdata;
g1 = HiddenGroup (p, 2, 0, NULL);
StaticPrompt (g1, "Prefix", 0, popupMenuHeight, programFont, 'r');
dlg->prefix = DialogText (g1, "", 20, ChangeCommentRuleDialogPrefix);
SetObjectExtra (dlg->prefix, dlg, NULL);
g2 = HiddenGroup (p, 3, 0, NULL);
StaticPrompt (g2, "Field Name", commentruleedit_widths[COMMENTRULEEDIT_FIELDNAME_COLUMN] * Nlm_stdCharWidth, popupMenuHeight, programFont, 'c');
StaticPrompt (g2, "Match Expression", commentruleedit_widths[COMMENTRULEEDIT_MATCH_COLUMN] * Nlm_stdCharWidth, popupMenuHeight, programFont, 'c');
StaticPrompt (g2, "Required", commentruleedit_widths[COMMENTRULEEDIT_REQUIRED_COLUMN] * Nlm_stdCharWidth, popupMenuHeight, programFont, 'c');
dlg->fields_dlg = CommentRuleFieldsDialog (p);
AlignObjects (ALIGN_CENTER, (HANDLE) g1, (HANDLE) g2, (HANDLE) dlg->fields_dlg, NULL);
return (DialoG) p;
}
static void DOT_GetFromNetwork(ButtoN b)
{
WindoW w;
GrouP g, c;
Char szAppName [10]={"D-Viewer"};
DOTStartDataPtr sdata;
sdata=(DOTStartDataPtr)GetObjectExtra(ParentWindow(b));
if (!sdata) return;
Hide(sdata->hStart);
w = MovableModalWindow (-50, -33, -10, -10, "Download From NCBI", NULL);
SetObjectExtra(w, (Pointer)sdata, NULL);
if (w==NULL) return;
SetGroupSpacing (w, 10, 10);
/*accesion*/
g = NormalGroup (w, 1, 4, "Entrez GI or Accession", systemFont,NULL);
sdata->id1=DialogText (g, "", 10, NULL);
sdata->id2=DialogText (g, "", 10, NULL);
SetObjectExtra(w, (Pointer)sdata, NULL);
if (GetStatus(sdata->dot))
DOT_SetupDotParameters(g, sdata, TRUE);
else if (GetStatus(sdata->auto_blast))
DOT_SetupDotParameters(g, sdata, FALSE);
else if (GetStatus(sdata->reg_blast))
DOT_SetupBlastParameters(g, sdata);
c = HiddenGroup (g, 4, 0, NULL);
SetGroupMargins(c, 10, 10);
SetGroupSpacing (c, 10, 20);
DefaultButton (c, "Retrieve", DOT_AcceptNetworkProc);
PushButton (c, "Cancel", DOT_CancelProc);
AlignObjects (ALIGN_CENTER, (HANDLE) g, (HANDLE) c, NULL);
RealizeWindow (w);
Show (w);
Select (w);
Update ();
}
/*---------------------------------------------------------*/
GrouP LIBCALL DisplayControls(Nlm_GrouP prnt)
{
GrouP g, h;
PrompT ppt1, /*ppt2,*/ ppt3, ppt4;
g = HiddenGroup(prnt, -1, 0, NULL);
if (!g)
return NULL;
SetGroupSpacing(g, 3, 9);
#ifdef WIN_MOTIF
SetGroupMargins(g, 4, 1);
SetGroupSpacing(g, 2, 1);
#else
SetGroupMargins(g, 1, 1);
SetGroupSpacing(g, 0, 0);
#endif
StaticPrompt(g, "", 0, stdLineHeight, systemFont, 'l');
StaticPrompt(g, "", 0, stdLineHeight, systemFont, 'l');
h = HiddenGroup(g, 0, -4, NULL);
SetGroupSpacing(h, 30, 10);
ppt1 =
StaticPrompt(h, "Molecule", 0, stdLineHeight + 5, systemFont, 'c');
Cn3D_lStruc = MultiList(h, 6, 10, FillFeatureListProc);
StaticPrompt(h, "", 0, stdLineHeight, systemFont, 'l');
StaticPrompt(h, "", 0, stdLineHeight, systemFont, 'l');
AlignObjects(ALIGN_LEFT, (HANDLE) ppt1, (HANDLE) Cn3D_lStruc, NULL);
ppt3 =
StaticPrompt(h, "Domain", 0, stdLineHeight + 5, systemFont, 'c');
Cn3D_bDisplayAlignedDomain =
CheckBox(h, "Aligned Domain Only", Cn3D_ListAlignedDomainProc);
Cn3D_lFeature = MultiList(h, 6, 8, Cn3D_SelectDomainProc);
StaticPrompt(h, "", 0, stdLineHeight, systemFont, 'l');
AlignObjects(ALIGN_LEFT, (HANDLE) ppt3, (HANDLE) Cn3D_lFeature, NULL);
ppt4 =
StaticPrompt(h, "Residue", 0, stdLineHeight + 5, systemFont, 'c');
Cn3D_bAlignOn = CheckBox(h, "Aligned", NULL);
Cn3D_bUnalignOn = CheckBox(h, "Unaligned", NULL);
Cn3D_bDisplayHighlight =
CheckBox(h, "Show Selected Only", NULL);
AlignObjects(ALIGN_LEFT, (HANDLE) ppt4,
(HANDLE) Cn3D_bDisplayHighlight, NULL);
SetStatus(Cn3D_bDisplayHighlight, FALSE);
SetStatus(Cn3D_bAlignOn, Cn3D_fAlignOn);
SetStatus(Cn3D_bUnalignOn, Cn3D_fUnalignOn);
Cn3D_altConfIdOverlay = CheckBox(g,
"Overlay uncorrelated conformer ensembles", NULL);
AlignObjects(ALIGN_CENTER, (HANDLE) Cn3D_altConfIdOverlay, (HANDLE) g, NULL);
SetStatus(Cn3D_altConfIdOverlay, TRUE);
StaticPrompt(g, "", 0, stdLineHeight + 5, systemFont, 'c');
Cn3D_bDisplayApply = PushButton(g, "Apply!", Cn3D_DisplayProc);
AlignObjects(ALIGN_CENTER, (HANDLE) Cn3D_bDisplayApply, (HANDLE) h,
NULL);
ResetDisplayCtrls();
return g;
}
extern void CreateAddSpecialDialog (
GrouP prnt,
SscTablesPtr stp
)
{
Char buf [64];
GrouP g, h, m, p;
MiscRatePtr mrp;
SscSpecPtr ssp;
Char str [16];
if (stp == NULL) return;
mrp = stp->miscrate_table;
if (mrp == NULL) return;
ssp = (SscSpecPtr) MemNew (sizeof (SscSpec));
if (ssp == NULL) return;
p = HiddenGroup (prnt, -1, 0, NULL);
SetGroupSpacing (p, 10, 10);
SetObjectExtra (p, ssp, StdCleanupExtraProc);
ssp->dialog = (DialoG) p;
ssp->tables = stp;
ssp->whichspec = HiddenGroup (p, 5, 0, ChangeSpecType);
SetObjectExtra (ssp->whichspec, ssp, NULL);
RadioButton (ssp->whichspec, "Visiting");
RadioButton (ssp->whichspec, "Affiliated");
RadioButton (ssp->whichspec, "Transient");
ssp->namegroup = HiddenGroup (p, 15, 0, NULL);
SetGroupSpacing (ssp->namegroup, 5, 3);
StaticPrompt (ssp->namegroup, "Name", 0, dialogTextHeight, programFont, 'l');
ssp->name = DialogText (ssp->namegroup,
"XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
0, ChangeSpecName);
SetObjectExtra (ssp->name, (Pointer) ssp, NULL);
SetTitle (ssp->name, "");
Hide (ssp->namegroup);
h = HiddenGroup (p, 0, 0, NULL);
SetGroupMargins (h, 10, 10);
g = HiddenGroup (h, -1, 0, NULL);
Hide (g);
ssp->controls [EMPTY_PAGE] = g;
g = HiddenGroup (h, -1, 0, NULL);
if (PrintWholeDollar (mrp->visiting_fee, str)) {
sprintf (buf, "Charge $%s Visiting Fee", str);
} else {
sprintf (buf, "Charge Visiting Fee");
}
ssp->visitfee = CheckBox (g, buf, NULL);
SetStatus (ssp->visitfee, TRUE);
Hide (g);
ssp->controls [ADD_VISIT_PAGE] = g;
g = HiddenGroup (h, -1, 0, NULL);
if (PrintWholeDollar (mrp->affiliated_fee, str)) {
sprintf (buf, "Charge $%s Affiliated Fee", str);
} else {
sprintf (buf, "Charge Affiliated Fee");
}
ssp->affilfee = CheckBox (g, buf, NULL);
SetStatus (ssp->visitfee, TRUE);
Hide (g);
ssp->controls [ADD_AFFIL_PAGE] = g;
g = HiddenGroup (h, -1, 0, NULL);
SetGroupSpacing (g, 10, 10);
m = HiddenGroup (g, 1, 0, NULL);
SetGroupSpacing (m, 5, 3);
ProrateDollarAmount (mrp->transient_fee, 1, FALSE, stp, &(ssp->proratedtrans));
if (PrintWholeDollar (&(ssp->proratedtrans), str)) {
sprintf (buf, "Charge $%s Transient Dues", str);
} else {
sprintf (buf, "Charge Transient Dues");
}
ssp->transfee = CheckBox (m, buf, NULL);
SetStatus (ssp->transfee, TRUE);
ProrateDollarAmount (mrp->ssa_regular, 5, TRUE, stp, &(ssp->proratedssa));
if (PrintWholeDollar (&(ssp->proratedssa), str)) {
sprintf (buf, "Charge $%s SSA Dues (Prorated May-Apr)", str);
} else {
sprintf (buf, "Charge SSA Dues");
}
ssp->transssa = CheckBox (m, buf, NULL);
SetStatus (ssp->transssa, TRUE);
ssp->jobs = CreateClubJobsDialog (g);
AlignObjects (ALIGN_CENTER,
(HANDLE) m,
(HANDLE) ssp->jobs,
NULL);
Hide (g);
ssp->controls [ADD_TRANS_FEE] = g;
ssp->addspec = PushButton (p, "Add Special Member", AddSpecMember);
SetObjectExtra (ssp->addspec, (Pointer) ssp, NULL);
Disable (ssp->addspec);
ssp->currPage = 0;
AlignObjects (ALIGN_CENTER,
(HANDLE) ssp->whichspec,
(HANDLE) ssp->namegroup,
(HANDLE) ssp->controls [EMPTY_PAGE],
(HANDLE) ssp->controls [ADD_VISIT_PAGE],
(HANDLE) ssp->controls [ADD_AFFIL_PAGE],
(HANDLE) ssp->controls [ADD_TRANS_FEE],
(HANDLE) ssp->addspec,
NULL);
}
LOCAL void Align_OnCommand(HWND hDlg, int id, HWND hControl, UINT codeNotify)
/************************************************************************/
{
LPRECT pRect;
LPALIGNOBJECTS_PARMS lpAlignParms;
int nType;
LPOBJECT lpObject;
LPIMAGE lpImage;
lpAlignParms = ( LPALIGNOBJECTS_PARMS )SendDlgItemMessage( hDlg,
IDC_ALIGN_COMBO, CB_GETITEMDATA, PARMS_INDEX, 0 );
switch (id)
{
case IDC_ALIGN_RIGHT:
if (lpAlignParms->bPreview)
DoReset(hDlg, lpAlignParms);
lpAlignParms->HorzAlign = HA_RIGHT;
AlignIcons( hDlg, lpAlignParms );
break;
case IDC_ALIGN_CENTER:
if (lpAlignParms->bPreview)
DoReset(hDlg, lpAlignParms);
lpAlignParms->HorzAlign = HA_CENTER;
AlignIcons( hDlg, lpAlignParms );
break;
case IDC_ALIGN_LEFT:
if (lpAlignParms->bPreview)
DoReset(hDlg, lpAlignParms);
lpAlignParms->HorzAlign = HA_LEFT;
AlignIcons( hDlg, lpAlignParms );
break;
case IDC_ALIGN_HSPACE:
if (lpAlignParms->bPreview)
DoReset(hDlg, lpAlignParms);
lpAlignParms->HorzAlign = HA_EQUAL;
AlignIcons( hDlg, lpAlignParms );
break;
case IDC_ALIGN_UP:
if (lpAlignParms->bPreview)
DoReset(hDlg, lpAlignParms);
lpAlignParms->VertAlign = VA_TOP;
AlignIcons( hDlg, lpAlignParms );
break;
case IDC_ALIGN_MID:
if (lpAlignParms->bPreview)
DoReset(hDlg, lpAlignParms);
lpAlignParms->VertAlign = VA_MID;
AlignIcons( hDlg, lpAlignParms );
break;
case IDC_ALIGN_DOWN:
if (lpAlignParms->bPreview)
DoReset(hDlg, lpAlignParms);
lpAlignParms->VertAlign = VA_BOTTOM;
AlignIcons( hDlg, lpAlignParms );
break;
case IDC_ALIGN_VSPACE:
if (lpAlignParms->bPreview)
DoReset(hDlg, lpAlignParms);
lpAlignParms->VertAlign = VA_EQUAL;
AlignIcons( hDlg, lpAlignParms );
break;
case IDC_PREVIEW:
nType = ( int )SendDlgItemMessage( hDlg, IDC_ALIGN_COMBO,
CB_GETCURSEL, 0, 0 );
if( nType == 0 )
lpAlignParms->RectAlign = RA_IMAGE;
else if( nType == 1 )
lpAlignParms->RectAlign = RA_OBJECT;
else
lpAlignParms->RectAlign = RA_MASK;
lpAlignParms->bPreview = TRUE;
AlignObjects( GetActiveImage(), lpAlignParms );
EnableWindow( GetDlgItem( hDlg, IDC_PREVIEW ), FALSE );
break;
case IDOK:
ALIGNOBJECTS_PARMS AlignParms;
if( lpAlignParms->bPreview )
{
AlignParms = *lpAlignParms;
lpAlignParms->HorzAlign = HA_NONE;
lpAlignParms->VertAlign = VA_NONE;
pRect = lpAlignParms->lpRect;
if( !( lpImage = GetActiveImage() ) )
break;
if( !( lpObject = ImgGetBase( lpImage ) ) )
break;
while ( lpObject = ImgGetSelObject( lpImage, lpObject) )
lpObject->rObject = *pRect++;
AlignObjects( GetActiveImage(), lpAlignParms );
*lpAlignParms = AlignParms;
}
nType = ( int )SendDlgItemMessage( hDlg, IDC_ALIGN_COMBO,
CB_GETCURSEL, 0, 0 );
if( nType == 0 )
lpAlignParms->RectAlign = RA_IMAGE;
else if( nType == 1 )
lpAlignParms->RectAlign = RA_OBJECT;
else
lpAlignParms->RectAlign = RA_MASK;
lpAlignParms->bPreview = FALSE;
AstralDlgEnd( hDlg, TRUE );
break;
case IDC_RESET:
DoReset(hDlg, lpAlignParms);
break;
case IDCANCEL:
DoReset(hDlg, lpAlignParms);
AstralDlgEnd( hDlg, FALSE );
break;
default:
break;
}
}
extern DialoG CreateBadgesDialog (
GrouP prnt,
SscTablesPtr stp
)
{
GrouP cts, tbl, g0, g1, g2, p;
FonT fnt;
Int2 i, hgt, max, wid;
SscBadgPtr sbp;
sbp = (SscBadgPtr) MemNew (sizeof (SscBadg));
if (sbp == NULL) return NULL;
p = HiddenGroup (prnt, -1, 0, NULL);
SetGroupSpacing (p, 10, 10);
SetObjectExtra (p, sbp, StdCleanupExtraProc);
sbp->dialog = (DialoG) p;
sbp->todialog = AwardDataPtrToAdjPage;
sbp->fromdialog = AdjPageToAwardDataPtr;
sbp->tables = stp;
SelectFont (systemFont);
hgt = LineHeight ();
badgColFmt [0].pixWidth = 25 * StringWidth ("X") + 5;
max = StringWidth ("Diamond Distance ");
badgColFmt [1].pixWidth = max + 5;
SelectFont (systemFont);
wid = 0;
for (i = 0; i < 2; i++) {
wid += badgColFmt [i].pixWidth;
}
tbl = HiddenGroup (p, -1, 0, NULL);
SetGroupSpacing (tbl, 10, 5);
SetGroupMargins (tbl, 5, 5);
g0 = HiddenGroup (tbl, 15, 0, NULL);
SetGroupSpacing (g0, 0, 3);
#ifdef WIN_MSWIN
fnt = systemFont;
#else
fnt = programFont;
#endif
StaticPrompt (g0, "Name", badgColFmt [0].pixWidth, 0, fnt, 'c');
StaticPrompt (g0, "Award", badgColFmt [1].pixWidth, 0, fnt, 'c');
sbp->badglog = DocumentPanel (tbl, wid + 2, NUM_BADGE_LINES * hgt + 2);
SetObjectExtra (sbp->badglog, sbp, NULL);
SetDocCache (sbp->badglog, NULL, NULL, NULL);
SetDocNotify (sbp->badglog, ChangeBadgTableSelect);
sbp->numBadgs = 0;
for (i = 0; i < NUM_BADGE_LINES; i++) {
AppendItem (sbp->badglog, PrintBadgTable, sbp, FALSE, 1,
&badgParFmt, badgColFmt, systemFont);
}
cts = HiddenGroup (p, -1, 0, NULL);
SetGroupSpacing (cts, 10, 10);
SetGroupMargins (cts, 5, 5);
g1 = HiddenGroup (cts, -10, 0, NULL);
SetGroupSpacing (g1, 10, 5);
StaticPrompt (g1, "Name", 0, popupMenuHeight, programFont, 'l');
sbp->name = CreateEnumPopupDialog (g1, TRUE, ChangeName, stp->payers.alist, (UIEnum) 0, sbp);
StaticPrompt (g1, "Award", 0, popupMenuHeight, programFont, 'l');
sbp->reason = CreateEnumPopupDialog (g1, TRUE, ChangeReason, reason_alist, (UIEnum) 0, sbp);
SetObjectExtra (sbp->reason, sbp, NULL);
g2 = HiddenGroup (cts, -10, 0, NULL);
SetGroupSpacing (g2, 10, 5);
StaticPrompt (g2, "Comment", 0, dialogTextHeight, programFont, 'l');
sbp->comment = DialogText (g2, "", 20, ChangeComment);
SetObjectExtra (sbp->comment, sbp, NULL);
AlignObjects (ALIGN_CENTER, (HANDLE) tbl, (HANDLE) cts, NULL);
sbp->numBadgs = 0;
sbp->currItem = 1;
return (DialoG) p;
}
extern void ShowNetConfigForm (WndActnProc activate, FormMessageFunc messages,
VoidProc accepted, VoidProc cancelled,
VoidProc turnedOff, Boolean netCurrentlyOn)
{
ButtoN b;
GrouP c;
GrouP g;
GrouP h;
GrouP j;
Int2 len;
NetConfigPtr ncp;
PrompT ppt0, ppt1;
ButtoN rb;
Char str [256];
WindoW w;
GrouP x;
GrouP z;
w = NULL;
ncp = (NetConfigPtr) MemNew (sizeof (NetConfigData));
if (ncp != NULL) {
w = FixedWindow (-50, -33, -10, -10, "Network Configuration",
StdSendCloseWindowMessageProc);
SetObjectExtra (w, ncp, StdCleanupFormProc);
ncp->form = (ForM) w;
ncp->formmessage = ConfigMessageProc;
ncp->appmessage = messages;
ncp->activate = activate;
SetActivate (w, ConfigFormActivate);
ncp->accepted = accepted;
ncp->cancelled = cancelled;
ncp->turnedOff = turnedOff;
h = HiddenGroup (w, -1, 0, NULL);
SetGroupSpacing (h, 5, 10);
j = HiddenGroup (h, 2, 0, NULL);
ppt0 = StaticPrompt (j, "Connection", 0, 0, programFont, 'l');
ncp->srvConnMode = HiddenGroup (j, 4, 0, ChangeConnection);
SetObjectExtra (ncp->srvConnMode, ncp, NULL);
rb = RadioButton (ncp->srvConnMode, "None");
RadioButton (ncp->srvConnMode, "Normal");
RadioButton (ncp->srvConnMode, "Firewall");
/* RadioButton (ncp->srvConnMode, "Stateless"); */
SetValue (ncp->srvConnMode, 2);
if (turnedOff == NULL) {
Disable (rb);
}
AlignObjects (ALIGN_MIDDLE, (HANDLE) ppt0, (HANDLE) ncp->srvConnMode, NULL);
ncp->netGroup = HiddenGroup (h, -1, 0, NULL);
SetGroupSpacing (ncp->netGroup, 5, 10);
SelectFont (programFont);
len = StringWidth ("HTTP Proxy Server ") + 2;
SelectFont (systemFont);
z = HiddenGroup (ncp->netGroup, -2, 0, NULL);
StaticPrompt (z, "HTTP Proxy Server", len, dialogTextHeight, programFont, 'l');
ncp->proxyHost = DialogText (z, "", 12, ChangeProxy);
SetObjectExtra (ncp->proxyHost, ncp, NULL);
/*
StaticPrompt (z, "", 0, 0, programFont, 'l');
StaticPrompt (z, "", 0, 0, programFont, 'l');
*/
ppt0 = StaticPrompt (z, "HTTP Proxy Port ", len, dialogTextHeight, programFont, 'l');
ncp->proxyPort = DialogText (z, "", 3, NULL);
x = MultiLinePrompt (z, "Non-transparent Proxy Server", len, programFont);
ncp->firewallProxy = DialogText (z, "", 12, NULL);
AlignObjects (ALIGN_MIDDLE, (HANDLE) x, (HANDLE) ncp->firewallProxy, NULL);
/*
AlignObjects (ALIGN_MIDDLE, (HANDLE) ppt0, (HANDLE) ncp->proxyPort,
(HANDLE) ncp->firewallProxy, NULL);
*/
AlignObjects (ALIGN_RIGHT, (HANDLE) ncp->proxyHost, (HANDLE) ncp->firewallProxy, NULL);
AlignObjects (ALIGN_LEFT, (HANDLE) ncp->proxyHost, (HANDLE) ncp->firewallProxy, NULL);
g = HiddenGroup (ncp->netGroup, 5, 0, NULL);
/*
ppt0 = StaticPrompt (g, "Domain name server", 0, 0, programFont, 'l');
ncp->dnsAvailable = CheckBox (g, "Available", NULL);
*/
ncp->dnsAvailable = CheckBox (g, "Domain Name Server", NULL);
SetStatus (ncp->dnsAvailable, TRUE);
/* StaticPrompt (g, " ", 0, 0, programFont, 'l'); */
ppt1 = StaticPrompt (g, "Timeout", 0, popupMenuHeight, programFont, 'l');
ncp->timeOut = PopupList (g, TRUE, NULL);
PopupItem (ncp->timeOut, "10 seconds");
PopupItem (ncp->timeOut, "30 seconds");
PopupItem (ncp->timeOut, "60 seconds");
PopupItem (ncp->timeOut, " 5 minutes");
SetValue (ncp->timeOut, 2);
AlignObjects (ALIGN_MIDDLE, /* (HANDLE) ppt0, */ (HANDLE) ncp->dnsAvailable,
(HANDLE) ppt1, (HANDLE) ncp->timeOut, NULL);
c = HiddenGroup (w, 4, 0, NULL);
SetGroupSpacing (c, 10, 2);
ncp->accept = PushButton (c, "Accept", AcceptNetConfigForm);
SetObjectExtra (ncp->accept, ncp, NULL);
b = PushButton (c, "Cancel", StdSendCancelButtonMessageProc);
SetObjectExtra (b, ncp, NULL);
/*
AlignObjects (ALIGN_CENTER, (HANDLE) h, (HANDLE) c, NULL);
*/
AlignObjects (ALIGN_CENTER, (HANDLE) j, (HANDLE) z, (HANDLE) g, (HANDLE) c, NULL);
RealizeWindow (w);
if (! netCurrentlyOn) {
SafeSetValue (ncp->srvConnMode, 1);
Hide (ncp->netGroup);
} else if (GetAppParam ("NCBI", "CONN", "FIREWALL", NULL, str, sizeof (str))) {
if (StringICmp (str, "TRUE") == 0) {
SafeSetValue (ncp->srvConnMode, 3);
}
}
if (GetAppParam ("NCBI", "CONN", "HTTP_PROXY_HOST", NULL, str, sizeof (str))) {
if (! StringHasNoText (str)) {
SafeSetTitle (ncp->proxyHost, str);
if (GetValue (ncp->srvConnMode) == 2) {
SafeSetValue (ncp->srvConnMode, 3);
}
}
}
if (GetAppParam ("NCBI", "CONN", "HTTP_PROXY_PORT", NULL, str, sizeof (str))) {
if (! StringHasNoText (str)) {
SafeSetTitle (ncp->proxyPort, str);
}
}
if (GetAppParam ("NCBI", "CONN", "PROXY_HOST", NULL, str, sizeof (str))) {
if (! StringHasNoText (str)) {
SafeSetTitle (ncp->firewallProxy, str);
}
}
if (GetAppParam ("NCBI", "CONN", "HOST", NULL, str, sizeof (str))) {
if (StringICmp (str, "130.14.29.110") == 0) {
SafeSetStatus (ncp->dnsAvailable, FALSE);
}
}
if (GetAppParam ("NCBI", "CONN", "TIMEOUT", "30", str, sizeof (str))) {
if (StringICmp (str, "10") == 0) {
SafeSetValue (ncp->timeOut, 1);
} else if (StringICmp (str, "60") == 0) {
SafeSetValue (ncp->timeOut, 3);
} else if (StringICmp (str, "300") == 0) {
SafeSetValue (ncp->timeOut, 4);
} else {
SafeSetValue (ncp->timeOut, 2);
}
}
ChangeConfigControls (ncp);
Show (w);
Select (w);
Select (ncp->proxyHost);
}
}
GrouP
/*FCN*/Nlm_CreateDlgGroup (
GrouP gTop
){
GrouP g, glr, g1, g2;
Handle toAlign[3];
g = HiddenGroup ( gTop, 2, 1, NULL);
SetGroupSpacing ( g, 1, 1 );
glr = NormalGroup ( g, 1, 2, "Groups:", systemFont, NULL );
#ifdef WIN_MOTIF
SetGroupSpacing ( glr, 12, 12 );
SetGroupMargins ( glr, 8, 8 );
#else
SetGroupSpacing ( glr, 6, 6 );
SetGroupMargins ( glr, 6, 6 );
#endif
g1 = HiddenGroup ( glr, 2, 1, NULL );
g2 = HiddenGroup ( g1, 1, 0, NULL );
PushButton ( g2, "Top", OnGroupTop );
PushButton ( g2, "Bottom", OnGroupBottom );
groupHideButton = PushButton ( g2, "Hide", OnGroupHide );
groupCompBox = CheckBox ( g2, "Compress", OnGroupCompress );
groupDelButton = PushButton ( g2, "Delete", OnGroupDelete );
groupList = SingleList ( g1, 10, 8, OnGroupList );
curGroupInd = 0;
LoadGroupArray();
g2 = HiddenGroup ( glr, 3, 0, NULL );
toAlign[2] = (Handle)PushButton ( g2, "Create", OnGroupNew );
toAlign[0] = (Handle)StaticPrompt ( g2, "Group", 0, 0, systemFont, 'l');
#ifdef WIN_MOTIF
groupDialog = DialogText ( g2, "", 7, OnText16 );
#else
groupDialog = DialogText ( g2, "", 9, OnText16 );
#endif
toAlign[1] = (Handle)groupDialog;
AlignObjects ( ALIGN_CENTER, (HANDLE)g1, (HANDLE)g2, NULL );
featGroup = glr = NormalGroup ( g, 1, 2, "Features:", systemFont, NULL );
#ifdef WIN_MOTIF
SetGroupSpacing ( glr, 12, 12 );
SetGroupMargins ( glr, 8, 8 );
#else
SetGroupSpacing ( glr, 6, 6 );
SetGroupMargins ( glr, 6, 6 );
#endif
g1 = HiddenGroup ( glr, 2, 1, NULL );
featList = SingleList ( g1, 10, 8, OnFeatureList );
LoadFeatureArray();
FillFeatList( FALSE );
if ( totalFeatures == 0 ){
curFeatureInd = -1;
} else {
curFeatureInd = 0;
SetValue ( featList, 1 );
}
g2 = HiddenGroup ( g1, 1, 0, NULL );
PushButton ( g2, "Top", OnFeatTop );
PushButton ( g2, " Bottom ", OnFeatBottom );
featHideButton = PushButton ( g2, "Hide", OnFeatHide );
g2 = HiddenGroup ( glr, 3, 0, NULL );
#ifdef WIN_MOTIF
SetGroupMargins ( g2, 8, 8 );
#endif
toAlign[0] = (Handle)PushButton ( g2, "Move", OnFeatMove );
toAlign[1] = (Handle)StaticPrompt ( g2, "To", 0, 0, systemFont, 'l');
featPopup = PopupList ( g2, FALSE, NULL );
toAlign[2] = (Handle)featPopup;
FillGroupList(FALSE);
SetGroupValue (curGroupInd);
FillFeatPopup(FALSE);
UpdateDlgControls ();
return g;
}
