|
|
|
Mailto; Закрытие главного окна
|
|||
|---|---|---|---|
|
#18+
Всем привет! Народ, подскажите плиз. Как реализовать ссылку mailto. Например, юзер кликает по надписи/картинке, и автоматом запускается окно написания эл.письма зарегистрированной в системе почтовой программы. С url разобрался, но не смог найти mailto. 2. Приложение работает из главного окна _Screen.Closable = .T. При закрытии приложения вылетает "Canot Quit VFPro" как решить данную проблему. Заранее признателен. p.s. не предлагать решение через создание form. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.06.2005, 05:06:37 |
|
||
|
Mailto; Закрытие главного окна
|
|||
|---|---|---|---|
|
#18+
По-поводу мейла у меня проблема решается так: использую библиотеку WEBEXPLORER.VCX. На форму перетаскиваю его объект, присваиваю ему: CAPTION=е-мейл TAG=е-мейл TOOLTIPTEXT=THIS.TAG В Click Event код следующий: IF !EMPTY(THIS.TAG) AND TYPE('ThisForm.Webexplorer1') = 'O' THISFORM.Webexplorer1.SendMail(THIS.TAG) ENDIF Можно добавить другой Mouse Icon. Может, не совсем корректно объяснил... но вообщем-то работает. And Justice For All! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.06.2005, 10:20:39 |
|
||
|
Mailto; Закрытие главного окна
|
|||
|---|---|---|---|
|
#18+
Спасибо за ответ. Все понятно - вопросов нет. На второй вопрос не подскажешь? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.06.2005, 11:10:50 |
|
||
|
Mailto; Закрытие главного окна
|
|||
|---|---|---|---|
|
#18+
Честно говоря, не совсем понял второй вопрос... Что представляет собой главный запускной файл? prg-файл? что в нём описано? как осуществляется выход? Есть ли описание ON ERROR, ON SHUTDOWN? Можно использовать такую вот функцию: FUNCTION ShutDown IF MESSAGEBOX("Выйти из программы??",36,_screen.Caption)=6 Clear EVENTS Release All Close All On SHUTDOWN Endif ENDFUNC и: FUNCTION Cleanup IF CNTBAR("_msysmenu")=7 RETURN ENDIF ON ERROR ON SHUTDOWN SET CLASSLIB TO SET PATH TO CLEAR ALL CLOSE ALL POP MENU _msysmenu RETURN Ещё указать RELEASE goApp, если изначально было: PUBLIC goApp goApp=CREATEOBJECT("cApplication") В любом случае - это проблема главного файла. And Justice For All! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.06.2005, 11:40:31 |
|
||
|
Mailto; Закрытие главного окна
|
|||
|---|---|---|---|
|
#18+
Попробуй поиск -=Screen.Closable =- выдаст 5 тем .Почитай. ---------------------------------------------------------- Делай своё дело и будь что будет. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.06.2005, 11:43:58 |
|
||
|
Mailto; Закрытие главного окна
|
|||
|---|---|---|---|
|
#18+
Hi Rusinov St! Код: plaintext 1. 2. 3. 4. 5. При закрытии приложения вылетает "Canot Quit VFPro" ON SHUTDOWN Только ПОИСКОМ воспользуйся, ибо тебе кривоватую функцию посоветовали - CLEAR EVENTS должно быть последней командой по любому... Posted via ActualForum NNTP Server 1.2 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.06.2005, 01:23:59 |
|
||
|
|

start [/forum/topic.php?fid=41&msg=33115223&tid=1594057]: |
0ms |
get settings: |
9ms |
get forum list: |
23ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
86ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
45ms |
get tp. blocked users: |
2ms |
| others: | 233ms |
| total: | 418ms |

| 0 / 0 |
