Расскраска AppFrame ...

[Игорь Столяров]

Привет всем ! И наверно уже поздравляю с наступающим Новым годом !

Возник абсолютно идиотский вопрос. Можно ли и как расскрасить фон главного меню программы (AppFrame) ?
Понятно, что можно на лету сгенерить BMP картинку любого цвета и подсунуть ее как WallPaper ...
Но как-то это уже слишком через ж ... даже еще на трезвую голову.

Может кто-нибудь знает как это сделать проще ? Буду благодрен ...

[Дед Пахом]

Чё-та не понятно... Точно на трезвую голову? Зачем на лету, если можно в свойствах окна прописать?

[Игорь Столяров]

Точно на трезвую голову? Зачем на лету, если можно в свойствах окна прописать?

Пока да, ибо так рано у нас не наливают. А жаль !

На лету, потому, что предполагается, что пользователь должен сам, где-то в настройке программы, выбрать цвет фона который ему нравится.
А программа при запуске должна этот цвет фона показать ... Сразу отвечу на назревающий вопрос: Это не шиза.
Есть одна программа, в которой ведутся разные БД. Есстественно в заголовке окна, стороке статуса и т.д. все написано, какая БД, фирма, учет.
Но оператор когда быстро переключается между программамми, к концу дня начинает путаться. И руководство (суки !) придумали раскрасить
разные проограммы - в разный цвет ... Вот и возник вопрос с которого я начал ... как это сделать ...

[Admin]

Чё-та не понятно... Точно на трезвую голову? Зачем на лету, если можно в свойствах окна прописать?

Я думаю что разговор не о фоне AppFrame а о фоне меню в AppFrame.
Вам в сторону CFC_Menu нужно копать.

SNAGIT.png (5.79 КБ) 2674 просмотра

[Алексей- Софт-Центр]

Добрый день!
Игорь! Я делаю попроще: для каждой базы - есть своя фотография, которая подсовывается при старте программы .
Поэтому одна и та же программа стартует с разными фотками-картинками, да и разными иконками,
когда программы сворачивается и открыто сразу несколько программ, работающих с разными базами.


Алексей

[Stalker]

Здравствуйте!
Я поступил так, создал файл с полями: пользователь, путь к файлу картинки фона, код отображений (замостить или растянуть), признак активизации (1 активизировать, 0 -нет). Дал возможность выбора фона каждому пользователю в отдельной процедуре под себя, после выбора при входе пользователя при авторизации считывалась информация с файла и показывалось окно нужного окраса для данного пользователя и фона через вставку

Window{PROP:Wallpaper} = Pre_tab_fon ! файл фона

if Pre_tab_fon_kod = 1 !код замостить или растянуть рисунок
Window{PROP:TileImage} = 1
Window{PROP:STRETCH} = 0
else
Window{PROP:STRETCH} = 1
Window{PROP:TileImage} = 0
. !If
Естественно значения переменных считывались до открытия окна
Может сложновато, но работает.