Поиск сообщества
Показаны результаты для тегов 'TStyleObject'.
Найдено: 2 результата
-
Доброго времени суток подскажите как получить картинку из TStyleObject var Item:TListBoxItem; StyleObject: TStyleObject; begin Item := ListBox1.ItemByIndex(0); StyleObject := TStyleObject(Item.FindStyleResource('styleobjectstyle')); if (StyleObject <> nil) and (StyleObject is TControl) then begin Image1.Bitmap:= StyleObject.Source; // Выводит изображение указанное в SourceLookUp целиком; Image1.Bitmap := // Интересует как вывести изображение обрезанное с учетом SourceLink end;
-
Если открыть стандартный файл стиля, то можно заметить такие элементы/компоненты как "TStyleObject", "TActiveStyleObject", "TBrushObject". Интересует вопрос: Как добавлять такие элементы в стиль?
