Функция LibraryHintTipsBeginID

[Lito 2]

Кто-то использовал функцию LibraryHintTipsBeginID?
Можно увидеть небольшой примерчик, желательно на Delphi.

[Lito 2]

Сам создал тему, сам и отвечу 
Путем, танцев с бубном получился следующий код.

Код Выделить Развернуть


//------------------------------------------------------------------------------
// Подсказки
function LibraryHintTipsBeginID: UINT; pascal;
begin
  Result := LIB_Hint;
end;

//В файле констант Command.pas добавляем начало диапазона подсказок
unit Command;
interface

const
......

LIB_Hint  = 1500;

......

implementation

end.

//В файле  Command.rh, также добавляем начало диапазона подсказок для файла RC.rc
#ifndef __COMMAND_RH
#define __COMMAND_RH

....
#define LIB_Hint   1500
....
#endif


//В Файле RC.rc например дописываем в секцию

STRINGTABLE DISCARDABLE
{
  LIB_ID "Инструменты"
  LIB_Hint + COMMAND_1 "Преобразование проводится в тела без истории.\nСборка в модель"
  .....
  LIB_Hint + COMMAND_N .....

  BAR_1  "Инструменты 3D"
}

//Потом удаляем файл RC.res и по новой собираем проект.