View Issue Details

Jump to NotesJump to History
IDProjectCategoryView StatusDate SubmittedLast Update
0004533JEDI VCL00 JVCL Componentspublic2008-10-15 09:262008-10-16 00:09
ReporterBummisoftAssigned Toobones 
PrioritynormalSeverityminorReproducibilityalways
Status resolvedResolutionfixed 
Product Version3.35 
Target VersionFixed in Version3.36 
Summary0004533: JvComputerInfoEx Hardwareprofile/GUID does not work with D2009
Descriptionfunction TJvHardwareProfile.GetNativeType: HW_PROFILE_INFO;
begin
  // works
  GetCurrentHwProfile(Result);
end;
{ does not work 20081015 by Thomas Wassermann
type
  GetCurrentHwProfileFunc = function(var lpHwProfileInfo: HW_PROFILE_INFO): BOOL; stdcall;
var
  GetCurrentHwProfile: GetCurrentHwProfileFunc;
  LibHandle: THandle;
begin
  FillChar(Result, SizeOf(Result), 0);
  // GetCurrentHwProfile is not available on all Win95's
  LibHandle := SafeLoadLibrary('advapi32.dll');
  if LibHandle <> 0 then
  try
    @GetCurrentHwProfile := GetProcAddress(LibHandle, 'GetCurrentHwProfileA');
    if Assigned(GetCurrentHwProfile) then
      GetCurrentHwProfile(Result);
  finally
    FreeLibrary(LibHandle);
  end;
end;
}
TagsNo tags attached.

Activities

obones

2008-10-16 00:09

administrator   ~0014868

This is now fixed in SVN.
Note that dynamic linking was kept, it was just a matter of calling GetCurrentHwProfileW instead of GetCurrentHwProfileA when compiling with D2009

Issue History

Date Modified Username Field Change
2008-10-15 09:26 Bummisoft New Issue
2008-10-16 00:09 obones Status new => resolved
2008-10-16 00:09 obones Fixed in Version => Daily / SVN
2008-10-16 00:09 obones Resolution open => fixed
2008-10-16 00:09 obones Assigned To => obones
2008-10-16 00:09 obones Note Added: 0014868