Список форумов Акцент Акцент
официальный форум разработчика программы Акцент
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 

Переводчик

 
Начать новую тему   Ответить на тему    Список форумов Акцент -> Акцент 7.0
Предыдущая тема :: Следующая тема  
Автор Сообщение
Виктор



Зарегистрирован: 10.03.2005
Сообщения: 210
Откуда: Горловка (Щирий кум)

СообщениеДобавлено: Ср Май 18, 2011 9:57 am    Заголовок сообщения: Переводчик Ответить с цитатой

Задрал Азаров учить всей страной украинский - поэтому:


Код:
Option Explicit
Dim dlg
Set dlg = CreateLibObject("DHTMLDialog")
With dlg
  .Caption = "Google Переводчик - в Акценте"
  .Resizable = True
  .URL = "http://translate.google.com.ua/?hl=ru&ie=UTF-8&oe=UTF-8&tab=wT#ru|uk|"
  .Width = 850
  .Height = 320
  '.SetArgument "wa", app.WorkArea   'будут доступны в тексте скрипта диалога через переменные.
  .CreateModeless
End With


А там как хотите хоть в меню, хоть в кнопку
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов Акцент -> Акцент 7.0 Часовой пояс: GMT + 2
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Powered by phpBB © 2001, 2005 phpBB Group