|
Вопрос # 4 505/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты
пытаюсь загрузить точечные рисунки из ресурсного файла в Imagelist
но imagelist1.count всё равно равно 0. почему так?
 |
Вопрос задал: павел1991x (статус: Посетитель)
Вопрос отправлен: 16 августа 2010, 12:49
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: bugmenot
1. FileLoad не поддерживает чтение двоичных ресурсов
2. FileLoad возвращает статус операции
следовательно, дОлжно быть так:
if not imagelist1.FileLoad(rtBitmap, 'BITMAP1.bmp', clWhite) then
// неуспешно
 |
Ответ отправил: bugmenot (статус: 3-ий класс)
Время отправки: 16 августа 2010, 13:16
Оценка за ответ: 4
|
Мини-форум вопроса
Всего сообщений: 10; последнее сообщение — 16 августа 2010, 21:33; участников в обсуждении: 3.
|
min@y™ (статус: Доктор наук), 16 августа 2010, 13:02 [#1]:
Какая версия Delphi?
У меня в Delphi 7 у TImageList нет метода FileLoad().
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
павел1991x (статус: Посетитель), 16 августа 2010, 13:11 [#2]:
delphi7
как можно другим способом это сделать?
|
|
|
min@y™ (статус: Доктор наук), 16 августа 2010, 13:26 [#3]:
Цитата (павел1991x):
delphi7
Может я чего-то не понимаю, но вот кусок список методов TImageList из Delphi 7:
Цитата:
In TImageList
~TImageList
TImageList
Derived from TCustomImageList
Add
AddImages
AddMasked
Assign
Clear
Create
CreateSize
Delete
Destroy
Draw
GetBitmap
GetMask
GetPixmap
Insert
InsertMasked
Move
ReadData
RegisterChanges
Replace
ReplaceMasked
UnRegisterChanges
WriteData
Отсюда вывод: кусок кода для другой версии Delphi ты спёр из интернета, тупо скопипастил в свою прогу и по-децки удивляешься "а почему не работает??!!11".
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
min@y™ (статус: Доктор наук), 16 августа 2010, 13:43 [#5]:
Цитата (bugmenot):
Действительно. Я залез в исходник и там нашёл этот метод. Станно, что его нет в хэлпе.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
bugmenot (статус: 3-ий класс), 16 августа 2010, 15:20 [#6]:
Действительно странно, ибо:
<blockquote>
VCL Reference
TImageList methods
TImageList Alphabetically Legend
...
Derived from TCustomImageList
...
Draw
DrawOverlay
FileLoad
GetBitmap
GetIcon
...
</blockquote>
виконання програми розпочинається з того самого мiсця, де призупинилося.
|
|
|
min@y™ (статус: Доктор наук), 16 августа 2010, 15:31 [#7]:
Цитата (bugmenot):
Действительно странно, ибо:
У тебя версия Delphi какая?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
bugmenot (статус: 3-ий класс), 16 августа 2010, 20:30 [#8]:
самая обычная 7.0 build 8.1
виконання програми розпочинається з того самого мiсця, де призупинилося.
|
|
|
min@y™ (статус: Доктор наук), 16 августа 2010, 20:42 [#9]:
Цитата (bugmenot):
самая обычная 7.0 build 8.1
У меня delphi 7 build 4.453.
Видать, многое изменилось.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
bugmenot (статус: 3-ий класс), 16 августа 2010, 21:33 [#10]:
7.0.4.453 - Update 1 не установлен, видимо
виконання програми розпочинається з того самого мiсця, де призупинилося.
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
