Új hozzászólás Aktív témák

• #1810 zka67 őstag Teng #1806

  Új Válasz 2010-06-09 10:52:15 #1810

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  zka67

  őstag

  válasz Teng #1806 üzenetére

  Nagyon egyszerű a dolog: kell egy Inpout32.dll, amit vagy a program könyvtárába teszel vagy a System32-be.

  ZIP közvetlen letöltése, a kicsomagolás után a dll-t az inpout32_source_and_bins\binaries\Dll könyvtárban találod. Neked csak ez a ~12kB-os fájl kell.

  A delphi forrásba pedig az implementation után beteszed ezt a két sort:

  function Out32(Addr:word;b:byte):byte; stdcall; external 'inpout32.dll';
  function Inp32(Addr:word):byte; stdcall; external 'inpout32.dll';

  Aztán már csak értelemszerűen használod, pl:

  Out32($0378,0);
  Result := Inp32($0379);

Új hozzászólás Aktív témák