очищення image
Очищаю Imagу1.picture: = nil.
але як перевірити що там немає зображення
if Image1.Picture = nil then ShowMessage ( "nema")
else ShowMessage ( "e");
завжди є.
а що значить "немає зображення"?
Picture є завжди, тому що це просто контейнер для певного типу: bitmap, metafile, icon
ось їх і треба перевіряти
Я до того, що Imagу1.picture: = nil. - це варварський спосіб. Це все одно, що для того, щоб очистити квартиру від меблів ти зносиш весь під'їзд будинку.
> Але як перевірити що там немає зображення
Нафіга?
> Нафіга?
Я завантажую малюнок в image опреділеніе розміру. при кліці на image якщо є там малюнок то показую його в реальному розмірі
> Imagу1.picture: = nil
Imagу1.width і Imagу1.height дорівнюють нулю;)
або я погарячкував?
> А що значить "немає зображення"?
> Picture є завжди, тому що це просто контейнер для
> Певного типу: bitmap, metafile, icon
> Ось їх і треба перевіряти
Image1.Picture.Bitmap: = nil; ось так?
> Magу1.width і Imagу1.height дорівнюють нулю;)
так ето просто скрити малюнка.
> Я до того, що Imagу1.picture: = nil. - це варварський спосіб.
> # XA0; Це все одно, що для того, щоб очистити квартиру від
> Меблів ти зносиш весь під'їзд будинку.
правильніше буде Image1.Picture.Bitmap: = nil ;?
(Bitmap, metafile, icon, Graphic)?
> Ти перевір!
Image1.Picture.Bitmap: = nil;
if Image1.Picture.Bitmap = nil then ShowMessage ( "nema")
else ShowMessage ( "e");
всгда "е"
хелп ні хрена не Новомосковськ
Bitmap.Empty або Graphic.Empty
Це в якій версії Дельфі?
А то що в довідці з Д7 я не знайшов цього.
ну я саме там і знайшов)
втім, воно і в генофонді є
TGraphic = class (TInterfacedPersistent, IStreamPersist)
.
property Empty: Boolean read GetEmpty;
Я шукав це Bitmap.Empty і цього не знайшлося, є TGraphic.Empty
І ще питання, ти це рекомендував для очищення або щоб дізнатися "чиста" чи ні.
> Ти це рекомендував для очищення
Хіба що для очищення совісті, враховуючи, що
property Empty: Boolean read GetEmpty;
o)
> Я шукав це Bitmap.Empty і цього не знайшлося, є TGraphic.Empty
TBitmap = class (TGraphic)
.
protected
.
# XA0; # XA0; function GetEmpty: Boolean; override;
Та ні проблем, я вже давно розібрався, чому не знаходив і цей віртуальний метод теж знайшов.
У мене сообственно більше питань до тебе немає :-)