1 files changed, 0 insertions, 79 deletions
diff --git a/delphi/Awkward/utils/cbex.pas b/delphi/Awkward/utils/cbex.pas
deleted file mode 100644
index b4f94c6..0000000
--- a/delphi/Awkward/utils/cbex.pas
+++ /dev/null
@@ -1,79 +0,0 @@
-unit CBEx;
-interface
-
-uses windows,commctrl;
-
-// build combobox with xstatus icons and names
-
-function AddCBEx(wnd:HWND;proto:PAnsiChar):HWND;
-
-implementation
-
-uses messages,m_api,kol,common,mirutils;
-
-function AddCBEx(wnd:HWND;proto:PAnsiChar):HWND;
-var
-  cbei:TCOMBOBOXEXITEMW;
-  total,cnt:integer;
-  il:HIMAGELIST;
-  icon:HICON;
-  buf,buf1:array [0..127] of AnsiChar;
-  b:array [0..63] of WideChar;
-  ics:TICQ_CUSTOM_STATUS;
-begin
-  result:=0;
-  SendMessage(wnd,CB_RESETCONTENT,0,0);
-  StrCopy(buf,proto);
-  StrCat (buf,PS_ICQ_GETCUSTOMSTATUSICON);
-  if PluginLink^.ServiceExists(buf)=0 then
-    exit;
-
-  il:=ImageList_Create(16,16,ILC_COLOR32 or ILC_MASK,0,1);
-  if il=0 then exit;
-
-  cnt:=0;
-  StrCopy(buf1,proto);
-  StrCat (buf1,PS_ICQ_GETCUSTOMSTATUSEX);
-  cbei.mask:=CBEIF_IMAGE or CBEIF_SELECTEDIMAGE or CBEIF_TEXT; //!!
-  ics.cbSize  :=SizEOf(ics);
-  ics.flags   :=CSSF_STATUSES_COUNT;
-  ics.szName.w:=@b;
-  ics.wParam  :=@total;
-  CallService(buf1,0,dword(@ics));
-  ics.flags :=CSSF_DEFAULT_NAME or CSSF_MASK_NAME or CSSF_UNICODE;
-
-  while cnt<=total do
-  begin
-    if cnt=0 then
-    begin
-      ImageList_AddIcon(il,CallService(MS_SKIN_LOADICON,SKINICON_OTHER_SMALLDOT,0));
-      cbei.pszText:=TranslateW('None');
-    end
-    else
-    begin
-      icon:=CallService(buf,cnt,LR_SHARED);
-      if icon=0 then break;
-      if ImageList_AddIcon(il,icon)=-1 then break;
-      ics.wParam:=@cnt;
-      CallService(buf1,0,dword(@ics));
-      cbei.pszText:=TranslateW(@b);
-    end;
-    cbei.iItem         :=cnt;
-    cbei.iImage        :=cnt;
-    cbei.iSelectedImage:=cnt;
-    if SendMessageW(wnd,CBEM_INSERTITEMW,0,dword(@cbei))=-1 then break;
-    inc(cnt);
-//    DestroyIcon(icon);
-  end;
-
-  if cnt=0 then
-    ImageList_Destroy(il)
-  else
-  begin
-    ImageList_Destroy(SendMessage(wnd,CBEM_SETIMAGELIST,0,il));
-    SendMessage(wnd,CB_SETCURSEL,0,0);
-    result:=wnd;
-  end;
-end;
-
-end.
-\ No newline at end of file