Ich habe mal mich versucht, was aber ja noch nicht klappt:

void __fastcall TForm1::Button1Click(TObject *Sender)
{

int i=0;

HANDLE hCom=CreateFile("LPT1",GENERIC_READ | GENERIC_WRITE,0,NULL, OPEN_EXISTING,0,NULL);

ReadFile(hCom,i,1,0,0); //lese lpt1

Form1->Edit1->Text=i();

}

ich wollte also in i das Ergebniss schieben, was an LPT anliegt. Dann soll er einfach das Ergebnis im Editfenster anzeigen. Aber ich mache da etwas falsch.