/**
* Implementation of OM_NEW
*
* @param cl the class
* @param obj the object
* @param msg the parameter of the method
* @return
*/
STATIC ULONG AddressGroupList_New(struct IClass *cl,Object *obj,struct opSet *msg)
{
struct AddressGroupList_Data *data;
if (!(obj=(Object *)DoSuperNew(cl,obj,
TAG_MORE,msg->ops_AttrList)))
return 0;
data = (struct AddressGroupList_Data*)INST_DATA(cl,obj);
init_hook(&data->construct_hook,(HOOKFUNC)addressgroup_construct);
init_hook(&data->compare_hook,(HOOKFUNC)addressgroup_compare);
init_hook(&data->destruct_hook,(HOOKFUNC)addressgroup_destruct);
init_hook_with_data(&data->display_hook,(HOOKFUNC)addressgroup_display, data);
SetAttrs(obj,
MUIA_NList_ConstructHook2, &data->construct_hook,
MUIA_NList_CompareHook2, &data->compare_hook,
MUIA_NList_DestructHook2, &data->destruct_hook,
MUIA_NList_DisplayHook2, &data->display_hook,
MUIA_NList_Title, TRUE,
MUIA_NList_Format, ",",
TAG_DONE);
return (ULONG)obj;
}
Object *CreateGUI(struct IClass *cl, Object *obj, struct ObjStore *os, struct DnetcLibrary *LibBase)
{
UBYTE about[512];
ULONG array[] =
{
(ULONG) LibBase->Version,
LibBase->Library.lib_Version,
LibBase->Library.lib_Revision
};
//#define SysBase LibBase->MySysBase
RawDoFmt(
"\33cdistributed.net client - a product of distributed.net\n"
"%s\n"
"Copyright 1997-2011 distributed.net\n"
"\n"
"\n"
"MorphOS client maintained by\n"
"Harry Sintonen\n"
"<*****@*****.**>\n"
"\n"
"\n"
"MUI GUI module (v%ld.%ld) maintained by\n"
"Ilkka Lehtoranta\n"
"<*****@*****.**>",
array, NULL, about);
//#undef SysBase
return (Object*)DoSuperNew(cl, obj,
MUIA_Application_DiskObject, (IPTR)LibBase->dobj,
MUIA_Application_Commands, (IPTR)commands,
MUIA_Application_Version, (IPTR)&VerString[1],
MUIA_Application_Copyright, (IPTR)"distributed.net",
MUIA_Application_Author, (IPTR)"Ilkka Lehtoranta",
MUIA_Application_Base, (IPTR)"DNETC",
MUIA_Application_UsedClasses, (IPTR)ClassList,
MUIA_Application_Title, (IPTR)"dnetc",
MUIA_Application_Description, (IPTR)"GUI for distributed.net client",
MUIA_Application_Window, (IPTR)(os->wnd = MUI_NewObject(MUIC_Window,
MUIA_Window_Title, (IPTR)"distributed.net client",
MUIA_Window_ID, MAKE_ID('M','A','I','N'),
MUIA_Window_Width, MUIV_Window_Width_Visible(55),
MUIA_Window_Height, MUIV_Window_Height_Visible(45),
MUIA_Window_Menustrip, (IPTR)MUI_MakeObject(MUIO_MenustripNM, (IPTR)&Menus, 0),
MUIA_Window_RootObject, (IPTR)MUI_NewObject(MUIC_Group,
MUIA_Group_Child, (IPTR)(os->lst = NewObject(LibBase->ListMCC->mcc_Class, NULL,
MUIA_Background, MUII_ReadListBack,
MUIA_Frame, MUIV_Frame_ReadList,
MUIA_CycleChain, TRUE,
TAG_END)),
TAG_END),
TAG_END)),
MUIA_Application_Window, (IPTR)(os->req = MUI_NewObject(MUIC_Aboutbox,
MUIA_Aboutbox_Credits, (IPTR)about,
TAG_END)),
TAG_END);
}
STATIC ULONG MultiString_New(struct IClass *cl,Object *obj,struct opSet *msg)
{
struct MultiString_Data *data;
if (!(obj=(Object *)DoSuperNew(cl,obj,
MUIA_Group_Horiz, FALSE,
TAG_MORE, msg->ops_AttrList)))
return 0;
data = (struct MultiString_Data*)INST_DATA(cl,obj);
list_init(&data->object_list);
MultiString_Set(cl,obj,msg,1);
return (ULONG)obj;
}
static ULONG
mNew (struct IClass *cl, Object *obj, struct opSet *msg)
{
obj = (Object *)DoSuperNew(cl, obj,
InputListFrame,
Child, RectangleObject,
MUIA_MaxHeight, 5,
MUIA_Background, MUII_SHADOW,
End,
TAG_DONE);
if (!obj)
return 0;
return (ULONG)obj;
}
static ULONG
mNew(struct IClass *cl,Object *obj,struct opSet *msg)
{
if (obj = (Object *)DoSuperNew(cl,obj,
MUIA_Group_Horiz, TRUE,
MUIA_Group_HorizSpacing, 1,
MUIA_Group_SameSize, TRUE,
TAG_MORE,(ULONG)msg->ops_AttrList))
{
struct data *data = INST_DATA(cl,obj);
int i;
for (i= 0; i<7; i++)
{
Object *o;
o = TextObject,
MUIA_CycleChain, TRUE,
MUIA_Font, MUIV_Font_Button,
MUIA_InputMode, MUIV_InputMode_Immediate,
ButtonFrame,
MUIA_Background, MUII_ButtonBack,
MUIA_Text_Contents, GetLocaleStr(lib_locale,ABDAY_1+i),
MUIA_Text_PreParse, MUIX_C,
MUIA_Text_SetMax, TRUE,
End;
if (o)
{
DoSuperMethod(cl,obj,OM_ADDMEMBER,(ULONG)o);
DoMethod(o,MUIM_Notify,MUIA_Selected,TRUE,(ULONG)obj,3,MUIM_Set,MUIA_Calendar_StartDay,i);
data->days[i] = o;
}
else
{
CoerceMethod(cl->cl_Super,obj,OM_DISPOSE);
return 0;
}
}
}
return (ULONG)obj;
}
STATIC ULONG PGPList_New(struct IClass *cl,Object *obj,struct opSet *msg)
{
struct PGPList_Data *data;
if (!(obj=(Object *)DoSuperNew(cl,obj,
TAG_MORE,msg->ops_AttrList)))
return 0;
data = (struct PGPList_Data*)INST_DATA(cl,obj);
init_hook(&data->construct_hook,(HOOKFUNC)pgp_construct);
init_hook(&data->destruct_hook,(HOOKFUNC)pgp_destruct);
init_hook(&data->display_hook,(HOOKFUNC)pgp_display);
SetAttrs(obj,
MUIA_NList_ConstructHook2, &data->construct_hook,
MUIA_NList_DestructHook2, &data->destruct_hook,
MUIA_NList_DisplayHook2, &data->display_hook,
MUIA_NList_Format, ",",
TAG_DONE);
return (ULONG)obj;
}
/*************
* DESCRIPTION: do initialations for float subclass
* INPUT: cl class
* obj object
* msg message
* OUTPUT: created object or 0 if failed
*************/
static ULONG New(struct IClass *cl,Object *obj,struct opSet *msg)
{
struct Float_Data *data,databuf;
char buffer[32];
float value;
obj = (Object *)DoSuperNew(cl,obj,
MUIA_Group_Horiz, TRUE,
Child, KeyFloatString(
databuf.fs_gadget,
GetTagData(MUIA_Float_Label,NULL,msg->ops_AttrList),
NULL,
GetTagData(MUIA_Float_ControlChar,NULL,msg->ops_AttrList)),
End,
TAG_MORE,msg->ops_AttrList);
if(obj)
{
data = (struct Float_Data*)INST_DATA(cl,obj);
*data = databuf;
value = (float)WARPOS_PPC_FUNC(GetTagData)(MUIA_Float_Value,1,msg->ops_AttrList);
data->lower = WARPOS_PPC_FUNC(GetTagData)(MUIA_Float_Min,1,msg->ops_AttrList);
data->upper = WARPOS_PPC_FUNC(GetTagData)(MUIA_Float_Max,100,msg->ops_AttrList);
data->lowerbound = (BOOL)WARPOS_PPC_FUNC(GetTagData)(MUIA_Float_LowerBound,FALSE,msg->ops_AttrList);
data->upperbound = (BOOL)WARPOS_PPC_FUNC(GetTagData)(MUIA_Float_UpperBound,FALSE,msg->ops_AttrList);
data->lowerinside = (BOOL)WARPOS_PPC_FUNC(GetTagData)(MUIA_Float_LowerInside,FALSE,msg->ops_AttrList);
data->upperinside = (BOOL)WARPOS_PPC_FUNC(GetTagData)(MUIA_Float_UpperInside,FALSE,msg->ops_AttrList);
Float2String(value,buffer);
SetAttrs(data->fs_gadget, MUIA_String_Contents, buffer, TAG_DONE);
DOMETHOD(data->fs_gadget, MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
obj, 1, MUIM_Float_StringAck);
return((ULONG)obj);
}
return(0);
}
STATIC ULONG transwnd_New(struct IClass *cl, Object *obj, struct opSet *msg)
{
Object *gauge1,/* *gauge2,*/*status,*abort,*mail_listview, *mail_list, *mail_group, *start, *ignore, *down, *del, *downdel, *ignore_check,*all,*none, *skip;
Object *head;
obj = (Object *) DoSuperNew(cl, obj,
WindowContents, VGroup,
Child, head = TextObject,End,
Child, RectangleObject, MUIA_Weight, 1, End,
Child, mail_group = VGroup,
MUIA_ShowMe, FALSE,
Child, mail_listview = NListviewObject,
MUIA_NListview_NList, mail_list = NListObject,
MUIA_NList_Title, TRUE,
MUIA_NList_Format, "P=\033r,,,",
End,
End,
Child, HGroup,
Child, ignore = MakeButton(_("Ignore")),
Child, down = MakeButton(_("Download")),
Child, del = MakeButton(_("Delete")),
Child, downdel = MakeButton(_("Download & Delete")),
Child, start = MakeButton(_("_Start")),
End,
Child, HGroup,
Child, all = MakeButton(_("Select All")),
Child, none = MakeButton(_("Select None")),
Child, MakeLabel(_("Ignore not listed mails")),
Child, ignore_check = MakeCheck(_("Ignore not listed mails"),FALSE),
Child, HVSpace,
End,
End,
Child, gauge1 = GaugeObject,
GaugeFrame,
MUIA_Gauge_InfoText, _("Waiting..."),
MUIA_Gauge_Horiz, TRUE,
End,
/* Child, gauge2 = GaugeObject,
GaugeFrame,
MUIA_Gauge_InfoText, _("Waiting..."),
MUIA_Gauge_Horiz, TRUE,
End,*/
Child, HGroup,
Child, status = TextObject, TextFrame, MUIA_Text_Contents, "", MUIA_Background, MUII_TextBack, End,
Child, skip = MakeButton(_("_Skip")),
Child, abort = MakeButton(_("_Abort")),
End,
End,
TAG_MORE, msg->ops_AttrList);
if (obj != NULL)
{
struct transwnd_Data *data = (struct transwnd_Data *) INST_DATA(cl, obj);
data->gauge1 = gauge1;
/* data->gauge2 = gauge2; */
data->status = status;
data->abort = abort;
data->skip = skip;
data->head = head;
data->mail_listview = mail_listview;
data->mail_list = mail_list;
data->mail_group = mail_group;
data->start = start;
data->ignore_check = ignore_check;
data->status_download = PictureButtonObject, MUIA_PictureButton_Directory, gui_get_images_directory(), MUIA_PictureButton_Filename, "status_download", End;
data->status_trashcan = PictureButtonObject, MUIA_PictureButton_Directory, gui_get_images_directory(), MUIA_PictureButton_Filename, "status_trashcan", End;
init_hook_with_data(&data->construct_hook, (HOOKFUNC)mail_construct, data);
init_hook_with_data(&data->destruct_hook, (HOOKFUNC)mail_destruct, data);
init_hook_with_data(&data->display_hook, (HOOKFUNC)mail_display, data);
SetAttrs(mail_list,
MUIA_NList_ConstructHook, &data->construct_hook,
MUIA_NList_DestructHook, &data->destruct_hook,
MUIA_NList_DisplayHook, &data->display_hook,
MUIA_NList_MultiSelect, MUIV_NList_MultiSelect_Default,
TAG_DONE);
set(skip, MUIA_Weight, 0);
set(abort, MUIA_Weight, 0);
DoMethod(abort, MUIM_Notify, MUIA_Pressed, FALSE, (ULONG)obj, 3, MUIM_Set, MUIA_transwnd_Aborted, TRUE);
DoMethod(skip, MUIM_Notify, MUIA_Pressed, FALSE, (ULONG)obj, 3, MUIM_Set, MUIA_transwnd_Skipped, TRUE);
DoMethod(start, MUIM_Notify, MUIA_Pressed, FALSE, (ULONG)App, 3, MUIM_WriteLong, (1<<0), (ULONG)&data->start_pressed);
DoMethod(obj, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, (ULONG)obj, 3, MUIM_Set, MUIA_transwnd_Aborted, TRUE);
DoMethod(ignore, MUIM_Notify, MUIA_Pressed, FALSE, (ULONG)App, 5, MUIM_CallHook, (ULONG)&hook_standard, (ULONG)transwnd_set_mail_flags, (ULONG)data, 0);
DoMethod(down, MUIM_Notify, MUIA_Pressed, FALSE, (ULONG)App, 5, MUIM_CallHook, (ULONG)&hook_standard, (ULONG)transwnd_set_mail_flags, (ULONG)data, MAILF_DOWNLOAD);
DoMethod(del, MUIM_Notify, MUIA_Pressed, FALSE, (ULONG)App, 5, MUIM_CallHook, (ULONG)&hook_standard, (ULONG)transwnd_set_mail_flags, (ULONG)data, MAILF_DELETE);
DoMethod(downdel, MUIM_Notify, MUIA_Pressed, FALSE, (ULONG)App, 5, MUIM_CallHook, (ULONG)&hook_standard, (ULONG)transwnd_set_mail_flags, (ULONG)data, MAILF_DOWNLOAD|MAILF_DELETE);
DoMethod(all,MUIM_Notify,MUIA_Pressed, FALSE, (ULONG)mail_list, 4, MUIM_NList_Select, MUIV_NList_Select_All, MUIV_NList_Select_On, NULL);
DoMethod(none,MUIM_Notify,MUIA_Pressed, FALSE, (ULONG)mail_list, 4, MUIM_NList_Select, MUIV_NList_Select_All, MUIV_NList_Select_Off, NULL);
}
return((ULONG) obj);
}
static IPTR mLampNew(struct IClass *cl, Object *obj, struct opSet *msg)
{
return (IPTR)DoSuperNew(cl,obj,
MUIA_Font, MUIV_Font_List,
TAG_MORE, msg->ops_AttrList);
}
/*
** Here we go
*/
static IPTR mNew(struct IClass *cl, Object *obj, struct opSet *msg)
{
Object *strip, *win;
if((obj = (Object *)DoSuperNew(cl,obj,
MUIA_Application_Title, "OpenURL-Prefs",
MUIA_Application_Version, "$VER: OpenURL-Prefs " LIB_REV_STRING " [" SYSTEMSHORT "/" CPU "] (" LIB_DATE ") " LIB_COPYRIGHT,
MUIA_Application_Author, APPAUTHOR,
MUIA_Application_Copyright, getString(MSG_App_Copyright),
MUIA_Application_Description, getString(MSG_App_Description),
MUIA_Application_HelpFile, APPHELP,
MUIA_Application_Base, APPBASENAME,
MUIA_Application_Menustrip, strip = MUI_MakeObject(MUIO_MenustripNM,(IPTR)menu,MUIO_MenustripNM_CommandKeyCheck),
MUIA_Application_UsedClasses, usedClasses,
MUIA_Application_Window, win = winObject, End,
TAG_MORE,msg->ops_AttrList)) != NULL)
{
struct data *data = INST_DATA(cl,obj);
/*
** Setup data
*/
data->win = win;
if((data->icon = GetDiskObject((STRPTR)"PROGDIR:OpenURL")) != NULL)
superset(cl,obj,MUIA_Application_DiskObject,data->icon);
/* Menus */
DoMethod((Object *)DoMethod(strip,MUIM_FindUData,MSG_Menu_About),MUIM_Notify,MUIA_Menuitem_Trigger,MUIV_EveryTime,(IPTR)obj,1,MUIM_App_About);
DoMethod((Object *)DoMethod(strip,MUIM_FindUData,MSG_Menu_AboutMUI),MUIM_Notify,MUIA_Menuitem_Trigger,MUIV_EveryTime,(IPTR)MUIV_Notify_Application,2,MUIM_Application_AboutMUI,(IPTR)win);
DoMethod((Object *)DoMethod(strip,MUIM_FindUData,MSG_Menu_Hide),MUIM_Notify,MUIA_Menuitem_Trigger,MUIV_EveryTime,(IPTR)obj,3,MUIM_Set,MUIA_Application_Iconified,TRUE);
DoMethod((Object *)DoMethod(strip,MUIM_FindUData,MSG_Menu_Quit),MUIM_Notify,MUIA_Menuitem_Trigger,MUIV_EveryTime,(IPTR)obj,2,MUIM_Application_ReturnID,MUIV_Application_ReturnID_Quit);
DoMethod((Object *)DoMethod(strip,MUIM_FindUData,MSG_Menu_Save),MUIM_Notify,MUIA_Menuitem_Trigger,MUIV_EveryTime,(IPTR)win,2,MUIM_Win_StorePrefs,MUIV_Win_StorePrefs_Save);
DoMethod((Object *)DoMethod(strip,MUIM_FindUData,MSG_Menu_Use),MUIM_Notify,MUIA_Menuitem_Trigger,MUIV_EveryTime,(IPTR)win,2,MUIM_Win_StorePrefs,MUIV_Win_StorePrefs_Use);
DoMethod((Object *)DoMethod(strip,MUIM_FindUData,MSG_Menu_LastSaved),MUIM_Notify,MUIA_Menuitem_Trigger,MUIV_EveryTime,(IPTR)obj,2,MUIM_App_GetPrefs,MUIV_App_GetPrefs_LastSaveds);
DoMethod((Object *)DoMethod(strip,MUIM_FindUData,MSG_Menu_Restore),MUIM_Notify,MUIA_Menuitem_Trigger,MUIV_EveryTime,(IPTR)obj,2,MUIM_App_GetPrefs,MUIV_App_GetPrefs_Restore);
DoMethod((Object *)DoMethod(strip,MUIM_FindUData,MSG_Menu_Defaults),MUIM_Notify,MUIA_Menuitem_Trigger,MUIV_EveryTime,(IPTR)obj,2,MUIM_App_GetPrefs,MUIV_App_GetPrefs_Defaults);
DoMethod((Object *)DoMethod(strip,MUIM_FindUData,MSG_Menu_MUI),MUIM_Notify,MUIA_Menuitem_Trigger,MUIV_EveryTime,(IPTR)obj,2,MUIM_Application_OpenConfigWindow,0);
/* Menus help */
DoSuperMethod(cl,obj,MUIM_Notify,MUIA_Application_MenuHelp,MUIV_EveryTime,MUIV_Notify_Self,
5,MUIM_Application_ShowHelp,(IPTR)win,(IPTR)APPHELP,(IPTR)"MENUS",0);
/*
** Load list formats
*/
DoSuperMethod(cl,obj,MUIM_Application_Load,(IPTR)MUIV_Application_Load_ENV);
/*
** Try to get OpenURL prefs and open window
*/
if (!DoMethod(win,MUIM_Win_GetPrefs,MUIV_Win_GetPrefs_Restore) || !openWindow(obj,win))
{
CoerceMethod(cl,obj,OM_DISPOSE);
return 0;
}
}
return (IPTR)obj;
}
static IPTR mNew(struct IClass *cl, Object *obj, struct opSet *msg)
{
struct data temp;
struct URL_BrowserNode *bn;
struct TagItem *attrs = msg->ops_AttrList;
memset(&temp,0,sizeof(temp));
temp.browserList = (Object *)GetTagData(MUIA_BrowserEditWin_ListObj,(IPTR)NULL,attrs);
if (!temp.browserList) return 0;
bn = temp.bn = (struct URL_BrowserNode *)GetTagData(MUIA_BrowserEditWin_Browser,(IPTR)NULL,attrs);
if (!bn) return 0;
if((obj = (Object *)DoSuperNew(cl,obj,
MUIA_HelpNode, "BWIN",
MUIA_Window_ID, MAKE_ID('E','D','B','R'),
MUIA_Window_Title, getString(MSG_Browser_WinTitle),
MUIA_Window_ScreenTitle, getString(MSG_App_ScreenTitle),
MUIA_Window_AllowTopMenus, FALSE,
WindowContents, VGroup,
Child, ColGroup(2),
GroupFrameT(getString(MSG_Edit_Definitions)),
Child, olabel2(MSG_Edit_Name),
Child, temp.name = ostring(NAME_LEN,MSG_Edit_Name,MSG_Edit_Name_Help),
Child, olabel2(MSG_Edit_Path),
Child, temp.path = opopph(syms,names,PATH_LEN,MSG_Edit_Path,TRUE,MSG_Edit_Path_Help),
Child, olabel2(MSG_Edit_Port),
Child, temp.port = opopport(PORT_LEN,MSG_Edit_Port,MSG_Edit_Port_Help),
End,
Child, ColGroup(2),
GroupFrameT(getString(MSG_Edit_ARexx)),
Child, olabel2(MSG_Edit_Show),
Child, temp.show = ostring(SHOWCMD_LEN,MSG_Edit_Show,MSG_Edit_Show_Help),
Child, olabel2(MSG_Edit_Screen),
Child, temp.toFront = ostring(TOFRONTCMD_LEN,MSG_Edit_Screen,MSG_Edit_Screen_Help),
Child, olabel2(MSG_Edit_OpenURL),
Child, temp.openURL = opopph(syms,names,OPENURLCMD_LEN,MSG_Edit_OpenURL,FALSE,MSG_Edit_OpenURL_Help),
Child, olabel2(MSG_Edit_NewWin),
Child, temp.openURLNW = opopph(syms,names,OPENURLWCMD_LEN,MSG_Edit_NewWin,FALSE,MSG_Edit_NewWin_Help),
End,
Child, ColGroup(3),
Child, temp.use = obutton(MSG_Edit_Use,MSG_Edit_Use_Help),
Child, RectangleObject, End,
Child, temp.cancel = obutton(MSG_Edit_Cancel,MSG_Edit_Cancel_Help),
End,
End,
TAG_MORE, attrs)) != NULL)
{
struct data *data = INST_DATA(cl,obj);
CopyMem(&temp,data,sizeof(*data));
set(data->name,MUIA_String_Contents,bn->ubn_Name);
set(data->path,MUIA_String_Contents,bn->ubn_Path);
set(data->port,MUIA_String_Contents,bn->ubn_Port);
set(data->show,MUIA_String_Contents,bn->ubn_ShowCmd);
set(data->toFront,MUIA_String_Contents,bn->ubn_ToFrontCmd);
set(data->openURL,MUIA_String_Contents,bn->ubn_OpenURLCmd);
set(data->openURLNW,MUIA_String_Contents,bn->ubn_OpenURLWCmd);
}
return (IPTR)obj;
}
static IPTR mNew(struct IClass *cl, Object *obj, struct opSet *msg)
{
struct data temp;
memset(&temp,0,sizeof(temp));
if((obj = (Object *)DoSuperNew(cl,obj,
MUIA_HelpNode, "WIN",
MUIA_Window_ID, MAKE_ID('M', 'W', 'I', 'N'),
MUIA_Window_Title, getString(MSG_Win_WinTitle),
MUIA_Window_ScreenTitle, getString(MSG_App_ScreenTitle),
WindowContents, VGroup,
Child, temp.reg = RegisterObject,
MUIA_Background, MUII_RegisterBack,
MUIA_CycleChain, TRUE,
MUIA_Register_Titles, tabs,
/* Browsers */
Child, temp.browsers = appListObject,
MUIA_AppList_Type, MUIV_AppList_Type_Browser,
End,
/* Mailers */
Child, temp.mailers = appListObject,
MUIA_AppList_Type, MUIV_AppList_Type_Mailer,
End,
/* FTPs */
Child, temp.FTPs = appListObject,
MUIA_AppList_Type, MUIV_AppList_Type_FTP,
End,
/* Miscellaneous */
Child, temp.misc = VGroup,
MUIA_HelpNode, "MISCS",
/* Defaults */
Child, VGroup,
GroupFrameT(getString(MSG_Misc_Defaults)),
Child, HGroup,
Child, ColGroup(2),
Child, temp.show = ocheckmark(MSG_Misc_Show,MSG_Misc_Show_Help),
Child, ollabel1(MSG_Misc_Show),
Child, temp.toFront = ocheckmark(MSG_Misc_Bring,MSG_Misc_Bring_Help),
Child, ollabel1(MSG_Misc_Bring),
Child, temp.newWin = ocheckmark(MSG_Misc_Open,MSG_Misc_Open_Help),
Child, ollabel1(MSG_Misc_Open),
Child, temp.launch = ocheckmark(MSG_Misc_Launch,MSG_Misc_Launch_Help),
Child, ollabel1(MSG_Misc_Launch),
End,
Child, HSpace(0),
End,
Child, VSpace(0),
End,
/* Options */
Child, VGroup,
GroupFrameT(getString(MSG_Misc_Options)),
Child, HGroup,
Child, ColGroup(2),
Child, temp.prepend = ocheckmark(MSG_Misc_Prepend,MSG_Misc_Prepend_Help),
Child, ollabel1(MSG_Misc_Prepend),
Child, temp.mailto = ocheckmark(MSG_Misc_UseMailer,MSG_Misc_UseMailer_Help),
Child, ollabel1(MSG_Misc_UseMailer),
Child, temp.useFTP = ocheckmark(MSG_Misc_UseFTP,MSG_Misc_UseFTP_Help),
Child, ollabel1(MSG_Misc_UseFTP),
End,
Child, HSpace(0),
End,
Child, VSpace(0),
End,
End,
End,
/* Buttons */
Child, HGroup,
Child, temp.save = obutton(MSG_Win_Save,MSG_Win_Save_Help),
Child, wspace(16),
Child, temp.use = obutton(MSG_Win_Use,MSG_Win_Use_Help),
Child, wspace(16),
Child, temp.apply = obutton(MSG_Win_Apply,MSG_Win_Apply_Help),
Child, wspace(16),
Child, temp.cancel = obutton(MSG_Win_Cancel,MSG_Win_Cancel_Help),
End,
End,
TAG_MORE, msg->ops_AttrList)) != NULL)
{
struct data *data = INST_DATA(cl,obj);
/* init instance data */
CopyMem(&temp,data,sizeof(*data));
data->browserList = (Object *)xget(data->browsers, MUIA_AppList_ListObj);
data->mailerList = (Object *)xget(data->mailers, MUIA_AppList_ListObj);
data->FTPList = (Object *)xget(data->FTPs, MUIA_AppList_ListObj);
/* buttons */
set(obj,MUIA_Window_DefaultObject,data->browserList);
/* window notifies */
DoMethod(obj,MUIM_Notify,MUIA_Window_CloseRequest,TRUE,MUIV_Notify_Application,2,
MUIM_Application_ReturnID,MUIV_Application_ReturnID_Quit);
/* buttons notifies */
DoMethod(data->save,MUIM_Notify,MUIA_Pressed,FALSE,(IPTR)obj,2,MUIM_Win_StorePrefs,MUIV_Win_StorePrefs_Save);
DoMethod(data->use,MUIM_Notify,MUIA_Pressed,FALSE,(IPTR)obj,2,MUIM_Win_StorePrefs,MUIV_Win_StorePrefs_Use);
DoMethod(data->apply,MUIM_Notify,MUIA_Pressed,FALSE,(IPTR)obj,2,MUIM_Win_StorePrefs,MUIV_Win_StorePrefs_Apply);
DoMethod(data->cancel,MUIM_Notify,MUIA_Pressed,FALSE,MUIV_Notify_Application,2,MUIM_Application_ReturnID,MUIV_Application_ReturnID_Quit);
}
return (IPTR)obj;
}
static IPTR mNew(struct IClass *cl,Object *obj,struct opSet *msg)
{
TEXT buf[256];
Object *ok;
strlcpy(buf, "OpenURL-Prefs " LIB_REV_STRING " [" SYSTEMSHORT "/" CPU "] (" LIB_DATE ")\n" LIB_COPYRIGHT, sizeof(buf));
if ((obj = (Object *)DoSuperNew(cl,obj,
MUIA_Window_Title, getString(MSG_About_WinTitle),
MUIA_Window_ScreenTitle, getString(MSG_App_ScreenTitle),
MUIA_Window_IconifyGadget, FALSE,
MUIA_Window_MenuGadget, FALSE,
MUIA_Window_SnapshotGadget, FALSE,
MUIA_Window_ConfigGadget, FALSE,
MUIA_Window_SizeGadget, FALSE,
MUIA_Window_CloseGadget, FALSE,
MUIA_Window_AllowTopMenus, FALSE,
WindowContents, VGroup,
MUIA_Background, MUII_RequesterBack,
Child, HGroup,
Child, HSpace(0),
Child, TextObject,
MUIA_Text_Contents, getString(MSG_About_Descr),
End,
Child, HSpace(0),
End,
Child, RectangleObject, MUIA_FixHeight, 4, End,
Child, HGroup,
Child, HSpace(0),
Child, TextObject,
MUIA_Text_PreParse, "\33c",
MUIA_Text_Contents, buf,
End,
Child, HSpace(0),
End,
Child, HGroup,
Child, HSpace(0),
Child, ourltext("http://sourceforge.net/projects/openurllib",NULL),
Child, HSpace(0),
End,
//Child, RectangleObject, MUIA_FixHeight, 4, End,
Child, RectangleObject, MUIA_Rectangle_HBar, TRUE, End,
Child, HGroup,
Child, RectangleObject, MUIA_Weight, 200, End,
Child, ok = obutton(MSG_About_OK,0),
Child, RectangleObject, MUIA_Weight, 200, End,
End,
End,
TAG_MORE, msg->ops_AttrList)))
{
superset(cl,obj,MUIA_Window_ActiveObject,ok);
DoMethod(ok,MUIM_Notify,MUIA_Pressed,FALSE,(IPTR)obj,3,
MUIM_Set,MUIA_Window_CloseRequest,TRUE);
}
return (IPTR)obj;
}
