[Aide] Déplacer tête d'impression

Déplacer tête d'impression [Aide] - Delphi/Pascal - Programmation

Marsh Posté le 17-10-2005 à 09:02:58    

Bonjours tlm !  :D  
 
Bon voila je vous expose mon problème :  
Pour mes PPE au lycée, j'ai besoin de déplacer la tete d'impression d'une imprimante à aiguille.
On avait déja utiliser le pascal avec le programe suivant :  
 

Citation :

program imprimante;
var
i,data,cont:integer;
          procedure ecriturehard(sortie: byte);  {sortie contient la valeur a sortir}
          begin
               port[data]:=sortie;
          end;
begin
     i:=1;
     data:=$0378;
     cont:=$037A;
     port[data]:=$00;{remise a zeros des huit sorties}
     port[cont]:=$04;{les bits de selection inactifs}
     repeat
     ecriturehard($20);{$20-->espace en hexa}
     i:=(i+1);
     writeln(i);
     until i=20
 end.


 
mais il ne fonctionnait pas, apriori cela vien de windows XP qui interdit l'accès aux ports de l'imprimante. Donc on m'a conseiller de coder en delphi qui est compatible avec XP
 
Quelqu'un saurait comment je pourai faire bouger cette tête d'impression en delphi ???

Reply

Marsh Posté le 17-10-2005 à 09:02:58   

Reply

Marsh Posté le 17-10-2005 à 11:53:03    

C'est pas tellement un problème de Delphi/Pascal, c'est juste que sous NT/XP on n'a pas accès au matériel en direct.  
Mais il est vrai qu'il doit y avoir des composants spéciaux pour Delphi qui permettent d'accéder directement au port de l'imprimante, il faudra donc réécrire le code pour utiliser ce genre de composant.

Message cité 1 fois
Message édité par antp le 17-10-2005 à 11:56:58

---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 21-10-2005 à 19:45:46    

antp a écrit :

C'est pas tellement un problème de Delphi/Pascal, c'est juste que sous NT/XP on n'a pas accès au matériel en direct.  
Mais il est vrai qu'il doit y avoir des composants spéciaux pour Delphi qui permettent d'accéder directement au port de l'imprimante, il faudra donc réécrire le code pour utiliser ce genre de composant.


 
http://www.driverlinx.com/DownLoad [...] 9916560625


---------------
ACH/VDSHFRCoin◈1435mm⚡
Reply

Marsh Posté le 22-10-2005 à 19:53:48    

http://www.torry.ru/pages.php?id=227 ;)


---------------
ACH/VDSHFRCoin◈1435mm⚡
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed