|
|
|
скроллы в MDI
|
|||
|---|---|---|---|
|
#18+
vb6.0. Есть десяток MDI форм с туевой хучей всяких элеменов. Их так много, что в 800х600 они не влезают. Как бы к этим формам пределать скроллы. Никаких свойств отвечающих за скроллы у mdi - ных форм я не обнаружил. Попытался подкопаться через win api Private Declare Function SendMessage _ Lib "user32" Alias "SendMessageA" ( _ ByVal hwnd As Long, _ ByVal wMsg As Long, _ ByVal wParam As Long, _ ByRef lParam As style _ ) As Long Private Type style styleOld As Long styleNew As Long End Type Public Form_Load() Dim Rtn As Long Dim st As style ScaleMode = vbPixels st.styleOld = 0 st.styleNew = 1085276160 '(WS_BORDER Or WS_CHILD Or WS_HSCROLL Or WS_VSCROLL Or WS_OVERLAPPED) Rtn = SendMessage(hwnd, 124, &HFFFFFFF0, st) но не знаю как получить указатель на структуру. К тому же он ругался на переполнение при передаче dword-ового параметра. PS. Можно ли как-то через ADO сжимать Access-овскую базу (т.е. удалять удаленные объекты). PPS. Как видно из моего сообщения, VB я не знаю. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.11.2004, 05:45:12 |
|
||
|
|

start [/forum/topic.php?fid=60&fpage=350&tid=2168651]: |
0ms |
get settings: |
7ms |
get forum list: |
11ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
17ms |
get topic data: |
6ms |
get forum data: |
2ms |
get page messages: |
26ms |
get tp. blocked users: |
1ms |
| others: | 203ms |
| total: | 277ms |

| 0 / 0 |
