Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 |

 

  Вопрос: Информация о видеокарте Добавлено: 06.03.07 16:26  

Автор вопроса:  Chuvakstepan | Web-сайт: chuvakstepan.xost.ru | ICQ: 233519897 

Ответить

  Ответы Всего ответов: 25  

Номер ответа: 16
Автор ответа:
 vito



Разработчик Offline Client

Вопросов: 23
Ответов: 879
 Web-сайт: softvito.narod2.ru
 Профиль | | #16
Добавлено: 10.03.07 01:30
В SDK 8 для 6 -ки, и примеры и доки. В 9 тоже, но основной акцент конечно на С#.

Ответить

Номер ответа: 17
Автор ответа:
 Chuvakstepan



ICQ: 233519897 

Вопросов: 1
Ответов: 13
 Web-сайт: chuvakstepan.xost.ru
 Профиль | | #17
Добавлено: 10.03.07 05:20
Большое спасибо за примеры, но есть одно но - при старте (проверки) исполняемой vb проекта , он выдаёт ошибку в каждом примере и всегда разную

А именно в VertexShader он выдает :
Определяемый пользователем тип не определен
Строка: "Function D3DUtil_CreateFrame(parent As CD3DFrame) As CD3DFrame"

Ответить

Номер ответа: 18
Автор ответа:
 Chuvakstepan



ICQ: 233519897 

Вопросов: 1
Ответов: 13
 Web-сайт: chuvakstepan.xost.ru
 Профиль | | #18
Добавлено: 10.03.07 05:37
А в примере VB Pixel Shader говорит ошибка автоматизации
Строчка: Set d3dt(0) = d3dx.CreateTextureFromFile(dev, sFile)

Ответить

Номер ответа: 19
Автор ответа:
 Chuvakstepan



ICQ: 233519897 

Вопросов: 1
Ответов: 13
 Web-сайт: chuvakstepan.xost.ru
 Профиль | | #19
Добавлено: 10.03.07 05:46
Самое интересное - создаю в папке с проектом VBPixelShaders два файла lake.bmp и seafloor.bmb
Стартует без ошибок, но форма вся черная и не видно версии шейдеров (или я что-то не понимаю)

Ответить

Номер ответа: 20
Автор ответа:
 vito



Разработчик Offline Client

Вопросов: 23
Ответов: 879
 Web-сайт: softvito.narod2.ru
 Профиль | | #20
Добавлено: 10.03.07 13:53
Ресурсов я не включил. Поэтому ошибки.
Set d3dt(0) = d3dx.CreateTextureFromFile(dev, sFile)

Просто закомеентируй строчки. Должен получиться просто синий экран.
Если экран черный, то где -то ошибка.
Что касается примера VBPixelShaders, у меня он тоже не работает, извини просто забыл(как и некоторые другие). Потому как аналоги на С++ все работают без проблем.

Ответить

Номер ответа: 21
Автор ответа:
 vito



Разработчик Offline Client

Вопросов: 23
Ответов: 879
 Web-сайт: softvito.narod2.ru
 Профиль | | #21
Добавлено: 10.03.07 15:13
Если экран черный, то где -то ошибка.

Ерунду написал.:)
Обычно в DX очищают синим цветом.
 
' Clear the backbuffer to a blue color (ARGB = 000000ff)
    '
    ' To clear the entire back buffer we send down
    '   rect count = 0
    '   clearD3DRect = ByVal 0 (ByVal is necessary as param is of type as any)
    '   flags = D3DCLEAR_TARGET to specify the backbuffer
    '   color = &HFF& to specify BLUE (note final & indicates this is a long)
    '   zClear = 1  which is not used
    '   stencil = 0  which is not used
    g_D3DDevice.Clear 0, ByVal 0, D3DCLEAR_TARGET, &HFF&, 1#, 0

Но не всегда.
Тот же черный экран получается, если устройство не удалось создать.
Если никаких сообщений о ошибках программа не выдала, значит все проверки прошли успешно.
А почему не работает...? Кто его знает.

Ответить

Номер ответа: 22
Автор ответа:
 -=Fenix=-



Вопросов: 33
Ответов: 81
 Профиль | | #22 Добавлено: 10.03.07 21:16
В SDK 8 для 6 -ки, и примеры и доки. В 9 тоже, но основной акцент конечно на С#.

А для SDK под DX10 нету доков для VB? Ато ставиьт более старую версию и тянуть с инета ещё 400 метров немного напрягает =(

Ответить

Номер ответа: 23
Автор ответа:
 vito



Разработчик Offline Client

Вопросов: 23
Ответов: 879
 Web-сайт: softvito.narod2.ru
 Профиль | | #23
Добавлено: 11.03.07 00:43
-=Fenix=-

Их и в 9 нет. В моем SDK от декабря 2006 всего один пример под VB.NET. Доки под С#, просто приводится синтаксис вызова функций на VB, Man C++, J#.
Под 10 DX все только на С++ (неуправляемом).

Ответить

Номер ответа: 24
Автор ответа:
 Chuvakstepan



ICQ: 233519897 

Вопросов: 1
Ответов: 13
 Web-сайт: chuvakstepan.xost.ru
 Профиль | | #24
Добавлено: 07.04.07 15:47
есть dll'ка, с помощью её можно узнать имя видюхи (и не только) Вот только как её использовать в Visual Basic? DLL брать тут: http://rl-team.ru/1583830
Вот код на Object Pascal:

function GetVideoCardName(): PChar;
external 'hwc_GetVideoCardName@files:get_hw_caps.dll stdcall';
 
function GetSoundCardName(): PChar;
external 'hwc_GetSoundCardName@files:get_hw_caps.dll stdcall';
 
function DetectHardware(): Integer;
external 'hwc_DetectHardware@files:get_hw_caps.dll stdcall';
 
function GetHardDriveFreeSpace(hdd: integer): Integer;
external 'hwc_GetHardDriveFreeSpace@files:get_hw_caps.dll stdcall';
 
function GetHardDriveName(hdd: integer): PChar;
external 'hwc_GetHardDriveName@files:get_hw_caps.dll stdcall';
 
function GetHardDriveTotalSpace(hdd: integer): Integer;
external 'hwc_GetHardDriveTotalSpace@files:get_hw_caps.dll stdcall';
 
function GetHardDrivesCount(): Integer;
external 'hwc_GetHardDrivesCount@files:get_hw_caps.dll stdcall';
 
function GetSoundCards(): Integer;
external 'hwc_GetSoundCards@files:get_hw_caps.dll stdcall';
 
function GetSystemPage(): Integer;
external 'hwc_GetSystemPage@files:get_hw_caps.dll stdcall';
 
function GetSystemPhys(): Integer;
external 'hwc_GetSystemPhys@files:get_hw_caps.dll stdcall';
 
function GetVidMemLocal(): Integer;
external 'hwc_GetVidMemLocal@files:get_hw_caps.dll stdcall';
 
function GetVidMemNonLocal(): Integer;
external 'hwc_GetVidMemNonLocal@files:get_hw_caps.dll stdcall';
 
function GetVideoCardDev(): Integer;
external 'hwc_GetVideoCardDev@files:get_hw_caps.dll stdcall';
 
function GetVideoCardVen(): Integer;
external 'hwc_GetVideoCardVen@files:get_hw_caps.dll stdcall';
 
 
function InitializeSetup(): Boolean;
var
  res: string;
begin
  res:= 'GetVideoCardName - ' + GetVideoCardName + #10#13;
  res:= res + 'GetSoundCardName - ' + GetSoundCardName + #10#13;
  res:= res + 'DetectHardware - ' + IntToStr(DetectHardware()) + #10#13;
  res:= res + 'GetHardDriveName - ' + GetHardDriveName(0) + #10#13;
  res:= res + 'GetHardDriveFreeSpace - ' + IntToStr(GetHardDriveFreeSpace(0)) + #10#13;
  res:= res + 'GetHardDriveTotalSpace - ' + IntToStr(GetHardDriveTotalSpace(0)) + #10#13;
  res:= res + 'GetHardDrivesCount - ' + IntToStr(GetHardDrivesCount()) + #10#13;
  res:= res + 'GetSoundCards - ' + IntToStr(GetSoundCards()) + #10#13;
  res:= res + 'GetSystemPage - ' + IntToStr(GetSystemPage()) + #10#13;
  res:= res + 'GetSystemPhys - ' + IntToStr(GetSystemPhys()) + #10#13;
  res:= res + 'GetVidMemLocal - ' + IntToStr(GetVidMemLocal()) + #10#13;
  res:= res + 'GetVidMemNonLocal - ' + IntToStr(GetVidMemNonLocal()) + #10#13;
  res:= res + 'GetVideoCardDev - ' + IntToStr(GetVideoCardDev()) + #10#13;
  res:= res + 'GetVideoCardVen - ' + IntToStr(GetVideoCardVen()) + #10#13;
 
  MsgBox(res, mbInformation, MB_OK);
  Result:= True;
end;
 

Ответить

Номер ответа: 25
Автор ответа:
 Chuvakstepan



ICQ: 233519897 

Вопросов: 1
Ответов: 13
 Web-сайт: chuvakstepan.xost.ru
 Профиль | | #25
Добавлено: 18.04.07 13:48
помогите кто-нить!!!

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам