Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Кнопка рисунок+текст / 8 сообщений из 8, страница 1 из 1
04.10.2004, 11:35:43
    #32721816
Мудрый клён
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кнопка рисунок+текст
в панель инструментов можно в кнопке отобразить рисунок с текстом,

а в кнопках в формах можно?
...
Рейтинг: 0 / 0
04.10.2004, 11:39:26
    #32721826
Лох Позорный
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кнопка рисунок+текст
В любом рисовальщике делаешь рисунок с текстом.
Разумеется способ совсем даже не хорош. Нельзя динамически менять текст, фонт фиксированный и не зависит от юзерских настроек, но подругому не получится (если стандартные кнопки аксеса использовать).
...
Рейтинг: 0 / 0
04.10.2004, 11:52:31
    #32721865
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кнопка рисунок+текст
Используйте CommandButton из MS Forms 2.0
...
Рейтинг: 0 / 0
20.10.2004, 09:31:33
    #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
20.10.2004, 10:44:44
    #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
20.10.2004, 10:50:22
    #32745850
АлексейК
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кнопка рисунок+текст
спасибо серж,

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

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

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

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


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