Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

Проблемма с BitMap-ом 


Delphi5.01   (2001-11-07 20:14) [0]

У меня очень странная проблема, которая как я думаю не должна была появится.
Проблемма заключается вот в чом в программе я создал свой тип
Chip = Record
BitMap : TBitMap;
Pozition : TPoint;
......
Count : Integer;
end;
В программе я создал масив
Yellow_Chips : Array [1..60] of Chip;
Так вот я немогу обрашятся к BitMap-у Yellow_Chips-а А именно делфи ругается на следуюшую строку
Yellow_Chips[1].BitMap.LoadFromFile("Pic.bmp");
Или на эту
Yellow_Chips[1].BitMap.Transparent:=True;
Выносит обну и туже ошибку.
А также не позволяет сделать такую операцию
For i:=1 to 12 do
Yellow_Chips[i].BitMap.LoadFromFile("Pic.bmp");
Пожалуйста помогите! Спасибо!



Raptor   (2001-11-07 22:08) [1]

Привет!

Но у тебя же BitMap: TBitMap. BitMap это только хендл (указатель), а ты пытаешся в него картинку загружать. Сначала надо создать битмапу , а потом уже загружать. Напимер вот так.

Yellow_Chips[1].BitMap:=TBitmap.Create;

а потом уже

Yellow_Chips[1].BitMap.LoadFromFile("Pic.bmp");

Raptor.



Delphi5.01   (2001-11-07 22:20) [2]

Большое спасибо не могу понять как я мог допустить такую ошибку!
Как говорится а ларчик просто открывался!
Ешё раз спасибо ты меня спас значит продолжу писать программу!
:))))))))))))))))))))))))))))))))))))
Урааааааааааааааааааааааааааааааааааа




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.02 c
3-21932           Кристина              2001-12-04 07:43  2002.01.08  
Help :(


3-21953           VariK                 2001-12-05 15:14  2002.01.08  
Про Записи


7-22451           Dmitri                2001-09-23 12:36  2002.01.08  
Директива {$I}


3-21994           Vs                    2001-12-06 16:23  2002.01.08  
Dynamic Array


3-21918           SVS                   2001-12-04 13:11  2002.01.08  
заполнение OleContainer из BlobField