Image1.Picture = LoadPicture("E:\zp6.mpg")
If Err.Number <> 0 Then
a = MsgBox("Tufta")
End
End If
ПОЧЕМУ ОШИБКА НЕ ОБРАБАТЫВАЕТСЯ??!?!?!?!??!?!?!?!?!?!??!?!?!
Поясняю кто непонял: Имейдж1 не может просто так взять и открыть МПГ файл... И ОН ПО КОДУ ПОИДЕИ ДОЛЖЕН ВЫДАВАТЬ МЕССАДЖ что "ТУФТА" - а где ОНО??!?!?!?!?
Или как надо то вообще?!?!?
ERROR!!!!!!????!?!?!?!?!?!?!?!?!?!?!?!??!
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 13
• Страница 1 из 1
- LexBondAgent007
- Продвинутый пользователь
-
- Сообщения: 132
- Зарегистрирован: 10.05.2005 (Вт) 16:11
- Откуда: Россия - Москва - ЦАО
ERROR!!!!!!????!?!?!?!?!?!?!?!?!?!?!?!??!
LexBondAgent007 » 23.09.2005 (Пт) 22:22
Это не читайте! Это спам! 
- Kovu
- Постоялец
-
- Сообщения: 924
- Зарегистрирован: 29.04.2005 (Пт) 17:38
Kovu » 23.09.2005 (Пт) 22:32
- Код: Выделить всё
On Error goto ErrHand
<yourKode>
ErrHand:
If Err.Number<>0 then Msgbox
Если всё делать своими ручками, они скоро отвалятся !
- LexBondAgent007
- Продвинутый пользователь
-
- Сообщения: 132
- Зарегистрирован: 10.05.2005 (Вт) 16:11
- Откуда: Россия - Москва - ЦАО
LexBondAgent007 » 23.09.2005 (Пт) 22:41
Все равно не хочет он дальше смотреть! -( Ошибку выдает на строчке с изображением... 
Это не читайте! Это спам!
- BV
- Thinker
-
- Сообщения: 3987
- Зарегистрирован: 12.09.2004 (Вс) 0:55
- Откуда: Молдавия, г. Кишинёв
BV » 24.09.2005 (Сб) 0:25
- Код: Выделить всё
Select Case UCase$(Left$(strFileName, 3))
Case "MPG": Debug.Print "That's it!"
Case Else: ...
Ошибка 'LoadPicture' так или иначе будет.
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;
- FaKk2
- El rebelde gurú
-
- Сообщения: 2031
- Зарегистрирован: 09.03.2003 (Вс) 22:10
- Откуда: Los Angeles
FaKk2 » 24.09.2005 (Сб) 0:57
Нет батенька, нужно в настройках IDE установить флажок Break on Unhandled Errors.
Для получения ответа надо продемонстрировать качества, позволяющие стать компетентным — внимательность, вдумчивость, наблюдательность, желание активно участвовать в выработке решения.
- LexBondAgent007
- Продвинутый пользователь
-
- Сообщения: 132
- Зарегистрирован: 10.05.2005 (Вт) 16:11
- Откуда: Россия - Москва - ЦАО
- LexBondAgent007
- Продвинутый пользователь
-
- Сообщения: 132
- Зарегистрирован: 10.05.2005 (Вт) 16:11
- Откуда: Россия - Москва - ЦАО
LexBondAgent007 » 22.10.2005 (Сб) 16:22
А где она находится? Или где ее можно взять? Никогда чтото раньше с IDE не сталкивался!
Это не читайте! Это спам!
- LexBondAgent007
- Продвинутый пользователь
-
- Сообщения: 132
- Зарегистрирован: 10.05.2005 (Вт) 16:11
- Откуда: Россия - Москва - ЦАО
LexBondAgent007 » 22.10.2005 (Сб) 16:51
Усе! Я уже нашел 
Сказали бы с разу: в "опциях" =)
Ну установил я Break on Unhandled Errors (Прерывать на необработ. ошибках) - и тож самое - ошибка снова необрабатывается!
Сказали бы с разу: в "опциях" =)
Ну установил я Break on Unhandled Errors (Прерывать на необработ. ошибках) - и тож самое - ошибка снова необрабатывается!
Это не читайте! Это спам!
- GM
- programador
- Сообщения: 1427
- Зарегистрирован: 24.06.2003 (Вт) 15:56
- Откуда: 194.67.52.100
GM » 22.10.2005 (Сб) 16:55
А где она находится? Или где ее можно взять? Никогда чтото раньше с IDE не сталкивался!
Кликни правой кнопкой по коду программы, далее Toggle -> Break On Unhandled Errors
الفيجوال بيسك الرابح
- GM
- programador
- Сообщения: 1427
- Зарегистрирован: 24.06.2003 (Вт) 15:56
- Откуда: 194.67.52.100
GM » 22.10.2005 (Сб) 16:59
Не успел, все же.
Вот такая штука, у меня вполне работает:
Вот такая штука, у меня вполне работает:
- Код: Выделить всё
Private Sub Form_Load()
On Error Resume Next
Set Me.Picture = LoadPicture("c:\pagefile.sys")
If Err.Number <> 0 Then
MsgBox "Error"
End If
End Sub
الفيجوال بيسك الرابح
- LexBondAgent007
- Продвинутый пользователь
-
- Сообщения: 132
- Зарегистрирован: 10.05.2005 (Вт) 16:11
- Откуда: Россия - Москва - ЦАО
LexBondAgent007 » 22.10.2005 (Сб) 17:36
Во! Вот что над было добавить то:
On Error Resume Next
МЕГА THANX AND RESPECT!
Даж без всяких break on unhandled errors работает!
Hehe x'D Опередил xP
On Error Resume Next
МЕГА THANX AND RESPECT!
Даж без всяких break on unhandled errors работает!
GM писал(а):Не успел, все же.
Hehe x'D Опередил xP
Это не читайте! Это спам!
Сообщений: 13
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: Google-бот, SemrushBot и гости: 26