ISBN und EAN Prüfziffernberechnung

[Neotracer64]

Delphi-Quellcode:

//////////////////////////////////////////////////////////////////////
//                Unit ISBNLib (c)'05 Philipp K.                    //
//==================================================================//
// Funktionen:                                                      //
// - isValidISBN10 (Prüft die Gültigkeit einer ISB10-Nummer)        //
// - CompleteISBN10 (Ergänzt die Prüfziffer einer unvollst. ISBN10) //
//                                                                  //
// - isValidEAN (Prüft die Gültigkeit einer EA-Nummer)              //
// - CompleteEAN (Ergänzt die Prüfziffer einer unvollst. EAN)       //
//////////////////////////////////////////////////////////////////////