Не запускается проект...
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 16
• Страница 1 из 1
- moppuk
- Продвинутый пользователь
-
- Сообщения: 115
- Зарегистрирован: 31.01.2006 (Вт) 23:03
Не запускается проект...
moppuk » 29.05.2006 (Пн) 13:39
Народ помогите плиз... Проблема в следующем... Я снес систему и переставил все и Windows и VB. Теперь при запуске проекты получаю вот такое сообщение run-time error '28' Out of stock space... Что это такое и как это обойти. До переустановки проект работал - 100%Заранее спасибо!
С уважением Морозов Николай
- GSerg
- Шаман
- Сообщения: 14286
- Зарегистрирован: 14.12.2002 (Сб) 5:25
- Откуда: Магадан
GSerg » 29.05.2006 (Пн) 14:41
Видимо, прошлый раз винда стояла столь криво, что её выпуклость совпадала с впуклостью кода, и ошибки не происходило (или по крайней мере о ней не сообщалось). Теперь же, видимо, винда встала прямее, и впуклость кода осталась одна в этом жестоком мире...
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас
- moppuk
- Продвинутый пользователь
-
- Сообщения: 115
- Зарегистрирован: 31.01.2006 (Вт) 23:03
moppuk » 29.05.2006 (Пн) 14:55
Блин, парни... Мне через 2 дня диполом защищать!!! Эта программа мне нужна через 2 дня!!! Я просто не успею что-то найти и сделать! Ну может есть что-то, что бы вернуть все!!!
С уважением Морозов Николай
- moppuk
- Продвинутый пользователь
-
- Сообщения: 115
- Зарегистрирован: 31.01.2006 (Вт) 23:03
moppuk » 29.05.2006 (Пн) 15:14
http://www.sendspace.com/file/w0aimt Вот гляньте, кто-нибудь!!!
С уважением Морозов Николай
- alibek
- Большой Человек
- Сообщения: 14205
- Зарегистрирован: 19.04.2002 (Пт) 11:40
- Откуда: Russia
alibek » 29.05.2006 (Пн) 15:25
moppuk, проверяй.
В Form2 добавь следующий код:
1. В Declarations добавь Private fBusyExpand As Boolean
2. Замени код клика на TreeView на этот:
В Form2 добавь следующий код:
1. В Declarations добавь Private fBusyExpand As Boolean
2. Замени код клика на TreeView на этот:
- Код: Выделить всё
Private Sub TreeView1_Expand(ByVal Node As MSComctlLib.Node)
If fBusyExpand Then Exit Sub
fBusyExpand = True
If Node.ForeColor = vbGrayText Then
Node.Expanded = False
Else
Node.Expanded = True
End If
fBusyExpand = True
End Sub
Lasciate ogni speranza, voi ch'entrate.
Сообщений: 16
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot и гости: 58