|
Adds Black Frame to Window |
|
left |
Horizontal position of left top corner |
top |
Vertical position of left top corner |
right |
Horizontal position of right bottom corner |
bottom |
Vertical position of right bottom corner |
name |
BlackFrame name |
shadetype |
kFrameShadeNone, kFrameShadeDark, kFrameShadeLight |
|
event DefineWindows
begin
real h,h1,hl,h2,h3,h4,h5,h6,h7,hs,v,vm,l,vs,f,v2,t,es,hm,hof,fs;
string 255 label;
SetLangMode(LangEnglish,"CLENG",0);
WindowBegin("Master Control",PhLMasterWClass,CGother,RcType);
UseView(RcVc);
es = 6;
hm = 40; v=28; h2 = 80; vs = 63; // vs = 73;
AddBic(503,504,h=hm,v,ToolCalendar,0,"Calendar");
AddBic(501,502,h+=h2,v,ToolMail,0,"Mailbox");
AddBic(623,624,h+=h2,v,ToolTodo,0,"Tasks");
AddBic(805,806,h+=h2,v,ToolLogin,0, "Login");
h = hm; v=v+vs;
AddBic(632,730,h,v,ToolModule,0, "Modules");
AddBic(623,624,h+=h2,v,ToolForms,0,"SmartApps");
AddBic(21423,21424,h+=h2,v,ToolConferences,0,"Conferences");
AddBic(636,736,h+=h2,v,ToolChat,0,"Chat");
h = hm; v=v+vs;
AddBic(29017,29018,h=hm,v,ToolArchive,0,"Desktop");
AddBic(701,700,h+=h2,v,ToolRegs,0, "Registers");
AddBic(731,734,h+=h2,v,ToolReport,0, "Reports");
AddBic(737,738,h+=h2,v,ToolSetup,0, "Settings");
h = hm; v=v+73;
BlackFrame(15,v,312,1,"Module:$",kFrameShadeNone);
SpecMenuItem("Stop automatic login",' ',20);
EndWindow;
return;
end;
|
««