Comment afficher une image en taille réelle, et spécifier une taille maximale dans le cas où elle dépasserait cette limite ?
![]()
Comment afficher une image en taille réelle, et spécifier une taille maximale dans le cas où elle dépasserait cette limite ?
![]()
L'urgent est fait, l'impossible est en cours, pour les miracles prévoir un délai. :bug: ___ "http://club.developpez.com/regles/#LIII-A"Écrivez dans un français correct !!
C++Builder 5 - Delphi 6#2 Entreprise - Delphi 2007 Entreprise - Delphi 2010 Architecte - Delphi XE Entreprise - Delphi XE7 Entreprise - Delphi 10 Entreprise - Delphi 10.4.2 Entreprise - Delphi 11.3 Entreprise - Visual studio 2022
OpenGL 2.1 - Oracle 10g - Paradox - Interbase (XE) - PostgreSQL (15.7)
HTML :
EN FIN DE PAGE (avant le </body>)
Code : Sélectionner tout - Visualiser dans une fenêtre à part <img h="200" w="100" name="MaxImage" src="" />
Pas testé mais normalement ok
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 var MImages=document.getElementsByName("MaxImage") for (var i = 0; i < MImages.length; i++) { if (MImages[i].offsetHeight > parseInt(MImages[i].getAttribute("h"))) { MImages[i].style.height = MImages[i].getAttribute("h"); } }
A completer.
Si tu adapte le code, redonne le, comme ca, je le garde sur mon disque dur pour si jamais...
Si en adaptant, tu rencontres des problèmes, n'hésite pas !
Ca marche bien.
Sinon, j'ai trouvé "l'équivalent" en PHP (mais en beaucoup plus long):
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32 function RedimImage($FichierImage, $DestWidth, $DestHeight) { //.Lit les dimensions de l'image. $Taille = GetImageSize($FichierImage); $SourceWidth = $Taille[0]; $SourceHeight = $Taille[1]; //.Si image plus petite que la zone. if(($SourceWidth < $DestWidth) && ($SourceHeight < $DestHeight)) { $DestWidth = $SourceWidth; $DestHeight = $SourceHeight; } else { //.Teste les dimensions tenant dans la zone. $TestHeight = round(($DestWidth / $SourceWidth) * $SourceHeight); $TestWidth = round(($DestHeight / $SourceHeight) * $SourceWidth); //.Si Height final non précisé (0). if(! $DestHeight) $DestHeight = $TestHeight; elseif(! $DestWidth) // Sinon si Width final non précisé (0). $DestWidth = $TestWidth; elseif($TestHeight > $DestHeight) //.Sinon teste quel redimensionnement tient dans la zone. $DestWidth = $TestWidth; else $DestHeight = $TestHeight; } //.Affiche les dimensions optimales. return "width=" . $DestWidth . " height=" . $DestHeight; }![]()
L'urgent est fait, l'impossible est en cours, pour les miracles prévoir un délai. :bug: ___ "http://club.developpez.com/regles/#LIII-A"Écrivez dans un français correct !!
C++Builder 5 - Delphi 6#2 Entreprise - Delphi 2007 Entreprise - Delphi 2010 Architecte - Delphi XE Entreprise - Delphi XE7 Entreprise - Delphi 10 Entreprise - Delphi 10.4.2 Entreprise - Delphi 11.3 Entreprise - Visual studio 2022
OpenGL 2.1 - Oracle 10g - Paradox - Interbase (XE) - PostgreSQL (15.7)
Partager