Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.11.28;
Скачать: CL | DM;

Вниз

Модули   Найти похожие ветки 

 
BiS   (2004-11-15 22:43) [0]

не могу разобратся почему возникает ошибка при выводе бмп, иницинируемого и обработаного(созданого) в другом модуле

unit Unit1;
uses ...,unit2;
...
procedure ...
begin
FileName:="...";
Pr1(FN);
image2.picture.Assign(bm);//здесь по ходу дела и возникает ошибка.
end;

unit unit2;
interface
uses Windows,Graphics, SysUtils;
procedure Rr1(FSN:string);
var
bm:TBitMap;

implementation

procedure Rr1(FSN:string);
begin
 bm1:=TBitMap.Create;
 bm1.LoadFromFile(FSN);
end;


 
ninja ©   (2004-11-15 22:58) [1]

а делфи ругается?
с чего ты взял, что в image2.picture.Assign(bm) ошибка?


 
novice_man ©   (2004-11-15 23:01) [2]

Инициализировал  
bm1:=TBitMap.Create;
bm1.LoadFromFile(FSN);

Обратился:

mage2.picture.Assign(bm)

bm не есть равно bm1!!


 
BiS   (2004-11-15 23:11) [3]

bm и bm1 одно и тоже, это прросто пример, в проге все правильно.
А ругается оно, просто возникает ошибка при существовании команды image2.picture.Assign(bm).


 
novice_man ©   (2004-11-15 23:33) [4]

Дословно как ругается Дельфи??


 
novice_man ©   (2004-11-15 23:36) [5]

Удалено модератором


 
novice_man ©   (2004-11-15 23:36) [6]

Удалено модератором


 
BiS   (2004-11-16 00:01) [7]

просто возникает сообщение про какую-то там ерор, не показывая строку в которой произошла ошибка, сейчас точно сказать не могу про ошибку, така делфа  у меня на другой винде стоит...


 
Anatoly Podgoretsky ©   (2004-11-16 00:18) [8]

Слишком много точек, задача для телепатов, еще и сообшение скрываешь.



Страницы: 1 вся ветка

Текущий архив: 2004.11.28;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.029 c
14-1100279610
vertal
2004-11-12 20:13
2004.11.28
Блокировка удаления exe во время его исполнения в Win NT(2000)


14-1100174179
Карелин Артем
2004-11-11 14:56
2004.11.28
Как по закону перевести клиента с одной программы на другую?


6-1095420604
Softal
2004-09-17 15:30
2004.11.28
Ssh


1-1100467560
dron-s
2004-11-15 00:26
2004.11.28
Ключ реестра


1-1100527259
aap
2004-11-15 17:00
2004.11.28
Cоздание Hint-а как в Win XP.