Возвратить фокус приложению

← →
zorik © (2006-05-19 11:56) [0]

У меня приложение делает экспорт в ексель. Как после экспорта сделать активным окно приложения?

← →
Elen © (2006-05-19 11:58) [1]

setforegroundwindow(form1.handle)
вернет на перед экрана твою форму

← →
zorik © (2006-05-19 12:03) [2]

> Elen © (19.05.06 11:58) [1]

Не то. После экспорта появляется сообщение "експорт успешный". Хочу чтоб оно стало активным или замигало синим как в програмах сканирования

← →
Elen © (2006-05-19 12:11) [3]

FlashWindow(handle) замигает тебе нужное окно.

>сообщение "експорт успешный".

Что за сообщение кто и как сообщает? Exсel или твоя прога?

← →
Elen © (2006-05-19 12:12) [4]

Можеш ли отследить завершение экспорта?

← →
zorik © (2006-05-19 12:20) [5]

Из главной, назовем ее так, формы вызывается процедура экспорта. Процедура в отдельном модуле. Она (процедура) создает объект ексель, експортирует туда данные, но не закрывает его (ексель). Собственно он остается активным. При успешном експорте - сообщение "ок", иначе - сообщение о ошибке. Примерно так

procedure Form1.ButtonExportClick; begin ExportData; end; pocedure ExportData; begin try //тут делаем все что нужно MessageDlg("Ok"); except raise Exception.Create("error"); end; end; P.S.: Код писал прямо сдесь

← →
Elen © (2006-05-19 12:29) [6]

А ты сделай создание обьекта Excel невидимым. Кажется в этом обькте есть свойство невидимости (только не помню как называется).
попробуй <переменная_с Экселем>.applicationVisible:=false.
Эксель не должен показываться на экране. или примени это после импорта.
или тебе обязательно нужно видеть эксель на экране?

Красиво выглядит, когда целыми кусками данные кидаются. Ладно, сделаю прогрес на форме поверх всех окон. Пользователь будет знать когда все закончилось.

Месьва мудрое решеньеце

Возвратить фокус приложению Найти похожие ветки