Scanner Steuerzeichen fehlen

[HolgerX]

Hmm..

Zum Testen für Dich:

Delphi-Quellcode:

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key < $32 then begin // Sichtbare Zeichen beginnen i.R. beim Leerzeichen
    Edit1.Text := Edit1.Text + '#' + IntToHex(key,2);
    Key := 0;             // Damit nicht eventuell ein weiteres Zeichen angehängt wird
  end;
end;

Damit werden Steuerzeichen als Hexwert mit '#' davor im Edit eingetragen.