LPT Port Ansteuerung

[SirPete]

Hallo!
ich bin ganz neu hier und mit Delphi habe ich auch noch nicht alzu viele Erfahrungen, ich würde aber gerne versuchen ein Program zu schreiben, welches:

A: eine Text Datei mit Hex-Daten

FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF
FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF
FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF (Beispiel)

"einliest" also öffnet.

B: die Daten sollen dann seriel über den LPT Port an einen EEProm Simulator weitergegeben werden.

Zunächst würde ich gerne wissen ob es überhaupt möglich ist "problemlos" die LPT Schnittstelle anzusteuern, wie schnell das ganze dann ca. wäre und ob das dann auf allen Windows Systemen lauffähig wäre.

[thomasdrewermann]

Hi,
ich würd sage, dass es schon schnell genug geht, du musst aber auch die passende Hadware haben. Und gedanken über das "Protokoll" musst du dir auch machen.

[SirPete]

Hallo,
die schaltung ist nicht von mir. Es existiert bereits ein "protokoll" zu entnehmen ist es bitte von der Internetseite des Entwicklers.
http://www.geocities.com/jjfl6g/mcs5...m/atmelice.htm
Ich bekomme demnächst die Layouts für die Platinen und hoffe, dass ich die Hardware demnächst nachbauen kann.
Könnte man nicht schon ein Entwurf des programmes schreiben, bei dem man das "protokoll" dann entsprechend anpassen kann? vielleicht DLL datei.

[jbg]

Unter http://homepages.borland.com/torry/portaccess.htm findest du einige Komponenten, mit denen du auf den Parallelport zugreifen kannst, und das unter allen Windows Versionen (>=4.0)

[thomasdrewermann]

Du musst die Daten nach diesen Diagramm in das Gerät schreiben:
http://www.delphipraxis.net/attached...1031341098.gif

[SirPete]

Hallo.
ich glaube ich habe bei dem obengenannten link eine passende "routine" gefunden.
Ich würde mich freuen, wenn einer von euch mir diese etwas aber wirklich nur etwas genauer erklären könnte. Z.b. wie ich die Datei in Delphi 6 einbinden kann, welche Dateien ich von diesem Beispiel nehmen muss (*.SYS usw.)

[thomasdrewermann]

Code:

function PortIn(IOAddr : WORD) : BYTE;
begin
    asm
        mov DX,      IOAddr
        in  AL,      DX
        mov result,  AL
    end;
end;

procedure PortOut(IOAddr : WORD; Data : BYTE);
begin
    asm
        mov  DX,     IOAddr
        mov  AL,     Data
        out  DX,     AL
    end;
end;

Das geht aber nur unter Win95, Win98 und WinMe.