[REL] [ITA] Books from Bol.it - libri da Bol.it

New scripts, templates and translation files that allows to use Ant Movie Catalog to manage other things than movies
Post Reply
fulvio53s03
Posts: 764
Joined: 2007-04-28 05:46:43
Location: Italy

[REL] [ITA] Books from Bol.it - libri da Bol.it

Post by fulvio53s03 »

A new script to extract informations about books from www.bol.it. Any suggestion will be appreciated.

Un nuovo script per estrarre informazioni su libri da bol.it. Tutti i suggerimenti saranno bene accetti

Code: Select all

(***************************************************

Ant Movie Catalog importation script
www.antp.be/software/moviecatalog/

[Infos]
Authors=Fulvio53s03
Title=Bol.IT.ifs
Description=Estrae dati da Bol.it
Site=www.bol.it
Language=IT
Version=
Requires=3.5.1
Comments=
License=
GetInfo=0

[Options]

***************************************************)

// GETINFO SCRIPTING
// Ita-Bol.com (IT)

(***************************************************
*  Movie importation script for:                  *
*  Ita-Bol.com (IT), http://www.ita-bol.com       *
*                                                 *
* (c) 2004 Andrea Cristaudo achris@tiscalinet.it  *
*                                                 *
*  For use with Ant Movie Catalog 3.4.1           *
*  www.ant.be.tf/moviecatalog ··· www.buypin.com  *
*                                                 *
*  The source code of the script can be used in   *
*  another program only if full credits to        *
*  script author and a link to Ant Movie Catalog  *
*  website are given in the About box or in       *
*  the documentation of the program               *
***************************************************)

program ItaBol;
uses StringUtils1;   // Script needs external unit StringUtils1.pas in scripts folder !
var MovieName: string;
    TheMovieAddress: string;
    SearchPage: string;

procedure AnalyzeSearchPage(Address: string);
var Page:     TStringList;
    LineNr:   integer;
    BeginPos: integer;
begin
  Page := TStringList.Create;
  Page.Text := GetPage(Address);
  LineNr := FindLine('Risultati ricerca: <b>0 </b>', Page, 0);
  if LineNr <> -1 then
    begin
      ShowMessage('Nessuna informazione trovata');
    end
  else
    begin
      PickTreeClear;
      AddMoviesTitles(Page);
      if TheMovieAddress='*' then
        begin
          if PickTreeExec(Address) then
            begin
              SetField(fieldURL, Address);
              Page.Text := GetPage(Address);
              AnalyzeMoviePage(Page);
            end;
        end
      else
        begin
          SetField(fieldURL, TheMovieAddress);
          Page.Text := GetPage(TheMovieAddress);
          AnalyzeMoviePage(Page);
        end;
    end;
  Page.Free;
end;

procedure AddMoviesTitles(Page: TStringList);
var LineNr, NewLineNr: Integer;
    Line: string;
    MovieTitle, MovieAddress, CodPag: string;
    BeginPos, EndPos: Integer;
    Conta: Integer;
begin
  Conta:=0;
//ex    LineNr := FindLine('        <font class="Testo">', Page, LineNr);
      LineNr := FindLine('<a href="/libri/scheda/', Page, LineNr);    // cerca la riga con titolo e link

  while LineNr <> -1 do
    begin
      // Indirizzo Scheda
//ex      Line := Page.GetString(LineNr+1);
      Line := Page.GetString(LineNr);
      BeginPos := pos('<a href="', Line) + 23;  //Length '<a href="/libri/scheda/' = 23
      EndPos := pos('.html',Line);
      CodPag := copy(Line, BeginPos, EndPos-BeginPos);
      MovieAddress := 'http://www.bol.it/libri/scheda/' + CodPag + '.html';

      // Titolo
      Line := Page.GetString(LineNr + 0);
      BeginPos := pos('>"', Line);
      EndPos   := pos('</a>', Line);
      MovieTitle := copy(Line, BeginPos, EndPos-BeginPos);
      HTMLRemoveTags(MovieTitle);
      HTMLDecode(Movietitle);
      MovieTitle := FullTrim(MovieTitle);
      if MovieTitle <> '' then
         PickTreeAdd(MovieTitle, MovieAddress);
      LineNr := FindLine('<a href="/libri/scheda/', Page,LineNr+3);    // verificare
      Conta:=Conta+1;
    end;
    if Conta > 1 then TheMovieAddress := '*'
    else TheMovieAddress := MovieAddress;
   
end;

procedure AnalyzeMoviePage(Page: TStringList);
var i, j: Integer;
    Line: string;
    LineNr: Integer;
    BeginPos, EndPos: Integer;
    Actors, ImgUrl: string;
begin
//ex  LineNr := FindLine('<font face="Verdana, Arial, Helvetica, sans-serif" size="4" color="#3366CC"><b>', Page, 0);
    LineNr := FindLine('<div class="bol_path">', Page, 0);                 //Titolo
  if LineNr > -1 then
     begin
      //Translated Title
      LineNr := LineNr + 6;
      Line := Page.GetString(LineNr);
      Line := textBetween(Line, '<b>', '</b>');
      EndPos := pos('</b>', Line);
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldTranslatedTitle, Line);
     end
  
      //Trama
      Line := textBetween(Page.text, '<p class="bol_spacer">', '</p>');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldDescription, Line);

      //Autore
      Line := textBetween(Page.text, '<a href="/libri/ricerca?tpr=30&sort=7&g=', '</a>') + '</a>';
      Line := textBetween(Line, '>', '</a>');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldActors, Line);

      //Titolo originale
      Line := textBetween(Page.text, '<b>Titolo originale:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldOriginalTitle, Line);

      //Titolo originale
      Line := textBetween(Page.text, '<b>Lingua originale:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldLanguages, Line);
end;

begin
  if CheckVersion(3,4,1) then
    begin
      SearchPage := 'http://www.ita-bol.com/bol/main.jsp?action=vidrisultatoricerca&quick_type=Titolo&filtro_ricerca=VID&titolo=';

      MovieName := GetField(fieldTranslatedTitle);
      if MovieName = '' then
        MovieName := GetField(fieldOriginalTitle);
      if Input('Ita-Bol.com Import', 'Enter the title of the movie:', MovieName) then
        AnalyzeSearchPage(SearchPage+UrlEncode(MovieName));
    end
  else
    ShowMessage('This script requires a newer version of Ant Movie Catalog (at least the version 3.4.1)');
end.
lsscpp
Posts: 8
Joined: 2009-08-06 21:41:05

Post by lsscpp »

This script doesn't work. It only looks up on the net and ends up finding Gould Jay and Stephen Jay Gouls as actors (???)
Is it not up to date?
Are there further instructions?
Please, anyone?
fulvio53s03
Posts: 764
Joined: 2007-04-28 05:46:43
Location: Italy

Post by fulvio53s03 »

lsscpp wrote:This script doesn't work. It only looks up on the net and ends up finding Gould Jay and Stephen Jay Gouls as actors (???)
Is it not up to date?
Are there further instructions?
Please, anyone?
Sorry but I cannot reach bol.it by script, maybe it needs to be updated and this may request a little time....
Anyway, would you be a little more clear about "Gould Jay and Stephen Jay Gouls..." ? Maybe you need a different language file.
Bye :(
lsscpp
Posts: 8
Joined: 2009-08-06 21:41:05

Post by lsscpp »

are you planning to fix it (plz)? that would be great! ...i'll be waiting for news :)

PS:
"Gould Jay and Stephen Jay Gouls" is the only string the script is able to find, no matter the query, no matter the language.
fulvio53s03
Posts: 764
Joined: 2007-04-28 05:46:43
Location: Italy

Post by fulvio53s03 »

Sorry for the bad news but I cannot find the right way to construct the name of the search page (it has been changed)! :cry:
If someone could help me... :hihi:

Spiecente per la cattiva notizia ma non riesco a trovare la maniera di costruire il nome della pagina di ricerca (è stata cambiata!).
Se qualcuno potesse aiutarmi....
bad4u
Posts: 1148
Joined: 2006-12-11 22:54:46

Post by bad4u »

fulvio53s03 wrote:Sorry for the bad news but I cannot find the right way to construct the name of the search page (it has been changed)!

Code: Select all

http://www.bol.it/libri/ricerca/1/sort=1&tpr=10&g=keyword&crc=100&bld=100
"keyword" is the word or title you search for
"bld=100" is the maximum number of results on each page
"ricera/1/" means results page 1 (results 1..100, "ricera/2/" would be 101..200)
"tpr=10" means standard search (title + keyword, I guess), "20" would be title search only, "30" probably author, but not tested
fulvio53s03
Posts: 764
Joined: 2007-04-28 05:46:43
Location: Italy

Post by fulvio53s03 »

@ Bad4u
Thank you!
These are very good informations (you are really a magician... how could you find them? They are not in the HTML code of the page, maybe in one af the Javascripts used-in? could you explain?).
Now I hope I will go on. :grinking:
Bye.
lsscpp
Posts: 8
Joined: 2009-08-06 21:41:05

Post by lsscpp »

wow! good news! thanks Bad4u! and thanks fulvio. I keep waiting hopefully...
bad4u
Posts: 1148
Joined: 2006-12-11 22:54:46

Post by bad4u »

fulvio53s03 wrote: how could you find them? They are not in the HTML code of the page, maybe in one af the Javascripts used-in? could you explain?).
They use jQuery javascript indeed to build the request, but you do not need to care about this here. Simply make a request that delivers more than 1 results page and then have a look on the link that leads to the second page ;)
fulvio53s03
Posts: 764
Joined: 2007-04-28 05:46:43
Location: Italy

Post by fulvio53s03 »

Well, I will go on.
Maybe lsscpp could tell me if he nedds particular requests about extracting fields......
:wink:
fulvio53s03
Posts: 764
Joined: 2007-04-28 05:46:43
Location: Italy

Post by fulvio53s03 »

here is the new code-script:

Code: Select all

(***************************************************

Ant Movie Catalog importation script
www.antp.be/software/moviecatalog/

[Infos]
Authors=Fulvio53s03
Title=Bol.IT.ifs
Description=Estrae dati da Bol.it
Site=www.bol.it
Language=IT
Version=
Requires=3.5.1
Comments=
License=
GetInfo=1

[Options]

***************************************************)

// GETINFO SCRIPTING
// Ita-Bol.com (IT)

(***************************************************
*  Movie importation script for:                  *
*  Ita-Bol.com (IT), http://www.ita-bol.com       *
*                                                 *
* (c) 2004 Andrea Cristaudo achris@tiscalinet.it  *
*                                                 *
*  For use with Ant Movie Catalog 3.4.1           *
*  www.ant.be.tf/moviecatalog ··· www.buypin.com  *
*                                                 *
*  The source code of the script can be used in   *
*  another program only if full credits to        *
*  script author and a link to Ant Movie Catalog  *
*  website are given in the About box or in       *
*  the documentation of the program               *
***************************************************)

program ItaBol;
uses StringUtils1;   // Script needs external unit StringUtils1.pas in scripts folder !
var MovieName: string;
    TheMovieAddress: string;
    SearchPage, SearchPageEnd: string;
    LineNr:   integer;

procedure AnalyzeSearchPage(Address: string);
var Page:     TStringList;
    BeginPos: integer;
begin
  Page := TStringList.Create;
  Page.Text := GetPage(Address);
  LineNr := FindLine('Risultati ricerca: <b>', Page, 0);
//  setfield(FieldVideoFormat, Address);
  if LineNr = 0 then
    begin
      ShowMessage('Nessuna informazione trovata');
    end
  else
    begin
      PickTreeClear;
      AddMoviesTitles(Page);
      if TheMovieAddress='*' then
        begin
          if PickTreeExec(Address) then
            begin
              SetField(fieldURL, Address);
              Page.Text := GetPage(Address);
              AnalyzeMoviePage(Page);
            end;
        end
      else
        begin
          SetField(fieldURL, TheMovieAddress);
          Page.Text := GetPage(TheMovieAddress);
          AnalyzeMoviePage(Page);
        end;
    end;
  Page.Free;
end;

procedure AddMoviesTitles(Page: TStringList);
var NewLineNr: Integer;
    Line, BeginLine, Beginsearch: string;
    MovieTitle, MovieAddress, CodPag: string;
    BeginPos, EndPos: Integer;
    Conta: Integer;
begin
  Conta:=0;
//ex    LineNr := FindLine('        <font class="Testo">', Page, LineNr);
      LineNr := FindLine('<td><h4><a href="/libri/', Page, LineNr);    // cerca la riga con titolo e link

  while LineNr <> -1 do
    begin
      // Indirizzo Scheda
//ex      Line := Page.GetString(LineNr+1);
      Line := Page.GetString(LineNr);
      BeginSearch := '<td><h4><a href="';
      BeginPos := pos(BeginSearch, Line) + length(BeginSearch);  //Length '<a href="/libri/' = 23
      EndPos := pos('" >',Line);
      CodPag := copy(Line, BeginPos, EndPos - BeginPos);
      MovieAddress := 'http://www.bol.it' + CodPag;

      // Titolo
//    Line := Page.GetString(LineNr + 0);
      BeginLine := '" >';
      BeginPos := pos(BeginLine, Line);
      EndPos   := pos('</a></h4>', Line);
      MovieTitle := copy(Line, BeginPos + length(BeginLine), EndPos - BeginPos - length(BeginLine));
      HTMLRemoveTags(MovieTitle);
      HTMLDecode(Movietitle);
      MovieTitle := FullTrim(MovieTitle);
      if MovieTitle <> '' then
         PickTreeAdd(MovieTitle, MovieAddress);
      LineNr := FindLine('<td><h4><a href="/libri/', Page,LineNr+3);    // verificare
      Conta:=Conta+1;
    end;
    if Conta > 1 then TheMovieAddress := '*'
    else TheMovieAddress := MovieAddress;
   
end;

procedure AnalyzeMoviePage(Page: TStringList);
var i, j: Integer;
    Line, Cover: string;
    BeginPos, EndPos: Integer;
    Actors, ImgUrl: string;
begin
//ex  LineNr := FindLine('<font face="Verdana, Arial, Helvetica, sans-serif" size="4" color="#3366CC"><b>', Page, 0);
      //Copertina
      cover := TextBetween(Page.text, '<!-- COPERTINA -->', '</div>');     //Copertina
      cover := TextBetween(cover, 'img src="', '" class="cover"');
      cover := 'http://www.bol.it' + cover;
//    setfield(FieldVideoFormat, cover);

      GetPicture(cover);

    LineNr := FindLine('<div class="bol_path">', Page, 0);                 //Titolo

  if LineNr > -1 then
     begin
      //Translated Title
      LineNr := LineNr + 6;
      Line := Page.GetString(LineNr);
      Line := textBetween(Line, '<b>', '</b>');
      EndPos := pos('</b>', Line);
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldTranslatedTitle, Line);
     end
      //Trama
      Line := textBetween(Page.text, '<p class="bol_spacer">', '</p>');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldDescription, Line);

      //Autore
      Line := textBetween(Page.text, '<a href="/libri/autore/', '</a>') + '</a>';
      Line := textBetween(Line, '" >', '</a>');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldActors, Line);

      //Titolo originale
      Line := textBetween(Page.text, '<b>Titolo originale:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldOriginalTitle, Line);

      //Editore
      Line := textBetween(Page.text, '<b>Editore:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
      SetField(fieldProducer, Line);

      //Lingua originale
      Line := textBetween(Page.text, '<b>Lingua originale:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
      SetField(fieldLanguages, Line);

end;

begin
  if CheckVersion(3,5,1) then
    begin
      SearchPage := 'http://www.bol.it/libri/ricerca/1/sort=3&tpr=10&g=';
      SearchPageEnd := '&crc=100&bld=200';
//      SearchPage := 'http://www.ita-bol.com/bol/main.jsp?action=vidrisultatoricerca&quick_type=Titolo&filtro_ricerca=VID&titolo=';

      MovieName := GetField(fieldTranslatedTitle);
      if MovieName = '' then
         MovieName := GetField(fieldOriginalTitle);
      if Input('Ita-Bol.com Import', 'Enter the title of the movie:', MovieName) then
         begin
               AnalyzeSearchPage(SearchPage + UrlEncode(MovieName) + SearchPageEnd);
         end
    end
  else
    ShowMessage('This script requires a newer version of Ant Movie Catalog (at least the version 3.5.1)');
end.
Let's hope.... :D
lsscpp
Posts: 8
Joined: 2009-08-06 21:41:05

Post by lsscpp »

The script works smoothly and perfectly!!! :grinking: :grinking: :grinking:
You're great! thanks a lot. I'll be using it (and report bugs, if any)
Grazie assai!
lsscpp
Posts: 8
Joined: 2009-08-06 21:41:05

Post by lsscpp »

ok, now it's time to pay back... :cool:

I edited a customized italian book language file and modded fulvio's script.
here they are:




************* here is the language file **************

Code: Select all

[FileInformation]
Icon=Qk32AAAAAAAAAHYAAAAoAAAAEAAAABAAAAABAAQAAAAAAIAAAAAzCwAAMwsAABAAAAAQAAAAAAAAAAAiAAATNRMAAFQAAACHAAAAAKoAAAD9AGVl/wCqqqoAzMzMAO7u7gD///8AAAAAAAAAAAAAAAAAAAAAALu7u7u7u7u7AAAAAAAAAAACIiGIiFVVYAIzM5mZZmZwAjMzmZlmZnACMzOZmWZmcAIzM5mZZmZwAjMzmZlmZnACMzOZmWZmcAIzM5mZZmZwAjMzmZlmZnACMzOZmWZmcAIzM5mZZmZwA0REqqp3d3AAAAAAAAAAALu7u7u7u7u7
Name=Libri
LocalName=Italiano
Version=3.5.0
VersionFormat=3.5.0
Comments=
Authors=k

;***********************
;* Finestra Principale *
;***********************
[MainWindow]

ActionFileNew.Caption=&Nuovo
ActionFileNew.Hint=Nuovo|Crea nuovo file
ActionFileOpen.Caption=&Apri...
ActionFileOpen.Hint=Apri...|Apre un file
ActionFileOpenNoRecent.Caption=Nessun file recente
ActionFileSave.Caption=&Salva
ActionFileSave.Hint=Salva|Salva il file corrente
ActionFileSaveAs.Caption=S&alva con nome...
ActionFileSaveAs.Hint=Salva con nome...|Salva il file corrente con un nuovo nome
ActionFilePrint.Caption=Stam&pa...
ActionFilePrint.Hint=Stampa la lista|Stampa la lista del contenuto del catalogo
ActionFileImport.Caption=&Importa...
ActionFileImport.Hint=Importa...|Importa dati da un altro formato
ActionFileExport.Caption=&Esporta...
ActionFileExport.Hint=Esporta...|Esporta il catalogo in un altro formato
ActionFileProperties.Caption=&Proprietà...
ActionFileProperties.Hint=Proprietà...|Visualizza le proprietà del file e le informazioni sul catalogo

ActionExit.Caption=Esci
ActionExit.Hint=Esci|Esci dal programma
ActionOptions.Caption=&Preferenze...
ActionOptions.Hint=Preferenze...|Cambia le opzioni del programma
ActionLanguage.Caption=L&ingua...
ActionLanguage.Hint=Linga...|Cambia lingua dell'interfaccia utente
ActionLoan.Caption=&Prestiti...
ActionLoan.Hint=Prestiti...|Lista dei libri che sono stati prestati
ActionToolsScripting.Caption=S&cripting...
ActionToolsScripting.Hint=Scripting|Applica uno script al libro selezionato
ActionToolsGrid.Caption=V&isualizza come griglia
ActionToolsGrid.Hint=Visualizza come griglia|Visualizza la lista come una grande griglia con tutti i libri
ActionGroupNone.Caption=< none >
ActionGroupNone.Hint=|Nessun gruppo di libri

ActionHelpIndex.Caption=&Aiuto
ActionHelpIndex.Hint=Aiuto|Lancia l'aiuto del programma
ActionHelpAbout.Caption=&Info...
ActionHelpAbout.Hint=Info...|Informazioni sul programma
ActionHelpVersion.Caption=&Versioni...
ActionHelpVersion.Hint=Versioni...|Mostra informazioni sulle versioni dei file

ActionMovieAdd.Caption=&Aggiungi...
ActionMovieAdd.Hint=Aggiungi...|Aggiunge un nuovo libro
ActionMovieUndo.Caption=Annulla
ActionMovieUndo.Hint=Annulla|Annulla le modifiche effettuate
ActionMovieDelete.Caption=&Elimina
ActionMovieDelete.Hint=Elimina|Elimina il libro selezionato
ActionMovieCopy.Caption=&Copia
ActionMovieCopy.Hint=Copia|Copia le informazioni sul libro negli appunti
ActionMoviePaste.Caption=&Incolla
ActionMoviePaste.Hint=Incolla|Incolla le informazioni sul libro dagli appunti
ActionMovieRenumber.Caption=&Rinumera...
ActionMovieRenumber.Hint=Rinumera i libri...
ActionMovieFind.Caption=&Cerca...
ActionMovieFind.Hint=Cerca...|Cerca un libro basandosi su specifici criteri di ricerca
ActionFindFindNext.Caption=Cerca successivo
ActionFindFindNext.Hint=|Cerca la voce successiva basandosi sui criteri precedentemente impostati
ActionFindWholeField.Caption=Solo campo intero
ActionFindWholeField.Hint=|Include i libri solo se il valore specificato eguaglia l'intero campo
ActionFindDisplay.Caption=Visualizza risultati
ActionFindDisplay.Hint=|Mostra tutti i libri che corrispondono al criterio di ricerca
LField.Caption=Cerca nel campo:
LValue.Caption=Cerca il valore:
ActionMovieNumber.Caption=Cambia il &numero...
ActionMovieNumber.Hint=Cambia il numero
ActionMovieStats.Caption=&Statistiche...
ActionMovieStats.Hint=Statistiche...|Visualizza le statistiche riguardanti il catalogo e i libri che contiene
ActionMovieImportFiles.Caption=Da &file...
ActionMovieImportFiles.Hint=Ricava informazioni da file...
ActionMovieImportScript.Caption=Da internet usando uno &script...
ActionMovieImportScript.Hint=Ottiene info da internet usando uno script...|Ottiene informazioni sul libro da internet utilizzando uno script
ActionMovieSearch.Caption=Cerca su Internet
ActionMovieSearch.Hint=Ricerca informazioni su Internet
ActionMoviePictureShow.Caption=Visualizza copertine
ActionMoviePictureShow.Hint=Mostra o nascondi le copertine
ActionPicSelect.Caption=&Seleziona...
ActionPicSelect.Hint=Seleziona una copertina...|Seleziona un'immagine da importare o collegare per il libro attuale
ActionPicDelete.Caption=Elimina
ActionPicDelete.Hint=Elimina|Elimina la copertina
ActionPicUndock.Caption=Blocca/Sblocca
ActionPicUndock.Hint=Blocca/Sblocca|Finestra delle copertine: Blocca (integra nella finestra principale) o sblocca (finestra volante)
ActionPicSaveAs.Caption=&Salva come...
ActionPicSaveAs.Hint=Salva immagine come...|Salva una copia della copertina in un nuovo file
ActionPicCopy.Caption=&Copia
ActionPicCopy.Hint=Copia negli appunti|Copia l'immagine negli appunti

ActionMenuFile.Caption=&File
ActionMenuMovie.Caption=&libro
ActionMenuTools.Caption=&Accessori
ActionMenuHelp.Caption=&Aiuto
ActionMenuPicture.Caption=Copert&ine
ActionMenuPicture.Hint=Copertine libri
ActionMenuGet.Caption=Acquisisci informazioni
ActionMenuGet.Hint=Acquisisci informazioni
ActionMenuGroup.Caption=Crea gruppo
ActionMenuGroup.Hint=Crea gruppo|Raggruppa i libri basandosi su campi specifici

ActionRefresh.Caption=Aggiorna
ActionRefresh.Hint=Aggiorna la lista
ActionMovieCheck.Caption=Visto
ActionMovieCheck.Hint=Visto|Contrassegna il libro come letto
ActionMovieUncheck.Caption=Non ancora visto
ActionMovieUncheck.Hint=Non ancora visto|Contrassegna il libro come non ancora letto
ActionMovieSelGroup.Caption=Seleziona tutto il gruppo
ActionMovieSelGroup.Hint=Seleziona gruppo|Seleziona tutti i libri di questo gruppo
ActionMovieSelCheck.Caption=Seleziona abilitati
ActionMovieSelCheck.Hint=Seleziona abilitati|Seleziona soltanto i libri abilitati
ActionMovieSelUncheck.Caption=Seleziona non abilitati
ActionMovieSelUncheck.Hint=Seleziona non abilitati|Seleziona soltanto i libri che non sono abilitati

ActionDisplayPictureToolbar.Caption=Visualizza barra immagini
ActionDisplayPictureToolbar.Hint=Visualizza la barra delle immagini
ActionDisplayMainToolbar.Caption=Barra delle applicazioni
ActionDisplayMainToolbar.Hint=Visualizza la barra delle applicazioni
ActionDisplayStatusBar.Caption=Barra di stato
ActionDisplayStatusBar.Hint=Visualizza la barra di stato

ActionURLOpen.Caption=Apri URL
ActionURLOpen.Hint=|Apre l'URL o file specificato nel campo
ActionURLBrowse.Caption=Sfoglia...
ActionURLBrowse.Hint=|Cerca un nome di file da inserire nel campo

ToolbarMenu.Caption=Barra dei menù
ToolbarMain.Caption=Barra delle applicazioni
ToolbarPicture.Caption=Barra delle immagini
ToolbarPictureWindow.Caption=Immagini
ToolbarFind.Caption=Cerca

Listview1.HeaderSections.Item[0].Text=N°
Listview1.HeaderSections.Item[1].Text=Titolo

MoviePicture.Hint=|Cliccare per vedere l'immagine alla massima dimensione

Messages.Strings.String[0]=Sei sicuro di voler eliminare il libro %s: %s?
Messages.Strings.String[1]=Sei sicuro di voler convertire le informazioni precedenti per il libro corrente?
Messages.Strings.String[2]=%d libro
Messages.Strings.String[3]=(%d visibile)
Messages.Strings.String[4]=Il file corrente è stato modificato. Si desidera salvarlo?
Messages.Strings.String[5]=Non richiedere ulteriori conferme
Messages.Strings.String[6]=Modificato
Messages.Strings.String[7]=Immagine
Messages.Strings.String[8]=Salva una copia dell'immagine come nuovo file
Messages.Strings.String[9]=Importazione %s ...
Messages.Strings.String[10]=Salvataggio %s ...
Messages.Strings.String[11]=Caricamento %s ...
Messages.Strings.String[12]=Selezione un'immagine
Messages.Strings.String[13]=Questo eliminerà l'immagine. Sei sicuro?
Messages.Strings.String[14]=Impossibile utilizzare l'immagine selezionata: %s
Messages.Strings.String[15]=B
Messages.Strings.String[16]=Selezionare il file da cui ricavare informazioni
Messages.Strings.String[17]=Ricerca informazioni su %0:s|Ricerca informazioni sul libro su %0:s
Messages.Strings.String[18]=Nessun file recente
Messages.Strings.String[19]=Questo catalogo ha immagini memorizzate internamente. Per salvare il catalogo in formato XML, le immagini devono risiedere su file distinti.|Se vuoi ancora salvare il file in XML, clicca OK per convertire le immagini, oppure Ignora se vuoi mantenerle (le immagini collegate saranno tenute).|Il nome dell'immagine sarà basato sul valore di "Nomenclatura Immagini" della pagina "Importazione Copertina" dalla finestra delle preferenze.
Messages.Strings.String[20]=|Raggruppa per %s
Messages.Strings.String[21]=< nessuno >
Messages.Strings.String[22]=Oltre a rimuovere il collegamento, si desidera procedere alla completa eliminazione del file dall'hard disk? (%s)
Messages.Strings.String[23]=Questo libro attualmente è collegato ad una immagine, sostituendo il collegamento con un'altra immagine vuoi cancellare la vecchia immagine dal tuo hard disk? (%s)
Messages.Strings.String[24]=L'immagine non pu= essere copiata nella cartella del catalogo finché il catalogo non ha un nome; salvarlo da qualche parte e riprovare
Messages.Strings.String[25]=Salvato nel catalogo come %s
Messages.Strings.String[26]=File esterno: %s
Messages.Strings.String[27]=%.0n bytes
Messages.Strings.String[28]=Anteprima di stampa
Messages.Strings.String[29]=Ricerca stampante
Messages.Strings.String[30]=Seleziona un file a cui fare riferimento nel campo URL
Messages.Strings.String[31]=< altri >
Messages.Strings.String[32]=Tutti

Fields.Strings.String[0]=N°
Fields.Strings.String[1]=Verificato
Fields.Strings.String[2]=Etichetta
Fields.Strings.String[3]=Tipo
Fields.Strings.String[4]=Origine
Fields.Strings.String[5]=Data
Fields.Strings.String[6]=Prestato a
Fields.Strings.String[7]=Valutazione
Fields.Strings.String[8]=Titolo originale
Fields.Strings.String[9]=Titolo tradotto
Fields.Strings.String[10]=Titolo formattato
Fields.Strings.String[11]=Regista
Fields.Strings.String[12]=Produttore
Fields.Strings.String[13]=Paese
Fields.Strings.String[14]=Categoria
Fields.Strings.String[15]=Anno
Fields.Strings.String[16]=Durata
Fields.Strings.String[17]=Attori
Fields.Strings.String[18]=URL
Fields.Strings.String[19]=Descrizione
Fields.Strings.String[20]=Commento
Fields.Strings.String[21]=Formato video
Fields.Strings.String[22]=Flusso video (bit)
Fields.Strings.String[23]=Formato audio
Fields.Strings.String[24]=Flusso audio (bit)
Fields.Strings.String[25]=Risoluzione
Fields.Strings.String[26]=Frequenza video
Fields.Strings.String[27]=Lingue
Fields.Strings.String[28]=Sottotitoli
Fields.Strings.String[29]=Dimensione dei file
Fields.Strings.String[30]=Numero di dischi

;****************
;* Message Form *
;****************
[MessageWin]
Captions.Strings.String[0]=Avvertimento
Captions.Strings.String[1]=Errore
Captions.Strings.String[2]=Informazione
Captions.Strings.String[3]=Conferma
Captions.Strings.String[4]=&Si
Captions.Strings.String[5]=&No
Captions.Strings.String[6]=&OK
Captions.Strings.String[7]=&Annulla
Captions.Strings.String[8]=&Interrompi
Captions.Strings.String[9]=&Riprova
Captions.Strings.String[10]=I&gnora
Captions.Strings.String[11]=&Tutti
Captions.Strings.String[12]=No, tutti
Captions.Strings.String[13]=Sì, tutti
Captions.Strings.String[14]=&Help

;**************
;* Input Form *
;**************
[InputWin]
btn2.Caption=OK
btn1.Caption=Annulla

;*********
;* About *
;*********
[AboutWin]
Caption=Informazioni sul programma
btn3.Caption=Chiudi
btn2.Caption=Versione
btn1.Caption=Crediti
Messages.Strings.String[0]=%s : versione %s (creata il %s)
Messages.Strings.String[1]=(premere Ctrl+C se vuoi copiare queste informazioni negli appunti)

;******************
;* Enter a number *
;******************
[NumberWin]
Caption=Seleziona il numero del libro
btn2.Caption=OK
btn1.Caption=Annulla
LEnterNumber.Caption=Inserisci un numero da assegnare al libro:
btnFindNum.Hint=Trova un numero disponibile|
grpNotUnique.Caption=Già esiste un libro con questo nome...
grpNotUnique.Items.String[0]=Accetta duplicati
grpNotUnique.Items.String[1]=Assegna un altro numero ad un libro esistente
grpNotUnique.Items.String[2]=Trasla la numerazione dei libri finché non ci sono più duplicati
CBDoNotAsk.Caption=Non richiedere in futuro; usa la numerazione automatica
Width=365

;**************
;* Properties *
;**************
[PropertiesWin]
[PropertiesWin]
btn2.Caption=OK
btn1.Caption=Annulla
Caption=Proprietà del catalogo
LHOwnerInfo.Caption=Informazioni sul creatore
LFileName.Caption=Nome:
LFileSize.Caption=Dimensione:
LFileVersion.Caption=Formato:
LHXMLHeader.Caption=Intestazione XML
LEncoding.Caption=Codifica:
LOwnerName.Caption=Nome:
LOwnerMail.Caption=E-mail:
LOwnerSite.Caption=Sito Web:
LDescription.Caption=Descrizione:
EOwnerMail.ButtonHint=Invia una mail
EOwnerSite.ButtonHint=Vai al sito web

;*********
;* Loans *
;*********
[LoanWin]
Caption=Prestiti
btn2.Caption=Chiudi
btn1.Caption=Aiuto

ActionBorrowerAdd.Caption=Aggiungi...
ActionBorrowerAdd.Hint=Aggiungi prestatario|Aggiunge una persona alla lista di chi ha ricevuto prestiti
ActionBorrowerDel.Caption=Elimina
ActionBorrowerDel.Hint=Elimina prestatario|Elimina la persona selezionata dalla lista di chi ha ricevuto prestiti
ActionCheckOut.Caption=In uscita
ActionCheckOut.Hint=In uscita|Aggiunge il libro selezionato alla lista di quelli prestati alla persona selezionata
ActionCheckIn.Caption=In entrata
ActionCheckIn.Hint=In entrata|Rimuove il libro selezionato dalla lista di quelli prestati alla persona selezionata
ActionMovieGetBorrower.Caption=Prestatario
ActionMovieGetBorrower.Hint=Cerca prestatario|Cerca, nella lista dei prestatari, la persona a cui è stato prestato il libro selezionato
ActionMovieFindNext.Caption=Cerca successivo
ActionMovieFindNext.Hint=Cerca successivo|Cerca il prossimo libro nel cui titolo sia contenuto il testo indicato
ActionOptions.Caption=&Opzioni
ActionOptions.Hint=Opzioni|Opzioni per prestiti e riconsegne
ActionOptionsIncNum.Caption=Includi libri con lo stesso &numero
ActionOptionsIncNum.Hint=Include libri con lo stesso numero|Include in prestiti e riconsegne altri libri che hanno lo stesso numero di quello selezionato
ActionOptionsIncLab.Caption=Includi libri con la stessa etichetta
ActionOptionsIncLab.Hint=Includi libri con la stessa etichetta|Include in prestiti e riconsegne altri libri che hanno la stessa etichetta di quello selezionato

LvMovies.HeaderSections.Item[0].Text=N°
LvMovies.HeaderSections.Item[1].Text=Etichetta
LvMovies.HeaderSections.Item[2].Text=Titolo
LvMovies.HeaderSections.Item[3].Text=Prestatario
LvNames.HeaderSections.Item[0].Text=Prestatario
LvNames.HeaderSections.Item[1].Text=Quantità
LvLent.HeaderSections.Item[0].Text=N°
LvLent.HeaderSections.Item[1].Text=Etichetta
LvLent.HeaderSections.Item[2].Text=Titolo

Messages.Strings.String[0]=Questo eliminerà "%s" dalla lista e farà rientrare tutti i libri prestati a questa persona.
Messages.Strings.String[1]=Caricamento della lista ...
Messages.Strings.String[2]=Questo libro è già associato a qualcun'altro
Messages.Strings.String[3]=Inserire un nome
Messages.Strings.String[4]=Il seguente libro è già in prestito a qualcun altro:
;Messages.Strings.String[5]=
Messages.Strings.String[6]=Inserire un nome
Messages.Strings.String[7]=Nuovo prestatario
;Messages.Strings.String[8]=
;Messages.Strings.String[9]=

;**********
;* Export *
;**********
[ExportWin]
Caption=Esporta in un altro formato
lvFormat.Columns.Item[0].Caption=Formati file supportati
Btn3.Caption=Esporta...
Btn2.Caption=Chiudi
Btn1.Caption=Aiuto
grpImages.Caption=Immagini
CBCopyPictures.Caption=Copia il file esportato
CBCopyPictures.Hint=Copia le immagini nella stessa cartella del file esportato
CBCopyPicturesNew.Caption=Solo se non esiste già
CBCopyPicturesNew.Hint=Copia solo i file di immagini che ancora non esistono (non sovrascrive)
LSelectFormat.Caption=Selezionare un formato...
ActionHTMLNew.Caption=Nuovo
ActionHTMLNew.Hint=Nuovo modello
ActionHTMLOpen.Caption=Carica
ActionHTMLOpen.Hint=Carica...e
ActionHTMLNoRecent.Caption=Nessun file recente
ActionHTMLSave.Caption=Salva
ActionHTMLSave.Hint=Salva|Salva come modello
ActionHTMLSaveAs.Caption=Salva con nome...
ActionHTMLSaveAs.Hint=Salva con nome...
ActionInsertTag.Caption=&Inserisci tag speciali
ActionInsertTag.Hint=|Inserisce un valore associato al catalogo
ActionEditUndo.Caption=&Annulla
ActionEditCut.Caption=Taglia
ActionEditCopy.Caption=&Copia
ActionEditPaste.Caption=Incolla
ActionEditDelete.Caption=&Elimina
ActionEditSelectAll.Caption=Seleziona tutto
ActionExportBoth.Caption=Esporta tutti
ActionExportBoth.Hint=|Esporta sia i modelli 'completi' sia quelli 'individuali'
ActionExportSelected.Caption=Esporta la selezione
ActionExportSelected.Hint=|Esporta solo il modello selezionato
ActionDisplayFull.Caption=Tutto
ActionDisplayFull.Hint=Visualizza la lista dei modelli
ActionDisplayIndividual.Caption=Singolo
ActionDisplayIndividual.Hint=Visualizza il singolo modello
MnuGen.Caption=&Generale
MnuGenDte.Caption=Data
MnuGenTme.Caption=Ora
MnuCat.Caption=&Catalogo
MnuCatNme.Caption=Nome file
MnuCatPth.Caption=Origine file
MnuCatNbr.Caption=Numero di libri
MnuCatDsk.Caption=Numero di dischi
MnuOwnNam.Caption=Nome prestatario
MnuOwnEml.Caption=E-mail
MnuOwnWeb.Caption=Sito Web
MnuCatDsc.Caption=Descrizione
MnuMovBeg.Caption=Inizio lista
MnuMovEnd.Caption=Fine lista
MnuMovRec.Caption=Numero
MnuMovInd.Caption=Nome file della pagina dei libri
MnuMov.Caption=&Libri
MnuMovPic.Caption=Copertina
MnuMovPfn.Caption=Origine Copertina
MnuMovApp.Caption=Valutazione
LCSVDelimiter.Caption=Separatore di campo:
ECSVDelimiter.Hint=|Carattere di separazione dei valori dei campi
LCSVBloc.Caption=Separatore blocchi di testo:
ECSVBloc.Hint=|Carattere di delimitazione delle stringhe (lasciare vuoto se non usato)
LCSVLinebreaks.Caption=Sostituisci linebreaks con:
ECSVLinebreaks.Hint=|Carattere da utilizzare per rappresentare l'a capo nelle descrizioni e nei commenti
CBCSVColumnTitles.Caption=Aggiungi colonna
LSQLTableName.Caption=Nome tabella:
CBSQLUpdate.Caption="Aggiorna" invece di "Inserire"
LSQLCommands.Caption=Includi comandi SQL:
LSQLLinebreaks.Caption=Sostituisci linebreaks con:
LImgFilename.Caption=Nome File:
RBImgAppend.Caption=Associa il numero del libro al file selezionato
RBImgNumber.Caption=Usa il numero del libro
RBImgTitle.Caption=Usa la formattazione
LOrigonsLink.Caption=Questo formato consente di mettere il tuo libro online sul sito Origons <br><br><link>www.origons.com</link>
FieldsCSV.LSelected.Caption=Campi da esportare:
FieldsSQL.LSelected.Caption=Campi da esportare:
LXMLNote.Caption=Si può inoltre esportare in XML dalla finestra principale utilizzando File -> Salva con nome, e selezionando il formato XML. Questo file potrà successivamente essere aperto ed utilizzato da Ant Movie Catalog come un normale catalogo.

Messages.Strings.String[0]=Impossibile salvare il file "%s": %s
Messages.Strings.String[1]=Impossibile caricare il file "%s": %s
Messages.Strings.String[2]=Esporta come file per Origons.com
Messages.Strings.String[3]=Lista ...
Messages.Strings.String[4]=Esporta su %s ...
Messages.Strings.String[5]=Copia file ...
Messages.Strings.String[6]=Esporta come HTML
Messages.Strings.String[7]=Esporta come CSV
Messages.Strings.String[8]=Esporta come SQL
Messages.Strings.String[9]=Esporta immagini
Messages.Strings.String[10]=Il modello HTML è stato modificato. Si desidera salvarlo?
Messages.Strings.String[11]=Il modello HTML è stato modificato. Si desidera salvarlo?

;**********
;* Import *
;**********
[ImportWin]
Caption=Import from another file format
Btn3.Caption=&Importa
Btn2.Caption=&Annulla
Btn1.Caption=&Aiuto
LSourceFile.Caption=Importa &da:
  btnBrowse.Hint=Sfoglia...|Seleziona file
  btnReload.Caption=&Reload file
  btnReload.Hint=|Reload file in preview window
  chkAllowDupNumbers.Caption=&Allow duplicate numbers
LSelectFormat.Caption=Please select a format...
LCSVDelimiter.Caption=Delimiter:
LCSVFieldsNames.Caption=Available fields names:
Lv1ColPreview.Columns.Item[0].Caption=Nr
Lv1ColPreview.Columns.Item[1].Caption=Title
ActionListCheck.Caption=&Check selected
ActionListUncheck.Caption=&Uncheck selected
ActionListAll.Caption=Check &all
ActionListNone.Caption=Check &none

Messages.Strings.String[0]=Unable to load file for preview: %s
Messages.Strings.String[1]=Do you also want to import the pictures? They can be stored into the catalog, copied to catalog's folder and then linked, or simply linked from where they are.
Messages.Strings.String[2]=Store
Messages.Strings.String[3]=Copy + Link
Messages.Strings.String[4]=Link
Messages.Strings.String[5]=No pictures
Messages.Strings.String[6]=You did not assign any field to any column (using the drop-down list to select a field, then clicking on the matching column header). Click OK to continue anyway (this will create blank entries for all books).
Messages.Strings.String[7]=Import from CSV
Messages.Strings.String[8]=Import from another catalog
Messages.Strings.String[9]=Import from BaseDVDivx catalog
Messages.Strings.String[10]=Import from Divx Manager catalog
Messages.Strings.String[11]=Import from a file generated by Origons.com

;***************
;* Preferences *
;***************
[OptionsWin]
Caption=Preferenze
Btn3.Caption=OK
Btn2.Caption=Annulla
Btn1.Caption=Aiuto

LvCat.Items.Item[0].Text=Visualizzazione
LHToolbar.Caption=Barre e menù
LIconSet.Caption=Set di Icone:
LColorType.Caption=Colore:
cbxColorType.Items.String[0]=Automatico
cbxColorType.Items.String[1]=Grigio quando inattivo
cbxColorType.Items.String[2]=Schiarisci quando inattivo
cbxColorType.Items.String[3]=Scurisci quando inattivo
cbxColorType.Items.String[4]=Sempre colorato
CBOfficeXP.Caption=Stile Office XP
CBMenuImages.Caption=Immagini nei menù
LHMainWindow.Caption=Visualizzazione
CBSoftBorders.Caption=Bordi leggeri per la lista, il pannello delle informazioni e delle immagini
LHStartup.Caption=Avvio
CBLogo.Caption=Visualizza logo

LvCat.Items.Item[1].Text=Personalizza barre
LHCustomizeToolbar.Caption=Seleziona le icone che devono apparire nella barra dei menù

LvCat.Items.Item[2].Text=File
LHSaving.Caption=Cataloghi
CBBackup.Caption=Crea sempre una copia di sicurezza
CBAutoLoad.Caption=All'avvio, apri il seguente file anziché crearne uno nuovo:
EAutoLoad.ButtonHint=Sfoglia...|Selezionare un file
CBAutoLoadLast.Caption=Apri l'ultimo file utilizzato
LRecentFiles.Caption=Numero dei file recenti da visualizzare nel menù:
LRepairAssociations.Caption=Per associare i file *.amc con Ant Movie Catalog, clicca sul pulsante sottostante:
BtnRepairAssoc.Caption=Ripara le associazioni
LHHistory.Caption=Prestiti
CBHistory.Caption=Salva la storia dei prestiti nel file seguente (usando il formato tab-delimited):
EHistoryFile.ButtonHint=Sfoglia...|Selezionare un file

LvCat.Items.Item[3].Text=Lista libri
LHDisplay.Caption=Visualizza
CBCheckboxes.Caption=Caselle di selezione
CBHotTrack.Caption=Novità
CBEnhScrollbars.Caption=Barre di scorrimento avanzate
CBMovieNumColumn.Caption=colonna "Numero libro"
LHOperations.Caption=Operazioni
CBDelete.Caption=Conferma eliminazione
CBUndo.Caption=Conferma annullamento
LHShortcut.Caption=Comandi rapidi
LShortcutPrev.Caption=Libro precedente
LShortcutNext.Caption=Libro successivo

LvCat.Items.Item[4].Text=Formattazione del titolo
LHFormatting.Caption=Formattazione
LTitleColumn.Caption=Titolo da visualizzare:
cbxTitle.Items.String[0]=Titolo originale
cbxTitle.Items.String[1]=Titolo tradotto
cbxTitle.Items.String[2]=Titolo originale (Titolo tradotto)
cbxTitle.Items.String[3]=Titolo tradotto (Titolo originale)
cbxTitle.Items.String[4]=Etichette
CBPrefixes.Caption=Metti il seguente prefisso alla fine del titolo:
LPrefixes1.Caption=Nel titolo verranno riconosciute solo le parole seguite da uno spazio o da una virgoletta.
LPrefixes2.Caption=Inserirle nella lista, ciascuna su una linea separata, senza spazi né virgolette.

LvCat.Items.Item[5].Text=Raggruppamenti
LHGrouping.Caption=Gruppi
CBNotAloneInGroup.Caption=Non creare gruppi per valori che potrebbero essere unici in questo gruppo
CBGroupCount.Caption=Mostra conteggio gruppi
CBGroupExpand.Caption=Espandi completamente come default
LHGroupUngrouped.Caption=Voci non raggruppate
lblGroupLocation.Caption=Posizione:
RBGroupsAbove.Caption=Gruppi sopra le voci non raggruppate
RBGroupsBelow.Caption=Gruppi sotto le voci non raggruppate
CBGroupLabelNumber.Caption=Quando raggruppa per Etichetta o Numero e ordinato per numero, mischia gruppi e singole voci
CBGroupUnique.Caption=Metti in un gruppo speciale comune le voci che sono da sole nel loro gruppo
CBGroupEmpty.Caption=Metti in un gruppo speciale comune le voci con valori vuoti

LvCat.Items.Item[6].Text=Informazioni sul libro
LHAddMovie.Caption=Aggiunta nuovo libro
CBAskNumber.Caption=Richiesta numero
CBFirstAvailable.Caption=Usa il primo numero disponibile
CBAddOpenScript.Caption=Apri la finestra "Richiedi informazioni da script"
CBAddOpenFiles.Caption=Apri la finestra "Richiedi informazioni da file"
LDefaultValues.Caption=Per modificare i valori correnti di un nuovo libro, clicca sul pulsante sottostante:
BtnDefaultValues.Caption=Modifica i valori correnti del libro
LHRating.Caption=Valutazione
CBRatingTrunc.Caption=Non mostrare i decimali nella vista principale nelle esportazioni ed in stampa
LHPictureWindow.Caption=Copertine
LPictureBackground.Caption=Colore di sfondo:
CBFitPicture.Caption=Ridimensiona l'immagine automaticamente
CBShowPicInfo.Caption=Mostra l'ampiezza dell'immagine, il formato e la path nella finestra fullsize

LvCat.Items.Item[7].Text=Liste a tendina
LHComboBoxItems.Caption=Voci
CBComboSameForAll.Caption=Stesse opzioni per tutte le liste (non agisce sul contenuto della lista)
LListOptions.Caption=Opzioni per la lista:
CBComboSort.Caption=Ordina automaticamente le voci
CBComboAutoComplete.Caption=Completa automaticamente durante la battitura
CBComboCatalogValues.Caption=Usa i valori del catalogo corrente anziché quelli della lista predefinita
CBComboAutoAdd.Caption=Aggiungi automaticamente i valori che non si trovano nella lista
LListEdit.Caption=Modifica voci:

LvCat.Items.Item[8].Text=Ricava informazioni
LHVideoDragDrop.Caption=Drag && Drop / Ricava informazioni da file
CBDNDMediaLabel.Caption=Importa etichetta
CBDNDFileName.Caption=Importa il nome del file come titolo
CBDNDFileNameURL.Caption=Importa il nome del file nel campo URL
CBDNDSize.Caption=Importa la dimensione:
RBDNDString.Caption=Crea stringa, e.s. "650+530"
RBDNDSum.Caption=fai una somma, e.s. "1180"
LDNDSizeUnit.Caption=Unità:
cbxDNDSizeUnit.Items.String[0]=Byte
cbxDNDSizeUnit.Items.String[1]=Kilobyte (KB)
cbxDNDSizeUnit.Items.String[2]=Megabyte (MB)
cbxDNDSizeUnit.Items.String[3]=Gigabyte (GB)
CBDNDLength.Caption=Importa durata
CBDNDInternalAVI.Caption=Utilizza motore interno invece della DLL MediaInfo DLL per l'importazione di AVI (+ veloce)
LDNDPicImport.Caption=Per le preferenze di importazione copertine, vedi la pagine <LINK>Importazione Copertina</LINK>
LHGetInfoVideo.Caption=Informazioni da estrarre dal flusso video
CBDNDResolution.Caption=Importa risoluzione
CBDNDFramerate.Caption=Importa frequenza video
CBDNDVideoCodec.Caption=Importa codec utilizzato
CBDNDVideoBitrate.Caption=Importa bitrate video
LHGetInfoAudio.Caption=Informazioni da estrarre dal flusso audio
CBDNDAudioCodec.Caption=Importa codec audio utilizzato
CBDNDAudioBitrate.Caption=Importa bitrate audio
CBDNDLanguages.Caption=Importa lingua
CBDNDSubtitles.Caption=Importa sottotitoli

LvCat.Items.Item[9].Text=Importazione Copertina
LHImportPic.Caption=Importa copertina da fonti esterne
PicImportGetInfo.grp.Caption=Drag && Drop / Ricava informazioni da file
CBPicImportGetInfoNoAsk.Caption=Non richiedere come importare la copertina; utilizza sempre l'opzione indicata
PicImportScripting.grp.Caption=Per scripting internet
LPicCopyNote.Caption=Nota: quando l'immagine è memorizzata nella stessa cartella del catalogo, viene cancellata quando un'altra immagine viene assegnata al libro, o quando questo viene eliminato
LHPicNaming.Caption=Preferenze nomenclatura immagini
RBPicNamingOriginal.Caption=Mantieni il nome originale
RBPicNamingNum.Caption=Utilizza il numero del libro
RBPicNamingTitle.Caption=Utilizza il titolo del libro formattato
LPicNamingNote.Caption=Note: se il nome dell'immagine è già assegnato ad un'altra, ne verrà generato uno casuale. Quando non c'è il nome (p.e. convertendo dal formato amc a xml), viene utilizzato il titolo del libro.
CBPicNamingPrefix.Caption=Utilizza il nome del catalogo come prefisso per il nome dell'immagine

LvCat.Items.Item[10].Text=Cerca su internet
LHSearch.Caption=Cerca su internet
LSearchEdit.Caption=Modifica la linea selezionata:
btnSearchAdd.Hint=Aggiungi
btnSearchDel.Hint=Elimina
btnSearchUp.Hint=Muovi su
btnSearchDown.Hint=Muovi giù
LSearchNotes.Caption=Note:
LSearchNote1.Caption=- Il nome deve essere unico
LSearchNote2.Caption=- Nell'indirizzo, inserire %s dove deve essere inserito il titolo del libro
LSearchNote3.Caption=- Tipo di separatore da inserire "-"

LvCat.Items.Item[11].Text=Scripting
LHScript.Caption=Impostazioni Script
CBAutorunScript.Caption=Esegui automaticamente l'ultimo script utilizzato con "Ottieni informazioni da script"
LScriptPicImport.Caption=Per le preferenze di importazioni delle immagini, vedi la pagina <LINK>Importazione Copertina</LINK>
LHConnection.Caption=Connessione internet
CBProxy.Caption=Usa un proxy per accedere a Internet:
LProxyServer.Caption=Server:
LProxyPort.Caption=Porta:
LProxyUsername.Caption=Utente:
LProxyPassword.Caption=Password:
CBKeepConnection.Caption=Rimani connesso
  CBHTTP10.Caption=Restrict to HTTP 1.0 (needed by some proxy servers)

LvCat.Items.Item[12].Text=Esporta
LHHTML.Caption=HTML
CBLoadTemplate.Caption=Carica l'ultimo modello utilizzato automaticamente
LLineBreaks.Caption=Le interruzioni di linea saranno sostituite dal seguente tag:
ELineBreaks.Hint=|Se non vuoi sostituire le interruzioni di linea, lascia vuoto questo campo
LForcePicSize.Caption=Forza le dimensioni dell'immagine:
EForcePicSizeW.Hint=|Se non si inserisce nulla la larghezza non verrà modificata
EForcePicSizeH.Hint=|Se non si inserisce nulla l'altezza non verrà modificata
LHSQL.Caption=SQL
LSQLDate.Caption=Formato Data:
ESQLDate.Hint=|Lascia vuoto come default
LHExportFileNames.Caption=Nome file
CBLastFileName.Caption=Utilizza il nome dell'ultimo file esportato
CBOpenExportedFile.Caption=Dopo l'esportazione, apri il file appena creato
LExpFileStyle.Caption=Stile dei nomi di pagine individuali e delle immagini:
cbxExpFileStyle.Items.String[0]=Nome del file esportato + Numero di libri
cbxExpFileStyle.Items.String[1]=Nome del catalogo + Numero di libro
cbxExpFileStyle.Items.String[2]=Titolo del libro
LExpFileExt.Caption=Estensione da aggiungere:
EExpFileExt.Hint=|Lascia vuoto per usare la stessa estensione del file principale
CBAddZeroes.Caption=Aggiungi degli zeri davanti ai numeri bassi
LHPictures.Caption=Immagini
CBCopyPictures.Caption=Copia le immagini nella stessa cartella dei file esportati
CBCopyPicturesNew.Caption=Copia solo se il file di destinazione non esiste

LvCat.Items.Item[13].Text=Cartelle
LHFoldersDialogs.Caption=Finestre di dialogo
LFolderToUse.Caption=Cartella da utilizzare per
cbxWindow.Items.String[0]=Carica/Salva il catalogo
cbxWindow.Items.String[1]=Carica le immagini
cbxWindow.Items.String[2]=Esporta
cbxWindow.Items.String[3]=Carica/Salva i modelli
cbxWindow.Items.String[4]=Importa
cbxWindow.Items.String[5]=Estrai informazioni da file
cbxWindow.Items.String[6]=Salva il grafico
cbxWindow.Items.String[7]=Caricare/Salva script
RBFolderDefault.Caption=Impostazioni di Windows (dipende dalla versione)
RBFolderRemember.Caption=Usa l'ultima cartella aperta
RBFolderSpecified.Caption=Usa questa cartella:
EFolderSpecified.ButtonHint=Sfoglia...|Seleziona la cartella
CBSameForAll.Caption=Stesse opzioni per tutte le finestre

;*******************************
;* Default book values window *
;********************************
[DefaultValuesWin]
Caption=Modifica i valori correnti del libro
Btn3.Caption=Corrente
Btn3.Hint=|Ripristina valori correnti
Btn2.Caption=OK
Btn1.Caption=Annulla

;*****************************
;* Language selection window *
;*****************************
[LanguageWin]
Caption=Seleziona una lingua
Btn2.Caption=OK
Btn1.Caption=Annulla
LanguageFrame.lstLanguages.Columns.Item[0].Caption=Nome
LanguageFrame.lstLanguages.Columns.Item[1].Caption=Nome tradotto
LanguageFrame.lblVersion.Caption=Versione:
LanguageFrame.lblMadeBy.Caption=Fatto da:
LanguageFrame.lblComments.Caption=Commenti:

;************************
;* Advanced sort window *
;************************
[SortWin]
Caption=Opzioni avanzate di ordinamento
Fields.LSelected.Caption=Campi da includere:

;*********************
;* Statistics window *
;*********************
[StatsWin]
Caption=Statistiche
btn1.Caption=Chiudi
ActionSaveAs.Caption=Salva con nome...
ActionSaveAs.Hint=Salva con nome...
ActionCopy.Caption=Copia
ActionCopy.Hint=Copia
ActionCopyWMF.Caption=Come metafile
ActionCopyWMF.Hint=Copia come metafile|Copia l'immagine in formato metafile (ridimensionabile)
ActionCopyBMP.Caption=Come bitmap
ActionCopyBMP.Hint=Copia come bitmap|Copia l'immagine in formato bitmat
ActionOptions.Caption=Opzioni
ActionOptions.Hint=Opzioni
ActionOptionsLegend.Caption=Legenda
ActionOptionsLegend.Hint=Visualizza legenda|Mostra la legenda a destra del grafico
ActionOptionsLabels.Caption=Etichette
ActionOptionsLabels.Hint=Visualizza etichette!Mostra le etichette sul grafico
ActionOptionsEmpty.Caption=Mesi vuoti
ActionOptionsEmpty.Hint=Visualizza mesi vuoti|Mostra i mesi nei quali il numero di libro è uguale a zero
ActionOptionsGroup.Caption=Raggruppa valori
ActionOptionsGroup.Hint=Raggruppa valori|Grafico: Raggruppa valori usando intervalli; Torta: Raggruppa valori + piccoli insieme
Messages.Strings.String[0]=%.1f minuti
Messages.Strings.String[1]=< nessuna >
Messages.Strings.String[2]=Salva grafico
Messages.Strings.String[3]=%d giorni %d ore %d minuti
lstGeneral.Items.Item[0]=Numero totale di libri
lstGeneral.Items.Item[1]=Durata media dei libro???
lstGeneral.Items.Item[2]=Durata totale dei libri???
lstGeneral.Items.Item[3]=Dimensione totale dei file
lstGeneral.Items.Item[4]=Numero totale di dischi
lstCategories.Items.String[0]=Informazioni generali
lstCategories.Items.String[1]=Frequenza delle aggiunte
lstCategories.Items.String[2]=Tipo supporti
lstCategories.Items.String[3]=Origine
lstCategories.Items.String[4]=Paesi
lstCategories.Items.String[5]=Categorie
lstCategories.Items.String[6]=Anni
lstCategories.Items.String[7]=Durata
lstCategories.Items.String[8]=Formati video
lstCategories.Items.String[9]=Formati audio
lstCategories.Items.String[10]=Fps
lstCategories.Items.String[11]=Lingue
lstCategories.Items.String[12]=Sottotitoli

;*****************
;* Script window *
;*****************
[GetScriptWin]
Caption=Scripting
btn2.Caption=Chiudi
btn1.Caption=Aiuto
ActionFileNew.Caption=Nuovo
ActionFileNew.Hint=Nuovo|Crea un nuovo script
ActionFileOpen.Caption=Apri...
ActionFileOpen.Hint=Apri...|Apri un file di script
ActionFileNoRecent.Caption=Nessun file recente
ActionFileSave.Caption=Salva
ActionFileSave.Hint=Salva|Salva lo script corrente
ActionFileSaveAs.Caption=Salva con nome...
ActionFileSaveAs.Hint=Salva con nome...|Salva lo script corrente con un nuovo nome
ActionFileProperties.Caption=Proprietà...
ActionFileProperties.Hint=Proprietà ed opzioni...|Edita opzioni e proprietà dello script
ActionDebugRun.Caption=Esegui
ActionDebugRun.Hint=Esegui Script|Esegui Script
ActionDebugStop.Caption=Stop
ActionDebugStop.Hint=Ferma script|Ferma l'esecuzione dello script
ActionDebugBreakpoint.Caption=Breakpoint
ActionDebugBreakpoint.Hint=Inverti breakpoint|Abilita o disabilita i breakpoint nella linea corrente
ActionDebugBreakpointClear.Caption=Elimina i breakpoint
ActionDebugBreakpointClear.Hint=Elimina i breakpoint|Rimuove tutti i breakpoint
ActionDebugStep.Caption=Esegui step
ActionDebugStep.Hint=Esegui step|Esegue la successiva linea di codice
ActionDebugRunToCursor.Caption=Esegui fino al cursore
ActionDebugRunToCursor.Hint=Esegui fino al cursore|Esegue il programma finché non viene raggiunta l'attuale posizione del cursore
ActionDebugEval.Caption=Valuta...
ActionDebugEval.Hint=Valuta variabile...|Mostra il contenuto della variabile selezionata
ActionDebugWatchAdd.Caption=Monitor variabile
ActionDebugWatchAdd.Hint=Monitor variabile|Aggiunge la variabile selezionata alla watch list
ActionDebugWatchRemove.Caption=Rimuovi
ActionDebugWatchRemove.Hint=Rimuove watch|Rimuove la variabile selezionata dalla watch list
ActionDebugWatchClear.Caption=Svuota watch
ActionDebugWatchClear.Hint=Svuota la watch list|Elimina tutte le variabili dalla watch list
ActionListCheck.Caption=&Abilita la selezione
ActionListCheck.Hint=Abilita selezionati|Aggiunge la spunta alle voci selezionate
ActionListUncheck.Caption=&Disabilita selezionati
ActionListUncheck.Hint=Disabilita selezionati|Toglie la spunta alle voci selezionate
ActionListAll.Caption=Abilita tutte
ActionListAll.Hint=Abilita tutte|Aggiunge la spunta a tutte le voci
ActionListNone.Caption=Abilita nessuna
ActionListNone.Hint=Abilita nessuna|Toglie la spunta a tutte le voci
ActionDisplayScripts.Caption=Script
ActionDisplayScripts.Hint=Seleziona script|Mostra gli script disponibili
ActionDisplayEditor.Caption=Editor
ActionDisplayEditor.Hint=Script editor|Apre l'editor per gli script
ActionViewFilter.Caption=Filtro lingua
ActionViewFilter.Hint=Filtro lingua|Filtro che permette di nascondere gli script mostrando solo quelli delle lingue specificate
ActionViewList.Caption=Lista
ActionViewList.Hint=Lista|Mostra gli script come una lista
ActionViewDetailed.Caption=Dettagli
ActionViewDetailed.Hint=Dettagli|Mostra gli script su due colonne (con la relativa descrizione)
ActionOptionsEdit.Caption=Cambia...
ActionOptionsEdit.Hint=Cambia valore...|Cambia il valore dell'opzione selezionata
ActionOptionsDefault.Caption=Valori predefiniti
ActionOptionsDefault.Hint=Valori predefiniti|Riporta le opzioni ai valori predefiniti
lstScripts.Hint=|Seleziona uno script, e poi clicca su "Esegui", o fai doppio-click sul nome dello script, o premi F9 oppure Invio.
lstScripts.Columns.Item[0].Caption=Titolo
lstScripts.Columns.Item[1].Caption=Descrizione
ActionEditUndo.Caption=&Annulla
ActionEditCut.Caption=&Taglia
ActionEditCopy.Caption=&Copia
ActionEditPaste.Caption=&Incolla
ActionEditDelete.Caption=&Elimina
ActionEditSelectAll.Caption=Seleziona Tutti
ActionEditFind.Caption=Trova...
ActionEditfind.Hint=Trova|Cerca una stringa all'interno del testo
ActionEditFindNext.Caption=Trova successivo
ActionEditFindNext.Hint=Trova successivo|Cerca la successiva stringa all'interno del testo
DockpanelExec.Caption=Opzioni di esecuzione
CBShowResults.Caption=Mostra finestra risultati
CBShowResults.Hint=Mostra i vecchi ed i nuovi valori dei campi di ogni libro per la selezione manuale di quelli da tenere
CBCloseThis.Caption=Chiudi questa finestra alla fine
CBCloseThis.Hint=Chiudi questa finestra quando l'esecuzione dello script termina con successo
CBAllowClear.Caption=&Permetti di pulire i campi
CBAllowClear.Hint=Permetti agli script di sostituire i campi valorizzati con altri vuoti se specitifato nello script
DockpanelOptions.Caption=Opzioni script
DockpanelOptions.Hint=|Doppio click su un'opzione per modificarla. Nota: le opzioni vengono salvate solo all'esecuzione dello script.
DockpanelLimitations.Caption=Limiti script
grpLimitFields.Caption=Campi modificabili
lstLimitFields.Hint=|Nota: la selezione dei campi viene salvata solo all'esecuzione dello script.
grpScriptInfo.Caption=Informazioni
tabScriptInfo.Tabs.String[0]=Generale
tabScriptInfo.Tabs.String[1]=Commenti
tabScriptInfo.Tabs.String[2]=Licenza
DockpanelWatch.Caption=Watch list

Messages.Strings.String[0]=Errore script in "%s": %s linea %d
Messages.Strings.String[1]=Lo script corrente è stato modificato. Si desidera salvarlo?
Messages.Strings.String[2]=sconosciuto
Messages.Strings.String[3]=Concordo
Messages.Strings.String[4]=Nessun libro è stato trovato per le limitazioni attualmente impostate (%s: %s)
Messages.Strings.String[5]=Vuoi interrompere l'elaborazione della lista di libri?
Messages.Strings.String[6]=Modificato
Messages.Strings.String[7]=Valore dell'opzione "%s"
;Messages.Strings.String[8]=
Messages.Strings.String[9]=Trova
Messages.Strings.String[10]=Inserisci il testo da cercare:
Messages.Strings.String[11]=Non ho trovato nulla che contenga "%s"

;**************************
;* Book selection window *
;**************************
[PickTreeWin]
Caption=Selezione libro
btnView.Caption=Visualizza pagina
btnView.Hint=Lancia il browser web|
btn3.Caption=OK
btn2.Caption=Trova simili
btn1.Caption=Cancella

;********************************
;* Description selection window *
;********************************
[PickListWin]
Caption=Descrizione selezione
btn2.Caption=OK
btn1.Caption=Cancella

;****************************
;* Script properties window *
;****************************
[ScriptPropertiesWin]
Caption=Proprietà ed opzioni script
btn3.Caption=OK
btn2.Caption=Annulla
btn1.Caption=Aiuto
lstProperties.TitleCaptions.String[0]=Proprietà
lstProperties.TitleCaptions.String[1]=Valore
grpOptions.Caption=Opzioni
btnOptionAdd.Hint=Aggiungi|Aggiunge una nuova opzione
btnOptionDel.Hint=Elimina|Elimina l'opzione selezionata
grpValues.Caption=Valori disponibili per l'opzione selezionata
lblValueDefault.Caption=Valori predefiniti:

Messages.Strings.String[0]=Autori script:
Messages.Strings.String[1]=Nome script:
Messages.Strings.String[2]=Descrizione:
Messages.Strings.String[3]=Indirizzo sito:
Messages.Strings.String[4]=Lingua sito:
Messages.Strings.String[5]=Versione script:
Messages.Strings.String[6]=Richiede almeno:
Messages.Strings.String[7]=Commenti:
Messages.Strings.String[8]=Licenza script:
Messages.Strings.String[9]=Ottieni info dal web:
Messages.Strings.String[10]=Valore
Messages.Strings.String[11]=Descrizione
Messages.Strings.String[12]=Questo eliminerà l'opzione "%s"
Messages.Strings.String[13]=Nome opzione:

;*************************
;* Script results window *
;*************************
[ScriptResultsWin]
  Caption=Risultati esecuzione script
  btn4.Caption=&Salva
  btn4.Hint=|Salva informazioni per questo libro
  btn3.Caption=Salva tutto
  btn3.Hint=|Salva questo libro e tutti i seguenti
  btn2.Caption=Salta
  btn2.Hint=|Salta solo questo libro
  btn1.Caption=Annulla
  btn1.Hint=|Anulla esecuzione script
  lstValues.Columns.Item[0].Caption=Campo
  lstValues.Columns.Item[1].Caption=Valore precedente
  lstValues.Columns.Item[2].Caption=Nuovo valore

  Messages.Strings.String[0]=Risultati script "%s" per libro %d
  Messages.Strings.String[1]=Dimensioni: %.0n KB, click qui per anteprima
  Messages.Strings.String[2]=Vuoi ricordare quali campi tenere per i prossimi libri in questa esecuzione di script? (se rispondi No, tutti i campi modificati dallo script saranno usati)

;*******************
;* Renumber window *
;*******************
[RenumberWin]
Caption=Renumera libri
  SortBy.grp.Caption=Prima di renumerare, ordina per
btn2.Caption=OK
btn1.Caption=Annulla

Messages.Strings.String[0]=Renumerazione libri ...

;*******************
;* Printing Window *
;*******************
[PrintWin]
btn3.Caption=&Stampa...
btn2.Caption=Chiudi
btn1.Caption=&Aiuto
ActionFileLoad.Caption=Carica template...
ActionFileLoad.Hint=Carica template|Carica un template
ActionFileDesigner.Caption=&Designer...
ActionFileDesigner.Hint=Apri Designer|Apri Designer
ActionPrint.Caption=Stampa...
ActionPrint.Hint=Stampa|Stampa
ActionPreviewRefresh.Caption=&Aggiorna
ActionPreviewRefresh.Hint=Refresh preview|Aggiorna anteprima
ActionPreviewPageFirst.Caption=Prima pagina
ActionPreviewPageFirst.Hint=Prima pagina|Vai alla prima pagina
ActionPreviewPagePrevious.Caption=Pagina precedente
ActionPreviewPagePrevious.Hint=Pagina precedente|Vai alla pagina precedente
ActionPreviewPageNext.Caption=Pagina seguente
ActionPreviewPageNext.Hint=Pagina seguente|Vai alla pagina seguente
ActionPreviewPageLast.Caption=Ultima pagina
ActionPreviewPageLast.Hint=Ultima pagina|Vai all'ultima pagina
ActionPreviewPageFull.Caption=Pagina intera
ActionPreviewPageFull.Hint=Pagina intera|Visualizza a pagina intera
ActionPreviewPageTwo.Caption=Doppia pagina
ActionPreviewPageTwo.Hint=Doppia pagina|Visualizza a doppia pagina
ActionPreviewPageWidth.Caption=Larghezza pagina
ActionPreviewPageWidth.Hint=Larghezza pagina|Vuisualizza per larghezza 
ActionPreviewZoomOut.Caption=Zoom -
ActionPreviewZoomOut.Hint=Zoom out|Diminuisci zoom
ActionPreviewZoomIn.Caption=Zoom +
ActionPreviewZoomIn.Hint=Zoom in|Aumenta zoom 
LvScripts.Columns.Item[0].Caption=Template disponibili
Messages.Strings.String[0]=Stampa - %s
Messages.Strings.String[1]=<nessun file selezionato>
Messages.Strings.String[2]=Non riesco a caricare file per anteprima: %s
Messages.Strings.String[3]=Non trovo Report Designer. %s deve stare nella stessa cartella di Ant Book Catalog.

;***********************************
;* Import a picture by drag & drop *
;***********************************
[PictureDragDropWin]
  Caption=Importa immagine
  Btn3.Caption=OK
  Btn2.Caption=Annulla
  Btn1.Caption=&Aiuto
  CBDoNotAsk.Caption=Non chiederlo più, ricordatelo!

;**********
;* Frames *
;**********
[TMovieFrame]
LMedia.Caption=Collezione:
LMediaType.Caption=Categoria:
LSource.Caption=Sorgente:
LDate.Caption=Date Aggiunta:
LBorrower.Caption=Prestato da:
LRating.Caption=Voto:
LRating10.Caption=/ 10
LOriginalTitle.Caption=Titolo Originale:
LTranslatedTitle.Caption=Titolo:
LDirector.Caption=Autore:
LProducer.Caption=Editore:
LCountry.Caption=Lingua originale:
LCategory.Caption=Genere:
LYear.Caption=Anno:
LLength.Caption=
LLengthMin.Caption=
LActors.Caption=
LURL.Caption=Web:
LDescription.Caption=Trama:
LComments.Caption=Dettagli:
LVideoFormat.Caption=Formato:
LVideoKbps.Caption=#pag.
LAudioFormat.Caption=
LAudioKbps.Caption=
LResolution.Caption=Cod. ISBN-EAN
LFramerate.Caption=Prezzo:
LFramerateFPS.Caption=€
LSize.Caption=
  LDisks.Caption=
LLanguages.Caption=
LSubtitles.Caption=

EMedia.Hint=|Collection or group of books/magazines
EMediaType.Hint=|Category
ESource.Hint=|Source (where/how you got this book)
EDate.Hint=|Date when the book was added to the list
EBorrower.Hint=|Borrower
ERating.Hint=|Voto da 0 a 10
EOriginalTitle.Hint=|&Original title
ETranslatedTitle.Hint=|T&ranslated title
EDirector.Hint=|Autore
EProducer.Hint=|Casa editrice
ECountry.Hint=|Lingua originale
ECategory.Hint=|Genere
EYear.Hint=|Anno di pubblicazione
ELength.Hint=1
ELength.Visible=0
EActors.Hint=2
EActors.Visible=0
EURL.Hint=|Pagina del libro su Bol.it
EDescription.Hint=|Trama
EComments.Hint=|Dettagli
EVideoFormat.Hint=|Formato del libro
EVideoBitrate.Hint=|Numero di pagine
EAudioFormat.Hint=3
EAudioFormat.Visible=0
EAudioBitrate.Hint=4
EAudioBitrate.Visible=0
EResolution.Hint=Codice ISBN o EAN
EResolution.Visible=1
EFramerate.Hint=Prezzo di copertina
EFramerate.Visible=1
ESize.Hint=7
ESize.Visible=0
LSizeUnit.Visible=0
EDisks.Hint=8
EDisks.Visible=0
ELanguages.Hint=10
ELanguages.Visible=0
ESubtitles.Hint=11
ESubtitles.Visible=0

[TFieldsFrame]
LAvailable.Caption=Campi disponibili:
LSelected.Caption=Campi selezionati:
BtnAdd.Hint=Add|Aggiungi campo selezionato
BtnRem.Hint=Remove|Rimuovi campo selezionato
BtnAddAll.Hint=Add All|Aggiungi tutti i campi
BtnRemAll.Hint=Remove All|Rimuovi tutti i campi
BtnUp.Hint=Move Up|Muovi sopra
BtnDown.Hint=Move Down|Muovi sotto

[TSortByFrame]
grp.Caption=Sort by
BtnAdvSort.Caption=Advanced...
EOrderBy.Items.String[4]=Advanced sort options...

[TIncludemovFrame]
  grp.Caption=Libri da includere
  rbtAll.Caption=Tutti
  rbtSelected.Caption=Selezionati
  rbtChecked.Caption=Spuntati
  rbtVisible.Caption=Visibili

[TPictureSelectOptionsFrame]
  grp.Caption=Metodo d'importazione immagine
  rbtStorePic.Caption=&Immagazzina immagine nel catalogo
  rbtCopyPic.Caption=&Copia immagine nella cartella del catalogo e collegala
  rbtLinkPic.Caption=Collega soltanto
  chkLinkRelative.Caption=Crea percorso relativo se possibile

************* and here is the script **************

Code: Select all

(***************************************************

Ant Movie Catalog importation script
www.antp.be/software/moviecatalog/

[Infos]
Authors=Fulvio53s03 (+ k + bad4u)
Title=Bol.IT.ifs
Description=Estrae dati da Bol.it
Site=www.bol.it
Language=IT
Version=
Requires=3.5.1
Comments=
License=
GetInfo=1

[Options]

***************************************************)

// GETINFO SCRIPTING
// Ita-Bol.com (IT)

(***************************************************
*  Movie importation script for:                  *
*  Ita-Bol.com (IT), http://www.ita-bol.com       *
*                                                 *
* (c) 2004 Andrea Cristaudo achris@tiscalinet.it  *
*                                                 *
*  For use with Ant Movie Catalog 3.4.1           *
*  www.ant.be.tf/moviecatalog ··· www.buypin.com  *
*                                                 *
*  The source code of the script can be used in   *
*  another program only if full credits to        *
*  script author and a link to Ant Movie Catalog  *
*  website are given in the About box or in       *
*  the documentation of the program               *
***************************************************)

program ItaBol;
uses StringUtils1;   // Script needs external unit StringUtils1.pas in scripts folder !
var MovieName: string;
    TheMovieAddress: string;
    SearchPage, SearchPageEnd: string;
    LineNr:   integer;

procedure AnalyzeSearchPage(Address: string);
var Page:     TStringList;
    BeginPos: integer;
begin
  Page := TStringList.Create;
  Page.Text := GetPage(Address);
  LineNr := FindLine('Risultati ricerca: <b>', Page, 0);
//  setfield(FieldVideoFormat, Address);
  if LineNr = 0 then
    begin
      ShowMessage('Nessuna informazione trovata');
    end
  else
    begin
      PickTreeClear;
      AddMoviesTitles(Page);
      if TheMovieAddress='*' then
        begin
          if PickTreeExec(Address) then
            begin
              SetField(fieldURL, Address);
              Page.Text := GetPage(Address);
              AnalyzeMoviePage(Page);
            end;
        end
      else
        begin
          SetField(fieldURL, TheMovieAddress);
          Page.Text := GetPage(TheMovieAddress);
          AnalyzeMoviePage(Page);
        end;
    end;
  Page.Free;
end;

procedure AddMoviesTitles(Page: TStringList);
var NewLineNr: Integer;
    Line, BeginLine, Beginsearch: string;
    MovieTitle, MovieAddress, CodPag: string;
    BeginPos, EndPos: Integer;
    Conta: Integer;
begin
  Conta:=0;
//ex    LineNr := FindLine('        <font class="Testo">', Page, LineNr);
      LineNr := FindLine('<td><h4><a href="/libri/', Page, LineNr);    // cerca la riga con titolo e link

  while LineNr <> -1 do
    begin
      // Indirizzo Scheda
//ex      Line := Page.GetString(LineNr+1);
      Line := Page.GetString(LineNr);
      BeginSearch := '<td><h4><a href="';
      BeginPos := pos(BeginSearch, Line) + length(BeginSearch);  //Length '<a href="/libri/' = 23
      EndPos := pos('" >',Line);
      CodPag := copy(Line, BeginPos, EndPos - BeginPos);
      MovieAddress := 'http://www.bol.it' + CodPag;

      // Titolo
//    Line := Page.GetString(LineNr + 0);
      BeginLine := '" >';
      BeginPos := pos(BeginLine, Line);
      EndPos   := pos('</a></h4>', Line);
      MovieTitle := copy(Line, BeginPos + length(BeginLine), EndPos - BeginPos - length(BeginLine));
      HTMLRemoveTags(MovieTitle);
      HTMLDecode(Movietitle);
      MovieTitle := FullTrim(MovieTitle);
      if MovieTitle <> '' then
         PickTreeAdd(MovieTitle, MovieAddress);
      LineNr := FindLine('<td><h4><a href="/libri/', Page,LineNr+3);    // verificare
      Conta:=Conta+1;
    end;
    if Conta > 1 then TheMovieAddress := '*'
    else TheMovieAddress := MovieAddress;
   
end;

procedure AnalyzeMoviePage(Page: TStringList);
var i, j: Integer;
    Euro, Value, Value2, Line, Line2, Cover: string;
    BeginPos, EndPos: Integer;
    Director, ImgUrl: string;
begin
//ex  LineNr := FindLine('<font face="Verdana, Arial, Helvetica, sans-serif" size="4" color="#3366CC"><b>', Page, 0);
      //Copertina
      cover := TextBetween(Page.text, '<!-- COPERTINA -->', '</div>');     //Copertina
      cover := TextBetween(cover, 'img src="', '" class="cover"');
      cover := 'http://www.bol.it' + cover;
//    setfield(FieldVideoFormat, cover);

      GetPicture(cover);

    LineNr := FindLine('<div class="bol_path">', Page, 0);                 //Titolo

  if LineNr > -1 then
     begin
      //Translated Title
      LineNr := LineNr + 6;
      Line := Page.GetString(LineNr);
      Line := textBetween(Line, '<b>', '</b>');
      EndPos := pos('</b>', Line);
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldTranslatedTitle, Line);
     end
      //Trama
      Line := textBetween(Page.text, '<p class="bol_spacer">', '</p>');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldDescription, Line);

      //Autore
      Line := textBetween(Page.text, '<a href="/libri/autore/', '</a>') + '</a>';
      Line := textBetween(Line, '" >', '</a>');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldDirector, Line);

      //Titolo originale
      Line := textBetween(Page.text, '<b>Titolo originale:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := FullTrim(Line);
      SetField(fieldOriginalTitle, Line);

      //Editore
      Line := textBetween(Page.text, '<b>Editore:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
      SetField(fieldProducer, Line);

      //Lingua originale
      Line := textBetween(Page.text, '<b>Lingua originale:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
      SetField(fieldLanguages, Line);



      //Test miei


      //Lingua
      Line := textBetween(Page.text, '<b>Lingua:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
      SetField(fieldLanguages, Line);

      //Lingua originale
      Line := textBetween(Page.text, '<b>Lingua originale:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
      SetField(fieldCountry, Line);

      //Anno di pubblicazione
      Line := textBetween(Page.text, '<b>Anno di pubblicazione</b> ', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
      SetField(fieldYear, Line);

      //Numero di pagine
      Line := textBetween(Page.text, '<b>Pagine:</b> ', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
      SetField(fieldVideoBitrate, Line);

      //Codice EAN
      Line := textBetween(Page.text, '<b>Codice EAN:</b> ', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
      SetField(fieldResolution, Line);

      //Formato
      Line := textBetween(Page.text, '<b>Formato:</b>', '<br');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
	  
	Line := TextAfter(Line, #13#10);
      
      if Line <> '' then
      begin
        Line := StringReplace(Line, '..., more', '');
        Line := StringReplace(Line, ', more', '');
        Line := StringReplace(Line, '...', '');
        Line := StringReplace(Line, ' &', '');
        Line := StringReplace(Line, '  ', '');
        Line := StringReplace(Line, #13, '');
        Line := StringReplace(Line, #10, '');
        Line := StringReplace(Line, #9, '');
        Line := Trim(StringReplace(Line, ' and, ', ', '));
        end;
	  
      SetField(fieldVideoFormat, Line);

      //Voto
      Line := textBetween(Page.text, '/bol/images/rating_', '.gif');
      HTMLRemoveTags(Line);
      HTMLDecode(Line);
      Line := Trim(Line);
      SetField(fieldRating, Line);

      //Genere
      Line := textBetween(Page.text, '<b>Generi:</b> ', '<br');
	  Value := textBetween(Line, 'class="bol_blue">', '</a');
      HTMLDecode(Value);
      Value := Trim(Value);
	  
	// tentativo di far caricare anche il secondo genere
	//Line2 := textBetween(Page.text, Value, '<br');
	//Value2 := textBetween(Line2, 'class="bol_blue">', '</a');
	//HTMLDecode(Value2);
	//Value2 := Trim(Value2);
	//Value := Value + Value2;
	  
      SetField(fieldCategory, Value);

      //Prezzo
      Euro := textBetween(Page.text, '€', '<br');
      HTMLRemoveTags(Euro);
      HTMLDecode(Euro);
      Euro := Trim(Euro);
      Euro := TextAfter(Euro, #13#10);
      
      if Euro <> '' then
      begin
        Euro := StringReplace(Euro, '..., more', '');
        Euro := StringReplace(Euro, ', more', '');
        Euro := StringReplace(Euro, '...', '');
        Euro := StringReplace(Euro, ' &', '');
        Euro := StringReplace(Euro, '  ', '');
        Euro := StringReplace(Euro, #13, '');
        Euro := StringReplace(Euro, #10, '');
        Euro := StringReplace(Euro, #9, '');
        Euro := Trim(StringReplace(Euro, ' and, ', ', '));
        end;
        
      SetField(fieldFramerate, Euro);



      //Fine test miei



end;

begin
  if CheckVersion(3,5,1) then
    begin
      SearchPage := 'http://www.bol.it/libri/ricerca/1/sort=3&tpr=10&g=';
      SearchPageEnd := '&crc=100&bld=200';
//      SearchPage := 'http://www.ita-bol.com/bol/main.jsp?action=vidrisultatoricerca&quick_type=Titolo&filtro_ricerca=VID&titolo=';

      MovieName := GetField(fieldTranslatedTitle);
      if MovieName = '' then
         MovieName := GetField(fieldOriginalTitle);
      if Input('Ita-Bol.com Import', 'Enter the title of the movie:', MovieName) then
         begin
               AnalyzeSearchPage(SearchPage + UrlEncode(MovieName) + SearchPageEnd);
         end
    end
  else
    ShowMessage('This script requires a newer version of Ant Movie Catalog (at least the version 3.5.1)');
end. 
fulvio53s03
Posts: 764
Joined: 2007-04-28 05:46:43
Location: Italy

Post by fulvio53s03 »

Hey, complimenti! (e grazie) ;)
Una curiosità: hai aggiunto l'estrazione di alcuni campi ed altre estrazioni le hai modificate, lasciando però anche le mie: mica mi offendo sai.....
Ho fatto piccole modifiche al file di linguaggio Italiano: 'EAN' invece di 'Risoluzione' e qualche 'Film' dimenticato qua e là; prova a vedere se trovi qualcos'altro, nel frattempo io lo posto in un topic nuovo.

Chissà che la comunità Italiano di AMC non si faccia un po' più presente....

Infine:
posto in un'altro topic lo script di estrazione da Libreria.universitaria.it. Funziona ma richiede una limatina. Hai tempo e voglia?

A presto. ;)

In two new topics the releases of Italian Books Language and the script to extract books informations from Libreria.Universitaria.it.

Bye. :)
Post Reply