Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для Boa Soft

Компьютерный шаман


Сообщения: 2910
Благодарности: 956

Профиль | Сайт | Отправить PM | Цитировать


Вложения
Тип файла: 7z WinBBU.7z
(4.5 Kb, 129 просмотров)

yanus0
Цитата:
WINNTBBU.DLL експортирует InitBillBoard, ProgressGaugeMsg, SetInfoText, SetProgressText, SetStep, SetTimeEstimate
Если есть реальный интерес, то вот:

Код: Выделить весь код
{
 SCU = 5; valid 0..5
 0 XP Professional
 1 Whisler Server
 2 Whisler Advanced Server
 3 Whisler Datacenter Server
 4 XP Home
 5 Whisler Blade Server
}]

type
  TInitBillBoard = function(ParentWnd:DWORD; CmdShow:LPCWSTR; SCU:DWORD ):DWORD; stdcall;
  TStartBillBoard = function: DWORD;  stdcall;
  TStopBillBoard = function: DWORD;  stdcall;
  TTermBillBoard = function: DWORD;  stdcall;
  TSetStep = function(lParam: LPARAM): DWORD;  stdcall;
  TSetProgressText = function(lpString: LPCWSTR): DWORD;  stdcall;
  TSetTimeEstimate = function(lpString: LPCWSTR): DWORD;  stdcall;
  TSetProgress = function(Progress: DWORD): DWORD;  stdcall;
  TShowProgressGaugeWindow = function(nCmdShow: Integer): DWORD;  stdcall;
  TSetInfoText = function(lpString: LPCWSTR): DWORD;  stdcall;
  TBB_Refresh = function: DWORD;  stdcall;
  TGetBBHwnd = function:Hwnd;  stdcall;
  TGetBBMainHwnd = function:Hwnd;  stdcall;
  TGetPanelCount = function:dword;  stdcall;
  TProgressGaugeMsg = function(Msg: UINT; _wParam: WPARAM; _lParam: LPARAM): DWORD;  stdcall;

Во вложение - обертка для библиотеки для изучения и запускалка всех функций. Код - Delphi7.

-------
Человеческая лень - главная движущая сила технического прогресса.

Это сообщение посчитали полезным следующие участники:

Отправлено: 02:18, 10-02-2007 | #5