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

Вниз

Как узнать есть ли в компоненте image рисунок ?   Найти похожие ветки 

 
Sanya_87_1   (2010-01-10 21:31) [0]

Как проверить содержит ли компонент image рисунок или нет? Так не получается if image1.picture.bitmap <> nil


 
oldman ©   (2010-01-10 21:34) [1]

Сам по себе он ведь там не появиться.
При загрузке рисунка меняй, например, tag.
И проверяй его потом.


 
Sanya_87_1   (2010-01-10 21:36) [2]

Может и появиться, как нибудь без Tag"a можно проверить?


 
oldman ©   (2010-01-10 21:38) [3]

А что значит "нет рисунка"?
Серый квадрат (или белый) тоже рисунок.


 
Sanya_87_1   (2010-01-10 21:41) [4]

Нет рисунка это когда не был выполнен метод Image1.picture.loadfromfile("c:\risunok.bmp");    Вся проблема в том что я не могу его отследить, поэтому проверка через Tag отпадает.


 
oldman ©   (2010-01-10 21:44) [5]


> Вся проблема в том что я не могу его отследить, поэтому
> проверка через Tag отпадает.


Переведи.


 
antonn ©   (2010-01-10 21:47) [6]


> Так не получается if image1.picture.bitmap <> nil
>

image1.picture<>nil ? :)


 
Григорьев Антон ©   (2010-01-10 21:47) [7]

if Assigned(Image1.Picture.Graphic) and not Image1.Picture.Graphic.Empty then...

Ваш код не работает потому, что TPicture.Bitmap - это свойство, в методе чтения которого Bitmap, если он ещё не создан, создаётся, поэтому Image1.Picture.Bitmap никогда не может быть равен nil.

А вообще, такие вещи надо уметь самостоятельно находить в справке и в исходниках VCL, а то так и будете из-за каждой ерунды в форум бегать.


 
Sanya_87_1   (2010-01-10 21:54) [8]

> antonn ©   (10.01.10 21:47) [6]

Ваш метод не работает :)

Григорьев Антон ©   (10.01.10 21:47) [7]

Спасибо, все получилось!



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

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

Наверх




Память: 0.48 MB
Время: 0.018 c
15-1261508714
chery
2009-12-22 22:05
2010.03.14
помогите пожалуйста написать программу в Delphi


15-1261638900
Oleg1963
2009-12-24 10:15
2010.03.14
Помогите. Delphi 7 interprise не компилирует


2-1263133331
kitten
2010-01-10 17:22
2010.03.14
Создание DLL библиотек...


3-1236167363
Zalum
2009-03-04 14:49
2010.03.14
Данные из запроса


2-1263287295
Mery
2010-01-12 12:08
2010.03.14
Сложность в построении запроса