Einzelnen Beitrag anzeigen

quantum

Registriert seit: 15. Apr 2006
Ort: Kassel
64 Beiträge
 
Delphi XE Professional
 
#5

Re: problem beim übersetzen von funktionen

  Alt 22. Jun 2007, 16:31
Die G15 ist schon ein geiles Teil. Ich liebe sie

Apropos, versuch es mal damit:

Delphi-Quellcode:
unit lglight;

interface

uses
  Windows;

function GetProductString(pBuffer: PChar; iBufferLength: DWORD): DWORD; stdcall; external 'lglight.dll';

//--- value: 0=off 1=half 2=full
function SetBgLight(iValue: Integer): DWORD; stdcall; external 'lglight.dll';

//--- value: 0=off 1=half 2=full
function SetLCDLight(iValue: Integer): DWORD; stdcall; external 'lglight.dll';

// --- value: the higher, the more contrast; when value exceedes 43 it is set back to 18, which is the level, the LCDMon.exe sets it to low
function SetLCDContrast(iValue: Integer): DWORD; stdcall; external 'lglight.dll';

//--- multiple are really possible!
function SetMacroKeys(M1, M2, M3, MR: DWORD): DWORD; stdcall; external 'lglight.dll';

function GetLight(iValue: Integer): Integer; stdcall; external 'lglight.dll';

//--- lpProc: pointer to the callback function:
//--- VOID WINAPI keyProc(INT pressedKeys);
function SetCallback(pValue: Pointer): DWORD; stdcall; external 'lglight.dll';

implementation

end.
  Mit Zitat antworten Zitat