Как на лету изменить тип штрихкода

radik

Нi, All

А можно ли прямо в процессе формировании отчета устанавливать тип штрихкода в зависимости от текущего значения?
Например - если длина кода меньше 9 - то EAN8, иначе - EAN13, итп.

-=Den=-

Да(в memo1 код).

procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
  if Length(memo1.text) < 9 then
  BarCode1.barType:=bcCodeEAN8
else
 BarCode1.barType:=bcCodeEAN13;
 end;