Zitat von
tr909:
probier doch mal (nur ne Vermutung) :
Delphi-Quellcode:
procedure TForm1.Button8Click(Sender: TObject);
var
output : word;
begin
word := 2560; //0000 1010 0000 000 in dezimal
PortOut($378,output); // oder PortOut ($378,$A00);
end;
Gruß
tr909
Hallo,
interessanter Versuch - aber LPT ist 8 bit breit und wird es immer bleiben.
Gruss Reinhard