Déplacer tête d'impression [Aide] - Delphi/Pascal - Programmation
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.
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. |
http://www.driverlinx.com/DownLoad [...] 9916560625
Marsh Posté le 22-10-2005 à 19:53:48
Reply
Marsh Posté le 17-10-2005 à 09:02:58
Bonjours tlm !
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 :
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 ???