Jelajahi Sumber

* Remove debug writeln

git-svn-id: trunk@37435 -
michael 8 tahun lalu
induk
melakukan
f218a369d6
1 mengubah file dengan 0 tambahan dan 1 penghapusan
  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
   FBarcode.Value:=FReportData.FieldValues['Population'];
-  Writeln(FBarcode.Value);
 end;
 
 procedure TBarcodeDemo.InitialiseData;