Parcourir la source

* Remove debug writeln

git-svn-id: trunk@37435 -
michael il y a 8 ans
Parent
commit
f218a369d6
1 fichiers modifiés avec 0 ajouts et 1 suppressions
  1. 0 1
      packages/fcl-report/demos/rptbarcode.pp

+ 0 - 1
packages/fcl-report/demos/rptbarcode.pp

@@ -221,7 +221,6 @@ procedure TBarcodeDemo.SetBarcodeValue(Sender: TFPReportElement);
 
 
 begin
 begin
   FBarcode.Value:=FReportData.FieldValues['Population'];
   FBarcode.Value:=FReportData.FieldValues['Population'];
-  Writeln(FBarcode.Value);
 end;
 end;
 
 
 procedure TBarcodeDemo.InitialiseData;
 procedure TBarcodeDemo.InitialiseData;