FastReport Barcode

[RWarnecke]

Zitat von t0mmy:

Jap hab ich.
Der BarType Wert ist bcCode39.

Ich glaube dieser BarType akzeptiert nur Zahlen, wenn ich es richtig weiß.

[Gollum]

Zitat von RWarnecke:

Ich glaube dieser BarType akzeptiert nur Zahlen, wenn ich es richtig weiß.

Das ist falsch. Der Barcodetyp kann Alphnumerische Zeichen darstellen.

[t0mmy]

Jap da stimm ich dem oben zu.. also kanns am Barcodetyp nicht liegen, zudem hab ich einige andere auch ausprobiert und es kommt trotzdem der Fehler.

[Gollum]

Hallo,

folgend ein Ausschnitt aus der Fastreport-Doku. Vielleicht hilfts:

Delphi-Quellcode:

Modifying the variable’s value

There are two ways to modify the value of a variable:

  frxReport1.Variables['My Variable 2'] := 10;

or

var
  Index: Integer;
  Variable: TfrxVariable;

{ search for the variable }
  Index := frxReport1.Variables.IndexOf('My Variable 2');
{ if it is found, change a value }
  if Index <> -1 then
  begin
    Variable := frxReport1.Variables.Items[Index];
    Variable.Value := 10;
  end;

It should be noted, that when accessing a report variable its value is calculated if it is of string type. That means the variable which value is 'Table1."Field1"' will return a value of a DB field, but not the 'Table1."Field1"' string. You should be careful when assigning a string-type values to report variables. For example, the next code will raise exception "unknown variable 'test'" when running a report:
 

frxReport1.Variables['My Variable'] := 'test';
 

because FastReport trying to calculate a value of such variable. The right way to pass a string values is:
 

frxReport1.Variables['My Variable'] := '''' + 'test' + '''';

In this case the variable value - string 'test' will be shown without errors. But keep in mind that:

- string should not contain single quotes. All single quotes must be doubled;

- string should not contain #13#10 symbols.

 
In some cases it is easier to pass variables using a script.

[haentschman]

Zitat:

@haentschman:
frxGlobalVariables['varBarcode'] := Main.Edit_PrintBarcode.Text; das hab ich nicht und so eine Komponente finde ich auch nicht.

... das ist keine Komponente. Tausche doch einfach mal deinen Quelltext aus und guck was passiert. (Unit frxClass sollte eingebunden sein)

Zitat:

Der übergebene String wird eben als Ausdruck interpretiert, soll heißen, dass FastReport den Inhalt nochmals durch einen Interpreter schickt und der kann diesen nicht verarbeiten

...ich habe das hier mit einer frxGlobalVariable probiert in der ein stinknormaler String drin steht. (Ungequoted) Im Ausdruck steht <VariableBlubb>... und wird dargestellt.

[t0mmy]

Habs probiert aber er schreibt mir trotzdem Fehlerhafter Ausdruck...
hmm bei reinen Ziffern gehts nur wenn ich einen Buchstaben drinnen habe nicht.

[RWarnecke]

Ganz Dumm gefragt, hast Du Deine verwendete Variable varBarCode nur so in die Barcode-Komponente reingeschrieben oder im Report richtig deklariert und in der Barcode-Komponente ausgewählt. Hänge doch mal Deinen Fast-Report dran, wenn es nichts geheimes ist.

[haentschman]

Beitrag #7

Zitat:

Also Beim Objektinspektor steht da unter Expression <varBarcode>

Ich hab die Variable aber über rechtsklick auf Barcode --> Bearbeiten --> unter Code den Button fx gedruckt und dann auf Variablen und Doppelklick auf varBarcode und dann OK und nochmal OK

...damit sollte die Variable im Report bekannt sein. Merkwürdig ist die Tatsache daß es mit Zahlen funktioniert, alphanumerisch nicht

[t0mmy]

So hab das Problem gelöst, ich hab nicht so genau geschaut, da mein Report einiges an inhalt gehabt hat und ich den Barcode den ich übermittelt habe auch in ein Memofeld geschrieben habe und dort ist der Fehler dann auch erschienen.
Aber jetzt habe ich alle übergebenen Variablen mit ''''+Variable+'''' umprogrammiert.

Danke für eure Hilfe.

[Sir Rufo]

Zitat von t0mmy:

Aber jetzt habe ich alle übergebenen Variablen mit ''''+Variable+'''' umprogrammiert.

Und wo ist da der Unterschied zu QuotedStr?
Ok, es gibt einen, denn unter bestimmten Umständen bekommst du mit deiner Variante wieder einen Fehler.

Deine Variante:

Code:

Test's => 'Test's'

Mit QuotedStr

Code:

Test's => 'Test''s'