powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Не срабатывает destroy
3 сообщений из 3, страница 1 из 1
Не срабатывает destroy
    #33205513
boogiman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Добрый день, всем! Хотел бы обратиться к Вам за помощью! Дело в том, что у меня не срабатывает уничтожение Word - объкта.

//Вот так я его объявляю и открываю

OLEObject W
W= create OleObject

i= W.ConnectToNewObject("Word.Application")
if i =0 then
W.Documents.Add
W.Application.Visible=true
else
messagebox("",'Bad!')
Return
end if

//А вот так закрываю (на закрытии окна)


TRY
W.Visible = false
W.DisconnectObject()
destroy w
CATCH (runtimeerror er)
MessageBox(" Ошибка !!!", &
/*+er.GetMessage()*/ + &
'~n' + ' Вы закрыли word вручную!',StopSign!)
END TRY

Word закрывается, всё проходит успешно, но он остаётся в памяти. Скольно раз сработало приложение, столько раз и отображается WinWord в диспетчере задач!

Может кто - нибудь с таким сталкивался? Зараннее спасибо (PB 9.0, Office 2003)
...
Рейтинг: 0 / 0
Не срабатывает destroy
    #33205523
Фотография Anatoly Moskovsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня закрывается так:
Код: plaintext
1.
2.
3.
ole_1.Application.Quit
ole_1.DisconnectObject()
DESTROY ole_1
...
Рейтинг: 0 / 0
Не срабатывает destroy
    #33205576
boogiman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо Анатолий, помогло! Странно как то! Я эти фрагменты кода брал на форуме! Неужели никто до этого не следил за памятью! Ещёраз спасибо!
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Не срабатывает destroy
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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