Конференция "KOL" » интерфейснутые классы [Delphi, Windows]
 
  • Егорка (18.11.09 14:47) [0]
    здраствуйте!!!
    есть ли в коле возможность определять как то так

    type
     TContextMenu = class(TComObject, IShellExtInit, IContextMenu)
     private
       FFileName: array[0..MAX_PATH] of Char;
     protected
       { IShellExtInit }
       function IShellExtInit.Initialize = SEIInitialize; // Avoid compiler warning
       function SEIInitialize(pidlFolder: PItemIDList; lpdobj: IDataObject;
         hKeyProgID: HKEY): HResult; stdcall;
       { IContextMenu }
       function QueryContextMenu(Menu: HMENU; indexMenu, idCmdFirst, idCmdLast,
         uFlags: UINT): HResult; stdcall;
       function InvokeCommand(var lpici: TCMInvokeCommandInfo): HResult; stdcall;
       function GetCommandString(idCmd, uType: UINT; pwReserved: PUINT;
         pszName: LPSTR; cchMax: UINT): HResult; stdcall;
     end;

    и если нет то как быть, это взято из демки расширения контекстного меню
  • Егорка (24.11.09 20:34) [1]
    неушто никто не знает :(
  • MTsv DN (25.11.09 07:35) [2]
    Так есть же файл KOLComObj.pas
  • Егорка (25.11.09 12:25) [3]
    хм действително, тоесть работает вродекак в VCLe?
  • MTsv DN (25.11.09 18:09) [4]
    > тоесть работает вродекак в VCLe?
    Без понятия
 
Конференция "KOL" » интерфейснутые классы [Delphi, Windows]
Есть новые Нет новых   [134431   +12][b:0][p:0]