Свой аплет на панели управления

← →
saNat © (2004-03-02 12:57) [0]

Здравствуйте.
Подскажите, пожалуйста, как создать свой аплет на панели управления. Я знаю чкак создать проект. После компиляции получаем файл и бросаем его в Windows\System. Вопрос в том, как вставить туда форму. После некоторых опытов я заставил ее нормально запускаться, но при закрытии возникает ошибка rundll32 вроде бы...
Буду рад неболшому примеру.
Спасибо за внимание.

← →
Digitman © (2004-03-02 13:06) [1]

в событии Applet.OnCreate создавай экз-р формы, а в событии Applet.OnDestroy уничтожай ... проще уж некуда

← →
saNat © (2004-03-02 13:09) [2]

to Digitman как я из-за уничтожения и глюки.... вроде ведьчерез Form1.Free?

← →
ssk (2004-03-02 13:42) [3]

как создать CPL есть в демках

← →
Digitman © (2004-03-02 14:05) [4]

> ошибка rundll32 вроде бы

> вроде ведьчерез Form1.Free?

у тебя в программе все "вроде" ? или что-то конкретное таки есть сказать по теме ошибки ?

← →
saNat © (2004-03-03 23:11) [5]

to Digitman Виноват. Вот то что у меня есть. Я пользовался ссылкой http://www.delphimaster.ru/articles/applet/index.html.
Там все по русски объяснено: создаем проект апплета, создаем форму, подключаем модуль формы к апплету и ставим вызов формы "в обработчике события OnActivate компонента TАppletModule", компилируем и т.д. Так вот апплет запускается, форма вывождится, но при ее закрыти выкидывается сообщение "Программа выполнила недопустимую операцию и будет закрыта" от Rundll32. Вот и вся проблема.
И все без вроде :)

← →
Юрий Зотов © (2004-03-04 06:48) [6]

> saNat

Обратите внимание на [3]. Зачем пользоваться всякими левыми примерами (неизвестно кем и насколько криво написанными), если в поставке самой Delphi есть примеры прямо от Borland"а?

← →
saNat © (2004-03-04 08:05) [7]

to Юрий Зотов да я обратил внимние... просто в статье (ну насчет левых - все-таки на этом сайте статья расположена) все предельно просто на первый взгляд... далее пишем то, что нужно конкретно тебе, а с тем пришлось посидеть (хотя не все понял) :)
to ssk спасибо за помощь! :)
Но все-равно, а почему там-то не работает, статья ведь существует...

← →
Юрий Зотов © (2004-03-04 08:26) [8]

> saNat © (04.03.04 08:05) [7]

Статей в Сети существует очень много. И очень многие из них написаны криво.

Давным-давно устаревшие описатели (far и пр.). Глобальные хуки, в которых никакой глобальности на самом деле так и нет. Потоки Delphi, у которых в Execute нет ничего, кроме Synchronize. И т.д., и т.п.

Море таких примеров - тем более, что статьи эти зачастую бездумно копируются с одного сайта на другой. Так что всегда подходите к ним критически и помните, что нет ничего надежнее исходников, поставляемых с самой Delphi.

> saNat

корректней всего создавать экз-р формы в событии TAppletModule.OnCreate, а уничтожать экз-р формы в событии TAppletModule.OnDestroy

можно и не уничтожать форму явно в TAppletModule.OnDestroy, а создавать ее в TAppletModule.OnCreate с указанием, что владельцем формы является сам модуль, т.е.

MyForm := TMyForm.Create(self)

тогда перед своим собственным разрушением модуль сначала автоматически разрушит форму

в дизайн-тайм св-во формы Visible следует установить = False, а визуализировать форму как раз и следует в TAppletModule.OnActivate

to Юрий Зотов на самом деле мне нравится данный сайт, я очень много получаю на его страницах (как чат,форум, так и статьи, ссылки), но, на мой взгляд, одно дело форум, где каждый высказывает свое мнение (которое может быть иногда ошибочным), а другое дело раздел "Статьи". Хотя можно провести параллель на учебники по истории последних изданий... Но тогда чему верить? Кстати, а статья останется в данном непроверенном виде? Спасибо за уделенное мне внимание.
to Digitman, to ssk Спасибо за помощь, ну вообщем пришлось покопаться в примере :)
С уважением ,ЕВА

P.S. ну в принципе тема закрыта..., хотя вопрос кто ошибся (я или статья) остался...

Свой аплет на панели управления Найти похожие ветки