Картинка из ресурса

Тема в разделе "Delphi - FAQ", создана пользователем ProgeRock, 1 апр 2008.

  1. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    Delphi 2007

    Почему не работает код?
    Код (Text):
    procedure q;
    var
    Img: TBitmap;
    begin
    Img:= TBitmap.Create;
    Img.Handle := LoadBitmap(HInstance,'1');
    Form1.Image1.Canvas.Draw(0, 0, Img);
    Img.Free;
    end;
     
  2. morpheus

    morpheus скриптописец

    Репутация:
    0
    Регистрация:
    7 авг 2006
    Сообщения:
    3.920
    Симпатии:
    1
  3. ProgeRock

    ProgeRock Гость

    Репутация:
    0
  4. European

    Репутация:
    0
    Регистрация:
    4 сен 2006
    Сообщения:
    2.566
    Симпатии:
    1
    Проверять результат функций кто будет? HInstance валиден?
     
  5. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    Че такое "валиден"
     
  6. European

    Репутация:
    0
    Регистрация:
    4 сен 2006
    Сообщения:
    2.566
    Симпатии:
    1
    valid (англ.) - действительный, т.е. правильно установлен? Почему на NULL не проверяете его?

    а, вот оно что... HInstance в Delphi глобален. Тогда вопрос отпадает... Но в отладочных целях на 0 можно проверить.

    Что возвращает LoadBitmap?
     
  7. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    Правильный он
     
  8. European

    Репутация:
    0
    Регистрация:
    4 сен 2006
    Сообщения:
    2.566
    Симпатии:
    1
    Хто? Хотите помощи - отвечайте полнее.
    Повторю вопрос:
     
  9. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    как узнать?
     
  10. European

    Репутация:
    0
    Регистрация:
    4 сен 2006
    Сообщения:
    2.566
    Симпатии:
    1
    В отладке поставить точку останова и посмотреть
     
  11. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    Точку поставил, а как посмотреть?
     
  12. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    Кие ваще картинки могут быть в ресурсе, чеб их так использовать?
     
  13. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    Код (Text):
    procedure q;
    var
    Img: TBitmap;
    begin
    Img:= TBitmap.Create;
    Img.Handle := LoadBitmap(HInstance,'1');
    Form1.Image1.Canvas.Draw(0, 0, Img);
    Img.Free;
    end;
    Процедура не находится в модуле с формой.
    Вызывается из модуля с формой событием Button1Click.
    Ресурс включен в модуль с процедурой.
    Image окрашивается в белый, картинки нет!
    Почему не работает?
     
  14. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    А имя было нормальное "Shadow.res".
    '1' (В коде) - название картинки в ресурсе.
    Если написать так Img.LoadFromResourceName(HInstance, "MYBITMAP") выдает ошибку
    [DCC Error] Unit2.pas(22): E2038 Illegal character in input file: '"' (#$22)

    Если написать так Img.LoadFromResourceName(HInstance, 'MYBITMAP'), говорит, че не находит моего ресурса.
     
  15. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    Это в смысле файл ресурса называется MYBITMAP.res, так пробовал, не сработало.
    У меня в ресурсе несколько картинок, как же тогда таким методом обращаться к конкретной?
     
  16. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    Говорит что не видит ресурса, что в ' '
     
  17. ProgeRock

    ProgeRock Гость

    Репутация:
    0
    AUCH, не увидел деталь в ресурсе (BITMAP), сработало, спасиба.
     
Загрузка...
Похожие Темы - Картинка из ресурса
  1. Ondrik8
    Ответов:
    107
    Просмотров:
    6.018
  2. R4z0R
    Ответов:
    16
    Просмотров:
    1.836
  3. YGol
    Ответов:
    9
    Просмотров:
    1.478
  4. mirkul
    Ответов:
    2
    Просмотров:
    1.902
  5. nayke
    Ответов:
    7
    Просмотров:
    2.495

Поделиться этой страницей