Страница: 1 |
Вопрос: Программный раздел рисунка | Добавлено: 17.09.04 17:41 |
Автор вопроса: ![]() |
Есть куча программ, которые делают так: есть один рисунок, в котором сразу показано 2 позиции кнопку, к примеру (ну типа нажата, не нажата).
Дак как это в ВБ организовать??? Может АПИ????? |
Ответы | Всего ответов: 13 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ICQ: 266287351 Вопросов: 31 Ответов: 147 |
Профиль | Цитата | #1 | Добавлено: 17.09.04 17:42 |
П.С. Не раздел, а разрез!!!! |
Номер ответа: 2 Автор ответа: ![]() ![]() ![]() ICQ: 266287351 Вопросов: 31 Ответов: 147 |
Профиль | Цитата | #2 | Добавлено: 17.09.04 18:11 |
Кстати, кто может дать описание АПИ GetObjectA |
Номер ответа: 3 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | Цитата | #3 | Добавлено: 17.09.04 20:35 |
GetObject заполняет специфичную для объекта структуру информацией об объекте.
Структура (пользовательский тип) может быть одна из BITMAP, DIBSECTION, EXTLOGPEN, LOGBRUSH, LOGFONT, or LOGPEN. Private Declare Function GetObject Lib "gdi32.dll" Alias "GetObjectA" ( _ ByVal hObject As Long, _ ByVal nCount As Long, _ ByRef lpObject As Any) As Long hObject - логический номер объекта. Его возвращают функции, создающие объект. Такие как CreateBITMAP, CreateDIBSection и т.д. nCount - длина структуры. Например: Dim B as BITMAP: nCount=LEN(B) lpObject - Структура, специфичная для объекта, которую функция заполнит информацией. Передаётся по ссылке (ByRef) или можно ByVal её адреса (например ByVal VarPtr(B)). |
Номер ответа: 4 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | Цитата | #4 | Добавлено: 17.09.04 20:36 |
Пример есть в API-Guide |
Номер ответа: 5 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 34 Ответов: 63 |
Профиль | Цитата | #5 | Добавлено: 17.09.04 20:36 |
Можно использовать свойство PaintPicture:
object.PaintPicture picture, xl, yl, width1, height1, x2, y2, width2, height2, opcode а можно, и помоему лучше, использовать контрол PictureClip: PictureClip1.Picture = LoadPicture("Адрес рисунка" ![]() PictureClip1.Cols = 2 PictureClip1.Rows = 1 Picture1.Picture = PictureClip1.GraphicCell(1) Picture1.Picture = PictureClip1.GraphicCell(2) |
Номер ответа: 6 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 34 Ответов: 63 |
Профиль | Цитата | #6 | Добавлено: 17.09.04 20:41 |
Ощибся. Последняя строчка:
Picture2.Picture = PictureClip1.GraphicCell(2) |
Номер ответа: 7 Автор ответа: ![]() ![]() ![]() ICQ: 266287351 Вопросов: 31 Ответов: 147 |
Профиль | Цитата | #7 | Добавлено: 18.09.04 12:27 |
Не, а где этот API-guide ?????? |
Номер ответа: 8 Автор ответа: ![]() ![]() ![]() ICQ: 266287351 Вопросов: 31 Ответов: 147 |
Профиль | Цитата | #8 | Добавлено: 18.09.04 12:28 |
И вы хотя-бы пример не можете дать?????? |
Номер ответа: 9 Автор ответа: ![]() ![]() ![]() ICQ: 266287351 Вопросов: 31 Ответов: 147 |
Профиль | Цитата | #9 | Добавлено: 18.09.04 12:41 |
А PictureCLip не годится - он режет одинаковыми кусками. |
Номер ответа: 10 Автор ответа: ![]() ![]() ![]() ICQ: 266287351 Вопросов: 31 Ответов: 147 |
Профиль | Цитата | #10 | Добавлено: 18.09.04 12:42 |
Просто мне надо зделать так: типа сверху у рисунка большая часть (фон формы), а снизу - рисунки CommandButton'ов |
Номер ответа: 11 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 30 Ответов: 683 |
Профиль | Цитата | #11 | Добавлено: 18.09.04 13:03 |
API-Guide на сайте allapi.net |
Номер ответа: 12 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 34 Ответов: 63 |
Профиль | Цитата | #12 | Добавлено: 18.09.04 16:07 |
А PaintPicture не пойдёт? |
Номер ответа: 13 Автор ответа: ![]() ![]() ![]() ICQ: 266287351 Вопросов: 31 Ответов: 147 |
Профиль | Цитата | #13 | Добавлено: 19.09.04 18:46 |
Пасиба, Tigre!! Подходит, пока подходит ![]() |
Страница: 1 |
|