FNC1 Trennzeichen auswerten beim Data Matrix Code

[ol1uw]

Hallo

viele Honeywell Scanner unterstützen auch eine direktes "GS1-128 Application Identifier Parsing".
Da werden die AIs dann zeilenweise ausgegeben.
Und mit dem "Data Formatter" könnte diese Ausgabe auch noch im Scanner selbst bearbeitet werden.

'

[Arkar]

Zitat von ol1uw:

Hallo

viele Honeywell Scanner unterstützen auch eine direktes "GS1-128 Application Identifier Parsing".
Da werden die AIs dann zeilenweise ausgegeben.
Und mit dem "Data Formatter" könnte diese Ausgabe auch noch im Scanner selbst bearbeitet werden.

'

Jup Ich habs jetzt auch so gemacht mit dem Data Formater ich hab beim Scanner das GS (1D) Zeichen gegen das Zeichen | (7C) Ersetzt damit kann mann wenigstens arbeiten.
Ein wenig Googlen hat da geholfen den Scanner zu Programmieren, die von Honeywell haben bis heut noch keine antwort gegeben. ^^
Schön das deren Config Codes nahezu auf fast jeden model Gleich sind.

[himitsu]

Zitat von Arkar:

Wie ist das gemeint?

Zitat:

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Sender is TEdit then begin
    case Key of #29:
      begin
        TEdit(Sender).SelText := '↔';
      end;
    end;
  end;
end;

Du machst aus dem eingegebenen Zeichen ein Anderes.
Stell dir mal vor, am Ende springt die Standardbehandlung des Edits an und schreibt dennoch das originale Zeichen ins Edit.
Dabei dürde natürlich der Selected-Text wieder gelöscht/überschrieben.

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Sender is TEdit then begin
    case Key of #29:
      begin
        TEdit(Sender).SelText := '↔';
        Key := #0;  // Standardverhalten aus
      end;
    end;
  end;
end;

Teilweise kann es sein, dass man einige Eingaben bereits im OnKeyDown und/oder gar OnKeyUp abfangen (Key := 0; ) muß, weil es hier im OnKeyPress bereits zu spät sein könnte.

[Arkar]

Zitat von himitsu:

Zitat von Arkar:

Wie ist das gemeint?

Zitat:

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Sender is TEdit then begin
    case Key of #29:
      begin
        TEdit(Sender).SelText := '↔';
      end;
    end;
  end;
end;

Du machst aus dem eingegebenen Zeichen ein Anderes.
Stell dir mal vor, am Ende springt die Standardbehandlung des Edits an und schreibt dennoch das originale Zeichen ins Edit.
Dabei dürde natürlich der Selected-Text wieder gelöscht/überschrieben.

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Sender is TEdit then begin
    case Key of #29:
      begin
        TEdit(Sender).SelText := '↔';
        Key := #0;  // Standardverhalten aus
      end;
    end;
  end;
end;

Teilweise kann es sein, dass man einige Eingaben bereits im OnKeyDown und/oder gar OnKeyUp abfangen (Key := 0; ) muß, weil es hier im OnKeyPress bereits zu spät sein könnte.

Das hatte ich schon probiert xD aber aus irgendeinen grund stand am ende nur noch '↔' das zeichen drinn statt der rest davon xD

[ol1uw]

Bei unseren 1D Honeywell 1202G Scanner wir durch Aktivierung von "GS1-128 Application Identifier Parsing"
aus der 003904250000000000451008547111522123137123 Ausgabe eine

Code:

00390425000000000045[CR,LF]
100854711[CR,LF]
15221231[CR,LF]
37123[CR,LF]

da ich aber keine Mehrzeilige Eingabe verarbeiten kann, macht der "DATA-Formatter" daraus ein

Code:

00390425000000000045@100854711@15221231@37123

Uwe

[Arkar]

Zitat von ol1uw:

Bei unseren 1D Honeywell 1202G Scanner wir durch Aktivierung von "GS1-128 Application Identifier Parsing"
aus der 003904250000000000451008547111522123137123 Ausgabe eine

Code:

00390425000000000045[CR,LF]
100854711[CR,LF]
15221231[CR,LF]
37123[CR,LF]

da ich aber keine Mehrzeilige Eingabe verarbeiten kann, macht der "DATA-Formatter" daraus ein

Code:

00390425000000000045@100854711@15221231@37123

Uwe

ne unserer macht das nicht oder ich hab nicht den passenden config code beim scannen meldete er Fehler.
Ich hab den scanner so eingestellt das er das GS in | Ersetzt das soll mir erstmal genügen ^^ ansonsten muss cheffe neue bestellen.