bias

Hi. Need some urgent help, beeing fairly new to programming. I have a list of files containing pdf files with a barcode. They are scanned invoices with a barcode label on the first page of every invoice (one invoice can consist of one or many pages). I can extract all pages to single pdf files, and i can scan each file for a barcode, i have come so far as a list like this:

1
1
0
0
1
0
1
1
1
0
1

Where 1 is Barcode found, and 0 is barcode not found, easy enough?! Well, i need to convert this list to somthing that will look like this:

1
2-4
5-6
7
8
9-10
11

Have been trying for a long time, and my eyes are about to pop out of their sockets, not beeing able to solve the problem. And it's probably easy too... for someone who have the knowledge. So please, please help me out here!


Thanks.

OpenLoop

not sure I understand what you want. What does the second list represent?

casesensitive

The second list looks like a chart for which positions hold a one value. To the original poster. Are you trying to convert binary to decimal?

bias

Sorry for the poor explenation.

What i am trying do accomplish is this: a user scans a batch of paper invoices, the output from the scanner is one PDF with x pages. An invoice can consist of one more pages, but the first page for every invoice has a barcode on it with an id. I want to create some kind of page separation, extracting the invoices by the barcodes. So far, i have managed to separate all the pages to files, scan for barcode and verify them, and i have the results in some stringlists, one list with the filenames, one list with barcode status, one list with the barcodes and so on. And in the barcode status string list, i have the numbers representing on/off if barcode is found. I will then take the first input file and do the actual separation.

When i will extract the invoices from the first input file, i use PDFToolkit, and the code for extraction is:

pdf1.extractpages('filename','1-2'); // Where 1-2 is page range.

TStringList (barcode status)
1
1
1
0
0
1
0
1
1

->

TStringList (PAGES TO EXTRACT)
1
2
3-5
6-7
8
9

Better understanding?