Картинка вместо курсора

Создай файл *.rc Например такое содержимое

code: #delphi
OkPic BITMAP ok.bmp
InProc BITMAP inproc.bmp
ErrPic BITMAP err.bmp

Значит, мы хотим в программы вклеить 3 картинки. Первое слово - название ресурса, второе - тип ресурса (в нашем случае картинка BMP... а можно что угодно... например, аудио, видео и т.п.), а последнее слово - имя файла.

Потом с помощью программы brc32.exe или brcc32.exe (не помню точно... давно этим не занимался) твой файл *.rc можно переделать в *.res

Просто запусти brcc32.exe file.rc

В самой программе после строки implementation есть строка {$R *.dfm}... следующей строкой добавь еще {$R file.res} Теперь при компиляции в твою программу будут записываться те три картинки.

Вызвать можно например так:

code: #delphi
hResource:=LoadResource(hInstance, FindResource(hInstance, 'okpic'#0, RT_BITMAP));
  LockResource(hResource);
  Pics := TBitMap.Create;
  Pics.LoadFromResourceName(0,'okpic');
  FreeResource(hResource);

где hResource : Cardinal; Pic : TBitmap;

автор: Humanoid

Поделиться:

Похожие статьи: