[Delphi6] Schrijven naar paralelle poort?

Pagina: 1
Acties:

  • Aetje
  • Registratie: September 2001
  • Laatst online: 18-12-2025

Aetje

Troubleshooting met HAMERRR

Topicstarter
Hoe doe ik dat dus? Ik hoef alleen uitvoer te sturen naar de data out pinnen... Terugkoppeling niet nodig... In de delphi helpfiles is er niets te vinden, niet onder LPT, niet onder parallel, niet onder printer port :(

Forget your fears...
...and want to know more...


Verwijderd

Je hebt iets als dlportio nodig.

  • BasieP
  • Registratie: Oktober 2000
  • Laatst online: 19-10-2025
als ik thuis ben zal ik ff kijken,
voor windows NT of NT based heb je idd een dll nodig.

Voor win98 gaat het zonder ook.
dlportio.dll is overal wel te downloaden (google), ik zou zeggen probeer is wat ;)

This message was sent on 100% recyclable electrons.


  • LordLarry
  • Registratie: Juli 2001
  • Niet online

LordLarry

Aut disce aut discede

Je kan onder win98 gewoon direct naar een poort schrijven. Onder NT niet, daar heb je zoals hierboven beschreven aparte dingen voor nodig.

Onder pascal kon zoeits als dit: WriteLn(LPT1, 'Tekst');
Waarschijnlijk werkt dat ook nog wel onder Delphi. Anders kan je altijd nog direct de poort aanspreken via asm

We adore chaos because we like to restore order - M.C. Escher


Verwijderd

Als je het wilt, kan ik je software sturen die bestaat uit:

-kernel device driver (nodig om iets te kunnen wegschrijven naar de LPT onder NT/2000/XP)
- IOAccess component (hiermee kan je heel eenvoudig iets lezen/wegschrijven)
- installie programma om de driver te installeren

Alles met source (driver in C++, component in delphi)

  • BlackBurn
  • Registratie: Juni 2001
  • Laatst online: 01-09 20:40

BlackBurn

One Ring To Rule Them All

If it is broken, fix it. If it ain't broken, make it better!


  • Varienaja
  • Registratie: Februari 2001
  • Laatst online: 14-06-2025

Varienaja

Wie dit leest is gek.

code:
1
Handle:=CreateFile('COM2',GENERIC_READ+GENERIC_WRITE,0,nil,0,OPEN_EXISTING,0);

Zou dat niet gewoon werken als je LPT1 neerzet ipv COM2?

Bovenstaand heb ik in Delphi3 gebruikt om dmv een seriele kabel winamp aan te laten sturen.

Siditamentis astuentis pactum.


  • Aetje
  • Registratie: September 2001
  • Laatst online: 18-12-2025

Aetje

Troubleshooting met HAMERRR

Topicstarter
Ik ga pogingen doen. Het geheel gaat draaien onder een door mij te bepalen OS, zal dus wel Win98 worden. Tenzij ik toch eenvoudig het zaakje onder 2K kan doen...

Tokkie: Stuur maar naar Aeternus@xs4all.nl :)

Forget your fears...
...and want to know more...


Verwijderd

Ik heb al vaker zoiets gemaakt ik heb hier een relay kaart liggen (zo brak als ik weet niet wat lol, maarwerkt wel ...) om disco verlichting in me kamer aan te sturen.
If you need anyhelp tell me I'll help u :)

Verwijderd

Het is verstuurd Aetje,

Veel plezier er mee ;)
Pagina: 1