Go Back   FileForums > Game Backup > PC Games > PC Games - CD/DVD Conversions > Conversion Tutorials

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 28-03-2016, 01:34
BAMsE's Avatar
BAMsE BAMsE is offline
The World Is Yener's
 
Join Date: Mar 2011
Location: in front of the monitor
Posts: 344
Thanks: 49
Thanked 271 Times in 91 Posts
BAMsE is on a distinguished road
Razor use DrawToDC instead of DrawImages. There's no DrawImages export in ISab.dll See example.
Attached Files
File Type: rar imgtest.rar (640.0 KB, 55 views)

Last edited by BAMsE; 28-03-2016 at 01:38.
Reply With Quote
Sponsored Links
  #2  
Old 28-03-2016, 05:09
peterf1999's Avatar
peterf1999 peterf1999 is offline
Die Hard Member
 
Join Date: Nov 2008
Location: Italy
Posts: 928
Thanks: 14
Thanked 983 Times in 236 Posts
peterf1999 is on a distinguished road
Quote:
Originally Posted by Razor12911 View Post
Hey peterf, there seems to be a problem with SaveFileFromBuffer function, after saving a file, handle is not closed so I'm getting OpenError exceptions.
Fixed.

The verdict that I already knew:
Sharing data structures ( TSysInfo or TVolume) or classes between two modules (inno setup exe and dlls )
in delphi/pascal is deprecated or even illegal. This is the reason of the issues,
but I always hated to export a single function for only one value.

All I need is to export each function e.g.:

Code:
function GetProcessorName: PAnsichar;
function GetFileSystemType: PAnsichar;
function GetCpuClockSpeed: integer;
...
and so on
Reply With Quote
  #3  
Old 28-03-2016, 05:48
Razor12911's Avatar
Razor12911 Razor12911 is offline
Noob
 
Join Date: Jul 2012
Location: South Africa
Posts: 3,759
Thanks: 2,191
Thanked 11,234 Times in 2,316 Posts
Razor12911 is on a distinguished road
Yea well there was no DrawToDC on first page, I used it as reference.
Attached Images
File Type: png Capture27.PNG (128.3 KB, 207 views)
Reply With Quote
  #4  
Old 29-03-2016, 09:20
peterf1999's Avatar
peterf1999 peterf1999 is offline
Die Hard Member
 
Join Date: Nov 2008
Location: Italy
Posts: 928
Thanks: 14
Thanked 983 Times in 236 Posts
peterf1999 is on a distinguished road
DiskVolumeInfo function replaced by:

Code:

const
  TF_InBytes = 1;
  TF_InKiloBytes = 2;
  TF_InMegaBytes = 4;
  TF_InGigaBytes = 8;

function GetDiskVolumeName(const RootDir: PAnsichar):PAnsichar; external 'GetDiskVolumeName@files:Isab.dll stdcall delayload';
function GetFileSystemName(const RootDir: PAnsichar):PAnsichar; external 'GetFileSystemName@files:Isab.dll stdcall delayload';
function GetVolumeFreeSpace(const RootDir: PAnsichar; const OutSizeType: Byte): Double; external 'GetVolumeFreeSpace@files:Isab.dll stdcall delayload';
function GetVolumeSize(const RootDir: PAnsichar; const OutSizeType: Byte): Double; external 'GetVolumeSize@files:Isab.dll stdcall delayload';
Reply With Quote
The Following 3 Users Say Thank You to peterf1999 For This Useful Post:
arkantos7 (29-03-2016), BAMsE (29-03-2016), Razor12911 (29-03-2016)
  #5  
Old 30-03-2016, 08:18
peterf1999's Avatar
peterf1999 peterf1999 is offline
Die Hard Member
 
Join Date: Nov 2008
Location: Italy
Posts: 928
Thanks: 14
Thanked 983 Times in 236 Posts
peterf1999 is on a distinguished road
GetSysInfo procedure replaced by:

Code:
function GetCpuName: PAnsichar; external 'GetCpuName@files:Isab.dll stdcall delayload';
function GetCpuMaxClockSpeed: integer; external 'GetCpuMaxClockSpeed@files:Isab.dll stdcall delayload';
function GetCpuCurrentClockSpeed: integer; external 'GetCpuCurrentClockSpeed@files:Isab.dll stdcall delayload';
function GetCpuManufacturer: PAnsichar; external 'GetCpuManufacturer@files:Isab.dll stdcall delayload';
function GetCpuPhysicalCores: integer; external 'GetCpuPhysicalCores@files:Isab.dll stdcall delayload';
function GetCpuLogicalCores: integer; external 'GetCpuLogicalCores@files:Isab.dll stdcall delayload';
function GetGpuName: PAnsichar; external 'GetGpuName@files:Isab.dll stdcall delayload';
function GetGpuRam: integer; external 'GetGpuRam@files:Isab.dll stdcall delayload';
function GetVideoDescription: PAnsichar; external 'GetVideoDescription@files:Isab.dll stdcall delayload';
function GetHorizontalResolution: PAnsichar; external 'GetHorizontalResolution@files:Isab.dll stdcall delayload';
function GetVerticalResolution: PAnsichar; external 'GetVerticalResolution@files:Isab.dll stdcall delayload';
function GetRefreshRate: PAnsichar; external 'GetRefreshRate@files:Isab.dll stdcall delayload';
function GetAudioDeviceName: PAnsichar; external 'GetAudioDeviceName@files:Isab.dll stdcall delayload';
function GetTotalVisibleMemory: integer; external 'GetTotalVisibleMemory@files:Isab.dll stdcall delayload';
function GetFreePhysicalMemory: integer; external 'GetFreePhysicalMemory@files:Isab.dll stdcall delayload';
function GetOSName: PAnsichar; external 'GetOSName@files:Isab.dll stdcall delayload';
function GetOSVersionMajor: Cardinal; external 'GetOSVersionMajor@files:Isab.dll stdcall delayload';
function GetOSVersionMinor: Cardinal; external 'GetOSVersionMinor@files:Isab.dll stdcall delayload';
function GetOSBuildNumbers: Cardinal; external 'GetOSBuildNumbers@files:Isab.dll stdcall delayload';
function GetServicePackMajorVersion: Word; external 'GetServicePackMajorVersion@files:Isab.dll stdcall delayload';
function GetServicePackMinorVersion: Word; external 'GetServicePackMinorVersion@files:Isab.dll stdcall delayload';
function GetOSArchitecture: Byte; external 'GetOSArchitecture@files:Isab.dll stdcall delayload';
Reply With Quote
The Following 7 Users Say Thank You to peterf1999 For This Useful Post:
altef_4 (30-03-2016), arkantos7 (30-03-2016), BAMsE (31-03-2016), RamiroCruzo (30-03-2016), Razor12911 (30-03-2016), Simorq (01-12-2017), y_thelastknight (07-04-2016)
  #6  
Old 30-03-2016, 10:09
altef_4's Avatar
altef_4 altef_4 is offline
Registered User
 
Join Date: Mar 2012
Location: Ukraine
Posts: 361
Thanks: 248
Thanked 1,022 Times in 239 Posts
altef_4 is on a distinguished road
Quote:
Originally Posted by peterf1999 View Post
GetSysInfo procedure replaced by:

Code:
function GetCpuName: PAnsichar; external 'GetCpuName@files:Isab.dll stdcall delayload';
function GetCpuMaxClockSpeed: integer; external 'GetCpuMaxClockSpeed@files:Isab.dll stdcall delayload';
function GetCpuCurrentClockSpeed: integer; external 'GetCpuCurrentClockSpeed@files:Isab.dll stdcall delayload';
function GetCpuManufacturer: PAnsichar; external 'GetCpuManufacturer@files:Isab.dll stdcall delayload';
function GetCpuPhysicalCores: integer; external 'GetCpuPhysicalCores@files:Isab.dll stdcall delayload';
function GetCpuLogicalCores: integer; external 'GetCpuLogicalCores@files:Isab.dll stdcall delayload';
function GetGpuName: PAnsichar; external 'GetGpuName@files:Isab.dll stdcall delayload';
function GetGpuRam: integer; external 'GetGpuRam@files:Isab.dll stdcall delayload';
function GetVideoDescription: PAnsichar; external 'GetVideoDescription@files:Isab.dll stdcall delayload';
function GetHorizontalResolution: PAnsichar; external 'GetHorizontalResolution@files:Isab.dll stdcall delayload';
function GetVerticalResolution: PAnsichar; external 'GetVerticalResolution@files:Isab.dll stdcall delayload';
function GetRefreshRate: PAnsichar; external 'GetRefreshRate@files:Isab.dll stdcall delayload';
function GetAudioDeviceName: PAnsichar; external 'GetAudioDeviceName@files:Isab.dll stdcall delayload';
function GetTotalVisibleMemory: integer; external 'GetTotalVisibleMemory@files:Isab.dll stdcall delayload';
function GetFreePhysicalMemory: integer; external 'GetFreePhysicalMemory@files:Isab.dll stdcall delayload';
function GetOSName: PAnsichar; external 'GetOSName@files:Isab.dll stdcall delayload';
function GetOSVersionMajor: Cardinal; external 'GetOSVersionMajor@files:Isab.dll stdcall delayload';
function GetOSVersionMinor: Cardinal; external 'GetOSVersionMinor@files:Isab.dll stdcall delayload';
function GetOSBuildNumbers: Cardinal; external 'GetOSBuildNumbers@files:Isab.dll stdcall delayload';
function GetServicePackMajorVersion: Word; external 'GetServicePackMajorVersion@files:Isab.dll stdcall delayload';
function GetServicePackMinorVersion: Word; external 'GetServicePackMinorVersion@files:Isab.dll stdcall delayload';
function GetOSArchitecture: Byte; external 'GetOSArchitecture@files:Isab.dll stdcall delayload';
You can try to use interfaces instead creating so many exported functions (but only for unicode version)
Reply With Quote
The Following 2 Users Say Thank You to altef_4 For This Useful Post:
peterf1999 (30-03-2016), Simorq (01-12-2017)
  #7  
Old 30-03-2016, 10:25
peterf1999's Avatar
peterf1999 peterf1999 is offline
Die Hard Member
 
Join Date: Nov 2008
Location: Italy
Posts: 928
Thanks: 14
Thanked 983 Times in 236 Posts
peterf1999 is on a distinguished road
Quote:
Originally Posted by altef_4 View Post
You can try to use interfaces instead creating so many exported functions (but only for unicode version)
I know, but I used the old procedure getsysinfo to retrieve values. It was the fastest way
Reply With Quote
Reply

Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
INNO TROUBLESHOOT - Tutorials and Answers about INNO Setup REV0 Conversion Tutorials 129 21-05-2021 05:51
Inno Setup: Additional Libraries altef_4 Conversion Tutorials 50 21-10-2020 09:59
INNO TUTORIAL - Using Unicode and ANSI Versions of INNO Setup REV0 Conversion Tutorials 51 26-03-2015 06:57
Tutorial using CI 8.0.0 yener90 Conversion Tutorials 424 21-10-2014 09:49



All times are GMT -7. The time now is 06:24.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions Inc.
FileForums @ https://fileforums.com