Title : ASM et port USB pour imprimante
Bonjour,
Je ne connais rien en ASM, je suis débutant en Delphi et je rame comme une bête depuis bien plus d'un mois pour trouver quelque chose qui puisse m'indiquer sous USB... si l'imprimante est fonctionnelle ou bien le contraire.
Voilà, serait-il possible de remplacer le code ASM - pour le port LPTx - intégré à cette fonction delphi, contre un autre bloc de code ASM pour le port USB ?
Voici cette fonction qui fonctionne nichel chrôme :
http://www.developpez.net/forums/vie...r=asc&start=30
D'avance merci si vous avez des idées, car pas évident en USB et tout le monde à l'air de se casser les dents dessus !function TForm1.TestPrinterStatus(LPTPort: Word): Byte;
var
Status: byte;
CheckLPT: word;
begin
Status := 0;
if (LPTPort >= 1) and (LPTPort <= 3) then
begin
CheckLPT := LPTPort - 1;
asm
mov dx, CheckLPT;
mov al, 0;
mov ah, 2;
int 17h;
mov &Status, ah;
end;
Label1.caption := IntToStr(Status);
end;
end;
Partager