/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
Skrive direkte til printer
Fra : Michael Vilhelmsen


Dato : 29-01-02 15:40

Hej

Hvordan får jeg NEMMEST sendt en enkelt ASCII værdi (eller en serie af ascii
værdier) direkte til en printer ?

Eks.
Jeg har en bon printer på LPT1, hvortil jeg kan sætte en pengeskuffe.
Denne pengeskkuffe kan åbnes ved at sende ASCII værdi 28 til printeren.

Laver jeg et DOS program i Turbo Pascal, hvortil jeg skrive #28 til LST,
springer min pengeskuffe op.

Men hvordan får jeg gjort til samme i Delphi 5 ?


--
Med venlig hilsen / Best Regards
Michael Vilhelmsen
Remove.NoSpam from email before replaying !





 
 
Ingolf (29-01-2002)
Kommentar
Fra : Ingolf


Dato : 29-01-02 16:53

hvad med :

var
fil : file:
begin
assignfile(fil,'lpt1');
reset(fil);
writeln(fil,chr(28));
closefile(fil);
end;


måske skal
assignfile(fil,'lpt1');
ændres til
assignfile(fil,'lpt1:'); // KOLON


"Michael Vilhelmsen" <ccc37780.NoSpam@vip.cybercity.dk> wrote in message
news:_uy58.8263$Eu2.880741@news010.worldonline.dk...
> Hej
>
> Hvordan får jeg NEMMEST sendt en enkelt ASCII værdi (eller en serie af
ascii
> værdier) direkte til en printer ?
>
> Eks.
> Jeg har en bon printer på LPT1, hvortil jeg kan sætte en pengeskuffe.
> Denne pengeskkuffe kan åbnes ved at sende ASCII værdi 28 til printeren.
>
> Laver jeg et DOS program i Turbo Pascal, hvortil jeg skrive #28 til LST,
> springer min pengeskuffe op.
>
> Men hvordan får jeg gjort til samme i Delphi 5 ?
>
>
> --
> Med venlig hilsen / Best Regards
> Michael Vilhelmsen
> Remove.NoSpam from email before replaying !
>
>
>
>



Jacob Kjer (31-01-2002)
Kommentar
Fra : Jacob Kjer


Dato : 31-01-02 21:43


Hvis det drejer sig om en Citizien eller CBM bonprinter kan jeg nok hjælpe
dig med en generisk printerdriver.
Det er rimeligt svært at producere en selv.
Kontakt mig, hvis det har interesse.

Hilsen Jacob

Cybermed@post8.tele.dk
>
> Hvordan får jeg NEMMEST sendt en enkelt ASCII værdi (eller en serie af
ascii
> værdier) direkte til en printer ?

>



Thomas Eg Jørgensen (02-02-2002)
Kommentar
Fra : Thomas Eg Jørgensen


Dato : 02-02-02 15:23


"Michael Vilhelmsen" <ccc37780.NoSpam@vip.cybercity.dk> skrev i en
meddelelse news:_uy58.8263$Eu2.880741@news010.worldonline.dk...
> Jeg har en bon printer på LPT1, hvortil jeg kan sætte en pengeskuffe.
> Denne pengeskkuffe kan åbnes ved at sende ASCII værdi 28 til printeren.

Hvis det er til en Star bonprinter har jeg skrevet cirka 50% af et sådan
program....du kan få et kopi af den hvis du smider en email(og hvis jeg kan
finde koden

MVH
Thomas



Carsten Bager (04-02-2002)
Kommentar
Fra : Carsten Bager


Dato : 04-02-02 07:59

Michael Vilhelmsen wrote:

> Hej
>
> Hvordan får jeg NEMMEST sendt en enkelt ASCII værdi (eller en serie af ascii
> værdier) direkte til en printer ?
>
> Eks.
> Jeg har en bon printer på LPT1, hvortil jeg kan sætte en pengeskuffe.
> Denne pengeskkuffe kan åbnes ved at sende ASCII værdi 28 til printeren.
>
> Laver jeg et DOS program i Turbo Pascal, hvortil jeg skrive #28 til LST,
> springer min pengeskuffe op.
>
> Men hvordan får jeg gjort til samme i Delphi 5 ?
>
>
> --
> Med venlig hilsen / Best Regards
> Michael Vilhelmsen
> Remove.NoSpam from email before replaying !
>


Jeg er ved at lave noget i samme retning.
Jeg er ikke 100% færdig men det virker.
Jeg vedhæfter 2 små PAS filer hvor I kan se
hvad jeg gør.

MVH

Carsten




Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408849
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste