powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Кнопка рисунок+текст
8 сообщений из 8, страница 1 из 1
Кнопка рисунок+текст
    #32721816
Мудрый клён
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в панель инструментов можно в кнопке отобразить рисунок с текстом,

а в кнопках в формах можно?
...
Рейтинг: 0 / 0
Кнопка рисунок+текст
    #32721826
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В любом рисовальщике делаешь рисунок с текстом.
Разумеется способ совсем даже не хорош. Нельзя динамически менять текст, фонт фиксированный и не зависит от юзерских настроек, но подругому не получится (если стандартные кнопки аксеса использовать).
...
Рейтинг: 0 / 0
Кнопка рисунок+текст
    #32721865
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Используйте CommandButton из MS Forms 2.0
...
Рейтинг: 0 / 0
Кнопка рисунок+текст
    #32745692
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Serge Gavrilov

из конструктора картинка не ставится
специальные - не доступны

программно говорит неправильный тип
если не а аксессе а в VB то там есть свойство picture которому можно назначить картинку

пробовал так:

Код: plaintext
1.
2.
3.
Public Sub pic()
Forms("Накладная").Picture = "c:\1.bmp"
Forms("Накладная").Controls("CommandButton6").Picture = Forms("Накладная").PictureData
End Sub
...
Рейтинг: 0 / 0
Кнопка рисунок+текст
    #32745834
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
АлексейК2 Serge Gavrilov
...
пробовал так:

Код: plaintext
1.
2.
3.
Public Sub pic()
Forms("Накладная").Picture = "c:\1.bmp"
Forms("Накладная").Controls("CommandButton6").Picture = Forms("Накладная").PictureData
End Sub


Forms("Накладная").Picture = LoadPicture("c:\1.bmp")
А еще лучше брать рисунки из ImageList
Forms("Накладная").Picture = ImageList1.ListImages(1).Picture
...
Рейтинг: 0 / 0
Кнопка рисунок+текст
    #32745850
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
спасибо серж,

изврат когда только кодом можно
...
Рейтинг: 0 / 0
Кнопка рисунок+текст
    #32745869
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
АлексейКспасибо серж,

изврат когда только кодом можно

Не согласен :-)
Зачем в дизайне, когда можно кодом :-)
...
Рейтинг: 0 / 0
Кнопка рисунок+текст
    #32745893
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
извращенец

приложение которое само себя переписывает еще не делал?
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Кнопка рисунок+текст
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]