كيفية القرائة من lpt25 بدلفي وعبر "input32.dll"

[youcef91]

السلام عليكم و رحمة اللع و بركاته

لدي آلة ترسل معلومات الى طابعه لطباعة المحتوى

أحاول أن استقبل المحتوى في جهازي

ركبت الكابل DB 25 بالجهاز و عملت تطبيق للقراءة منه عبر "input32.dll"

لكن لم يقلح الامر هل اجد مكون او حل لذلك

PHP كود :

function Out32(wAddr:word;bOut:byte):byte; stdcall; external 'inpout32.dll';
function Inp32(PortAddress:word):byte;stdcall;export; external 'inpout32.DLL';

procedure TForm1.Timer1Timer(Sender: TObject);
begin
   Memo1.Text:=Memo1.Text+chr(Inp32($379));
end;