+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيفية القرائة من lpt25 بدلفي وعبر "input32.dll" (/showthread.php?tid=5169)
كيفية القرائة من lpt25 بدلفي وعبر "input32.dll" - youcef91 - 26-04-2013
السلام عليكم و رحمة اللع و بركاته
لدي آلة ترسل معلومات الى طابعه لطباعة المحتوى
أحاول أن استقبل المحتوى في جهازي
ركبت الكابل 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;