Hinweis: ======== Die einzelnen Sequenzen, Codes usw. sind immer mit "#####" vorangestellt und abgeschlossen! Das Beispiel ist unter Windows7-Dateisystem gezeigt! xxxx steht für den eigenen Windowsbenutzernamen. Zeta-Producer muss beendet sein! Anpassung: ========== Öffnen der Datei "C:\Users\xxxx\Documents\Zeta Producer 10\Stationary\DEU\ActiveObjects\template.xml" mit dem Notepad Suchen nach folgendem Inhalt: articlestyle="Slideshow" Setzen Sie den Cursor links neben dem gefundenen Inhalt zwischen und . Fügen Sie folgenden Inhalt dazwischen ein: ##### <$ if Context.Scope.CurrentPage.GetInheritedAttribute("picgallery_language").Value = "de" then $> <$ elseif Context.Scope.CurrentPage.GetInheritedAttribute("picgallery_language").Value = "en" then $> <$ end if $> <$ end if hassame = true end if next $> <$ dim albumID : albumID = Context.Scope.CurrentArticle.Values.GetValue("Album") dim thumbnailWidth : thumbnailWidth = Context.Scope.CurrentArticle.Values.GetValue("Breite der Vorschaubilder") dim thumbnailHeight : thumbnailHeight = CInt((thumbnailWidth*3)/4) dim imagesPerRow : imagesPerRow = Context.Scope.CurrentArticle.Values.GetValue("Anzahl Vorschaubilder pro Zeile") dim assetCategory : set assetCategory = Context.Scope.CurrentWebProject.GetAssetCategoryByID( albumID ) dim images : set images = assetCategory.Images dim rowIndex : dim colIndex : dim index dim rowCount : rowCount = images.Count \ imagesPerRow if images.Count mod imagesPerRow > 0 then rowCount = rowCount + 1 end if Context.Scope.Library.Log images.Count & " images..." Context.Scope.Library.CheckAsyncStopProcessing ' Must use a prefix to allow multiple instances of the JavaScript on the page. dim prefix prefix = "prefix_#data(id)_" $> <$ if Context.Scope.CurrentArticle.Name <> "" then $><$=Context.Scope.CurrentArticle.Name$><$ end if $> <$ ' -- Build the thumbnails grid. index = 0 for rowIndex = 0 to rowCount-1 $> <$ for colIndex = 0 to imagesPerRow-1 $> <$ if index<=images.Count-1 then set image = images.Item(index) if index=0 then if image.CheckCreateThumbnail( thumbnailWidth ) then Context.Scope.Library.Log "Erstelle Vorschaubild " & image.Name else Context.Scope.Library.CheckAsyncStopProcessing end if end if $> <$ if index=0 then $> Bildergalerie <$ end if $> <$ if index=0 then $> <$ if Context.Scope.CurrentArticle.Values.GetValue("Bildname anzeigen") = 1 OR Context.Scope.CurrentArticle.Values.GetValue("Bilder nummerieren") = 1 OR Context.Scope.CurrentArticle.Values.GetValue("Bildbeschreibung anzeigen") = 1 then $> <$ if Context.Scope.CurrentArticle.Values.GetValue("Bilder nummerieren") = 1 then $><$=index+1$><$ end if $> <$ if Context.Scope.CurrentArticle.Values.GetValue("Bildname anzeigen") = 1 then $><$=image.Name$><$ end if $> <$ if Context.Scope.CurrentArticle.Values.GetValue("Bildbeschreibung anzeigen") = 1 then $> <$ if Context.Scope.CurrentArticle.Values.GetValue("Bildname anzeigen") = 1 then $>
<$ end if $><$=image.Description$> <$ end if $>
<$ end if $> <$ end if $> <$else$>   <$end if$> <$ index = index + 1 next $> <$next$>
#text(ArticleSeparator)]]>
<$ if Context.Scope.CurrentPage.GetInheritedAttribute("picgallery_language").Value = "de" then $> <$ elseif Context.Scope.CurrentPage.GetInheritedAttribute("picgallery_language").Value = "en" then $> <$ end if $> <$ end if hassame = true end if next $> <$ dim albumID : albumID = Context.Scope.CurrentArticle.Values.GetValue("Album") dim thumbnailWidth : thumbnailWidth = Context.Scope.CurrentArticle.Values.GetValue("Breite der Vorschaubilder") dim thumbnailHeight : thumbnailHeight = CInt((thumbnailWidth*3)/4) dim imagesPerRow : imagesPerRow = Context.Scope.CurrentArticle.Values.GetValue("Anzahl Vorschaubilder pro Zeile") dim assetCategory : set assetCategory = Context.Scope.CurrentWebProject.GetAssetCategoryByID( albumID ) dim images : set images = assetCategory.Images dim rowIndex : dim colIndex : dim index dim rowCount : rowCount = images.Count \ imagesPerRow if images.Count mod imagesPerRow > 0 then rowCount = rowCount + 1 end if Context.Scope.Library.Log images.Count & " images..." Context.Scope.Library.CheckAsyncStopProcessing ' Must use a prefix to allow multiple instances of the JavaScript on the page. dim prefix prefix = "prefix_#data(id)_" $> <$ if Context.Scope.CurrentArticle.Name <> "" then $><$=Context.Scope.CurrentArticle.Name$><$ end if $> <$ ' -- Build the thumbnails grid. index = 0 for rowIndex = 0 to rowCount-1 $> <$ for colIndex = 0 to imagesPerRow-1 $> <$ if index<=images.Count-1 then set image = images.Item(index) if index=0 then if image.CheckCreateThumbnail( thumbnailWidth ) then Context.Scope.Library.Log "Erstelle Vorschaubild " & image.Name else Context.Scope.Library.CheckAsyncStopProcessing end if end if $> <$ if index=0 then $> <$ end if $> <$ if index=0 then $> <$ if Context.Scope.CurrentArticle.Values.GetValue("Bildname anzeigen") = 1 OR Context.Scope.CurrentArticle.Values.GetValue("Bilder nummerieren") = 1 OR Context.Scope.CurrentArticle.Values.GetValue("Bildbeschreibung anzeigen") = 1 then $> <$ if Context.Scope.CurrentArticle.Values.GetValue("Bilder nummerieren") = 1 then $><$=index+1$><$ end if $> <$ if Context.Scope.CurrentArticle.Values.GetValue("Bildname anzeigen") = 1 then $><$=image.Name$><$ end if $> <$ if Context.Scope.CurrentArticle.Values.GetValue("Bildbeschreibung anzeigen") = 1 then $> <$ if Context.Scope.CurrentArticle.Values.GetValue("Bildname anzeigen") = 1 then $>
<$ end if $><$=image.Description$> <$ end if $>
<$ end if $> <$ end if $> <$else$>   <$end if$> <$ index = index + 1 next $> <$next$>
#text(ArticleSeparator)]]>
<$ if Context.Scope.CurrentPage.GetInheritedAttribute("picgallery_language").Value = "de" then $> <$ elseif Context.Scope.CurrentPage.GetInheritedAttribute("picgallery_language").Value = "en" then $> <$ end if $> <$ end if hassame = true end if next $> <$ dim albumID : albumID = Context.Scope.CurrentArticle.Values.GetValue("Album") dim thumbnailWidth : thumbnailWidth = Context.Scope.CurrentArticle.Values.GetValue("Breite der Vorschaubilder") dim imagesPerRow : imagesPerRow = Context.Scope.CurrentArticle.Values.GetValue("Anzahl Vorschaubilder pro Zeile") dim assetCategory : set assetCategory = Context.Scope.CurrentWebProject.GetAssetCategoryByID( albumID ) dim images : set images = assetCategory.Images dim rowIndex : dim colIndex : dim index dim rowCount : rowCount = images.Count \ imagesPerRow if images.Count mod imagesPerRow > 0 then rowCount = rowCount + 1 end if Context.Scope.Library.Log images.Count & " images..." Context.Scope.Library.CheckAsyncStopProcessing ' Must use a prefix to allow multiple instances of the JavaScript on the page. dim prefix prefix = "prefix_#data(id)_" $> <$ if Context.Scope.CurrentArticle.Name <> "" then $><$=Context.Scope.CurrentArticle.Name$><$ end if $> #text(ArticleSeparator)]]> ##### Speichern und schließen Sie die Datei template.xml! Starten Sie nun den Zeta-Producer und öffnen Sie Ihr Projekt. Im Bilderalbum sind nun auch die folgenden 3 Darstellungen: - Lightup - 1 Link - Lightup - 1 Vorschaubild - Slideshow 2 möglich. Zur korrekten Übernahme erstellen und veröffentlichen Sie Ihr Projekt bitte komplett neu!