purebasic.info

PureBasic forum
Текущее время: Вс янв 21, 2018 11:34 pm

Часовой пояс: UTC + 3 часа




Начать новую тему Ответить на тему  [ 1 сообщение ] 
Автор Сообщение
 Заголовок сообщения: Онлайн API справка
СообщениеДобавлено: Вс окт 17, 2010 6:59 pm 
Не в сети
профессор
Аватар пользователя

Зарегистрирован: Пн сен 07, 2009 10:00 pm
Сообщений: 1046
Откуда: Николаев
Благодарил (а): 0 раз.
Поблагодарили: 0 раз.
Пункты репутации: 0
Инструмент позволяющий по горячим клавишам вызывать справку
по win API функциям и константам.

По аналоги с стандартной справкой, наводим курсор в редакторе PB и жмём горячую клавишу.
Инструмент достаточно старый...
Упоминание о нём начинается с 2006 года.
А у нас на форуме не нашел...

Код:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
 
;---------------------------------------------------------------------
;              Онлайн справка API
;
; Работает как "помощь PureBasic (клавиша F1), но и для Win32 функций.
; Определяет, функции Win32 вида:   Функция_ ()
; и константы вида:                 #MB_ICONERROR
;---------------------------------------------------------------------
; Установка:
; 1.
; Скомпилировать этот исходный код
; 2.
; Меню "Инструменты">> Настройка инструментов >> Новый
; Командная строка: указать путь к исполняемому файлу
; Название: справка API Online
; События запуска унструмента: меню или горячая клавиша
; (например):  Ctrl +F1
 
;
;Здесь мы должны определить, "URL, который будет использоваться для исследований
;
; Url.s = "http://www.google.com/search?q=site:msdn.microsoft.com+msdn+win32+"+Word+"&btnI=true"
;
; Этот код определяет слово под курсором в встроенном редакторе PureBasic
 
 
Define.s Word
Word = GetEnvironmentVariable("PB_TOOL_Word")
If Word
  If Right(Word, 1) = "_"
    Word = Left(Word, Len(Word) -1)
  ElseIf Left(Word, 1) = "#"
    Word = Right(Word,Len(Word) -1)
  EndIf
 
  RunProgram("rundll32.exe","url.dll,FileProtocolHandler http://www.google.ru/search?q=site:msdn.microsoft.com+msdn+win32+" + Word + "&btnI=true", "")
EndIf
 
 
 
 



Подключается стандартно:
(горячие клавишы выбирал в PB4.30 а в PB4.41 не нашел... )
Изображение

_________________
www.mirashic.narod.ru
Первое знакомство с PB


Вернуться наверх
 Профиль  
 
Показать сообщения за:  Сортировать по:  
Начать новую тему Ответить на тему  [ 1 сообщение ] 

Часовой пояс: UTC + 3 часа


Кто сейчас на форуме

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 7


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Создано на основе phpBB® Forum Software © phpBB Group (блог о phpBB)
Сборка создана CMSart Studio
Русская поддержка phpBB