Libre Office Draw : assembler des fichiers images en un seul fichier PDF

[Linuxing]

Dernier message de la page précédente :

Oui, Caja range bien par nom

[tiogran]

J'ai fait un petit rajout à mon précédent post

[Linuxing]

Il me faudrait un exemple en te basant sur le PDF "incriminé". Le meilleur exemple que tu pourrais me fournir serait d'identifier clairement une image qui ne serait pas à sa place. Pour déterminer si elle n'est pas à sa place, selon moi le meilleur moyen est de relever le nom du fichier la précédent et le nom du fichier la suivant et là, on pourra mieux comprendre ce qu'il se passe.

Salut tiogran,

Voici comment le topo se présente... Je n'ai pas passé toutes les 118 pages en revue car ce serait plus long et peut-être inutile pour la solution

Mais ci-dessous quelques repérages qui pourront éventuellement aider à comprendre la tournure générale de l'anicroche :



Il semble que la logique d'ordre croissant soit chamboulée

Merci à toi et @+

[tiogran]

ah oui clairement c'est la mé-merde.... Une solution temporaire serait de rajouter un 0 par exemple pour A11 > A011. Mais dans l'absolu, c'est repousser le problème ce qui induirait d'autre différences de tri en caja et basic... Faut trouver une solution c'est certain

[mylapk]

Bonjour,

Puisque la discussion se poursuit, ne serait-ce pas utile d'enlever le résolu?

Ciao

[Linuxing]

Salut mylapk,

Oui, tu as raison, le résolu concernait le succès de l'opération dans le cadre de l'insertion manuelle, une à une, des images

Mais pour un projet de plus grande taille, ce n'est pas encore finalisé... je modifie donc

[mylapk]

[F15]

Bonsoir,

Je suis ce sujet depuis le début avec attention.
Pour le rangement des images, pour qu'un ordre chronologique soit favorisé, pourquoi ne pas nommer les fichiers en utilisant la date mais pas sous notre format mais à la façon anglaise Année-Mois-Jour
exemple : pour un fichier enregistré aujourd'hui le 25 janvier 2017, celui-ci serait appelé : A170125.

Ce qui permettrait même de pouvoir créer un fichier avec tous les documents de l'année.

Bonne continuation de réflexion,

F15

[tiogran]

Bonsoir! t'entends linuxing on a des followers!!! youhou

Merci de l'intérêt que vous portez à ce sujet, et j'avoue que cela fait du bien d'avoir quelques suggestions par ce qu'après tout ce travail, cet obstacle m'a mis un coup je dois l'avouer. Le problème n'est pas tant qu'il faille trouver une parade pour que le tri corresponde mais bien que la conception du tri par la fonction que j'utilise et caja de l'autre coté est différentes. De fait cette erreur peut se reproduire de façon fortuite. Linuxing l'a bien vu mais imagines sur plusieurs centaines de pages...
Après il faut dire que je ne suis pas gaté non plus par la fonction qui me récupère les noms des fichiers puisqu'elles me les envoient de façon totalement anarchique...

Je vais créer un post sur le forum oOO.

J'ai donc isolé la problematique sur ce code

Code : Tout sélectionner

REM  *****  BASIC  *****

Sub testbubble
	dim untableau(11) as variant
	dim x, y as integer
	untableau = array("a1","a2","a3","a3","a4","a5","a6","a7","a8","a9","a10","a11")
	For x = 0 to 11
		print untableau(x)
	Next
	untableau() = BubbleSortList(untableau())
	For y = 0 to 11
		print untableau(y)
	Next
End Sub

Function BubbleSortList(ByVal SortList(),optional sort2ndValue as Boolean)
'This function bubble sorts an array of maximum 2 dimensions.
'The default sorting order is the first dimension
'Only if sort2ndValue is True the second dimension is the relevant for the sorting order
	Dim s as Integer
	Dim t as Integer
	Dim i as Integer
	Dim k as Integer
	Dim dimensions as Integer
	Dim sortvalue as Integer
	Dim DisplayDummy
	dimensions = 2
	
On Local Error Goto No2ndDim	
	k = Ubound(SortList(),2)
	No2ndDim:
	If Err <> 0 Then dimensions = 1
	
	i = Ubound(SortList(),1)
	If ismissing(sort2ndValue) then
		sortvalue = 0
	else
		sortvalue = 1
	end if
	
	For s = 1 to i - 1
		For t = 0 to i-s
			Select Case dimensions
			Case 1
				If SortList(t) > SortList(t+1) Then                             
					DisplayDummy = SortList(t)
					SortList(t) = SortList(t+1)
					SortList(t+1) = DisplayDummy    
				End If
			Case 2
				If SortList(t,sortvalue) > SortList(t+1,sortvalue) Then 
					For k = 0 to UBound(SortList(),2)                        
							DisplayDummy = SortList(t,k)
							SortList(t,k) = SortList(t+1,k)
							SortList(t+1,k) = DisplayDummy 
					Next k
				End If
			End Select
		Next t
	Next s 
	BubbleSortList = SortList()             
End Function

A l'éxécution de la macro, une première salve permet de voir successivement les valeurs qui pourraient correspondre au tri suivant CAJA. De a1 jusqu'à a11. Puis j'envoie ce tableau dans la fonction interne "BubbleSortList" censé met classer le tableau par ordre croissant. Ce qu'elle fait mais on s'apercoit comme le souslignait linuxing que l'ordre initial s'en trouve perturbé.

[Linuxing]

Oui tiogran, nous sommes suivis... et tant mieux, après tout ce travail

A ce stade, je ne sais pas si je dois ajouter ce que tu as mis plus haut à la macro, donc je patiente

Pour un format connu et généralisé comme le PDF, on peut dira qu'il nous aura fait suer

[Linuxing]

Bonsoir,

Je suis ce sujet depuis le début avec attention.
Pour le rangement des images, pour qu'un ordre chronologique soit favorisé, pourquoi ne pas nommer les fichiers en utilisant la date mais pas sous notre format mais à la façon anglaise Année-Mois-Jour
exemple : pour un fichier enregistré aujourd'hui le 25 janvier 2017, celui-ci serait appelé : A170125.

Ce qui permettrait même de pouvoir créer un fichier avec tous les documents de l'année.

Salut F15,

Ici, je ne sais plus trop quoi et, étant donné mes 118 images, j'hésite à les renommer toutes en les datant si le coup n'est pas certain quant à la chronologie dans le PDF...