Создать ресурс с png-изображениями

[hon]

Имеется 6 файлов:

Moon0.png
Moon1.png
Moon2.png
Moon3.png
Moon4.png
Moon5.png

В Delphi есть компонент PNGimage.
Я хочу в определенный момент залить в TImage определенный файл из ресурса.

Я создал файл moons.rc и записал туда:

Moon0 PNGobject "moon0.png"
Moon1 PNGobject "moon1.png"
Moon2 PNGobject "moon2.png"
Moon3 PNGobject "moon3.png"
Moon4 PNGobject "moon4.png"
Moon5 PNGobject "moon5.png"

Скопировал brcc32.exe в папку с rc-файлом. Запустил brcc.exe moons.rc.
Получил res-файл. Скопировал его в папку с программой, и после implementation написал:

{$R moons.res}

В момент, когда нужно загрузить ресурс вылетает:
Resourse Moon0 not found.

Загрузка ресурса происходит при создании формы и в таймере каждые 5 секунд.

Как правильно создать ресурс или сделать чтобы программа читала ресурс?

[Пепел Феникса]

покажите как грузите ресурс.

[Lesha]

Resource Builder 3.0

[hon]

Сообщение от Пепел Феникса

покажите как грузите ресурс.

   try
      moonL:=TPNGObject.Create;
      moonL.LoadFromResourceName(HInstance, 'Moon_0');
      Moon.Picture.Assign(moonL); //Moon - это TImage
   finally
      moonL.Free;
   end;

Пишет что не может найти ресурс

[Пепел Феникса]

создавайте TResourceStream сами, или же посмотрите в методе какой тип ресурсов ему нужен.

[hon]

Сообщение от Пепел Феникса

создавайте TResourceStream сами, или же посмотрите в методе какой тип ресурсов ему нужен.

Как создать? Похожу ему нужен TPNGObject.

[kangreon]

RC Файл примерно такого содержания:

PngImage_1 RCDATA "Key-S.png"

Загрузка изображения самим TPNGImage:

  FPNG := TPngImage.Create;
  FPNG.LoadFromResourceName(0, 'PngImage_1');

Загрузка через TResourceStream:

  rs := TResourceStream.Create(0, 'PngImage_1', RT_RCDATA);
  FPNG := TPngImage.Create;
  FPNG.LoadFromStream(rs);

В TPNGObject должно быть также. Во всяком случае 2 способ должен работать.