forked from KolibriOS/kolibrios
43 lines
1.2 KiB
C
43 lines
1.2 KiB
C
|
//Leency 2013
|
||
|
|
|
||
|
|
void OpenWith()
|
||
|
|
{
|
||
|
|
?define OPEN_LIST_W 300
|
||
|
|
?define OPEN_LIST_H 300
|
||
|
|
mouse mm;
|
||
|
|
word key, slot, index, start_y;
|
||
|
|
llist app_list;
|
||
|
|
proc_info MenuForm;
|
||
|
|
int texty, newi;
|
||
|
|
|
||
|
|
app_list.ClearList();
|
||
|
|
app_list.SetSizes(files.w-OPEN_LIST_W/2+files.x+Form.left+4,files.h-OPEN_LIST_H/2+files.y+Form.top+GetSkinHeight(),OPEN_LIST_W,OPEN_LIST_H,150,18);
|
||
|
|
SetEventMask(100111b);
|
||
|
|
goto _APP_LIST_DRAW;
|
||
|
|
|
||
|
|
loop() switch(WaitEvent())
|
||
|
|
{
|
||
|
|
case evMouse:
|
||
|
|
slot = GetProcessSlot(MenuForm.ID);
|
||
|
|
if (slot != GetActiveProcess()) ExitProcess();
|
||
|
|
mm.get();
|
||
|
|
if (m.lkm) ExitProcess();
|
||
|
|
break;
|
||
|
|
|
||
|
|
case evKey:
|
||
|
|
key = GetKey();
|
||
|
|
if (key==27) ExitProcess();
|
||
|
|
break;
|
||
|
|
|
||
|
|
case evReDraw: _APP_LIST_DRAW:
|
||
|
|
DefineAndDrawWindow(app_list.x, app_list.y,app_list.w+3,app_list.h+6,0x01, 0, 0, 0x01fffFFF);
|
||
|
|
GetProcessInfo(#MenuForm, SelfInfo);
|
||
|
|
DrawPopup(0,0,app_list.w,app_list.h,0, col_work,col_border);
|
||
|
|
WriteText(10,10, 0x80, 0, "Select application to open file"w);
|
||
|
|
WriteText(10,23, 0x80, 0, #file_name);
|
||
|
|
WriteTextB(app_list.w/2-25,app_list.h/2, 0x90, 0, "S O O N");
|
||
|
|
|
||
|
|
_APP_LIST_ITEMS_DRAW:
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|