Comment ouvrir un fichier image après avoir cliqué sur Picture Box ?Bonjour tout le monde,
J'utilise des zones d'image pour afficher 4 images chargées à partir de fichiers. La taille des images doit être réduite à des fins d'affichage. Cependant, je voudrais ouvrir un fichier image original après avoir cliqué sur l'image affichée dans la zone d'image. J'apprécierais des conseils sur la façon de le faire.
Cordialement.
//initially no images
img1 = empty();
img2 = empty();
img3 = empty();
img4 = empty();
New Window("Images",
H List Box(
Panel Box("El 1", //place for EL images
EL1 = Picture Box(img1),
),
Panel Box("El 2",
EL2 = Picture Box(img2),
),
Panel Box("El 3",
EL3 = Picture Box(img3),
),
Panel Box("El 4",
EL4 = Picture Box(img4),
),
);
//here images will be opened
//img1 = open("D:\image.tif", tif);
//img1 << set size({image_w_new, image_h_new});
//EL1 << set image (img1);Re : Comment ouvrir un fichier image après avoir cliqué sur Picture Box ?Merci pour les suggestions et le code ! Par ouverture d'une image originale, je voulais dire ouvrir le fichier, par exemple dans Paint, afin d'examiner les détails de l'image dans sa taille d'origine. Y a-t-il moyen de faire ça ? Salutations
MODIFIER:
En fait, je pourrais créer une nouvelle fenêtre, puis ouvrir à nouveau l'image, mais dans sa taille d'origine.
MODIFIER:
Ok, j'ai réussi à ouvrir la nouvelle fenêtre et à afficher l'image (utiliser Paint ou quelque chose d'autre n'est en fait pas nécessaire). Je fournis le code de vince_faller avec de très petites modifications, peut-être que cela sera utile à quelqu'un. Merci une fois de plus.
Names default to here(1);
//initially no images
img1 = empty();
img2 = empty();
img3 = empty();
img4 = empty();
New Window("Example",
V List Box(
H List Box(
mb = MouseBox(
Panel Box("El 1", //place for EL images
EL1 = Picture Box(img1),
),
<<SETTRACKENABLE></SETTRACKENABLE>Re : Comment ouvrir un fichier image après avoir cliqué sur Picture Box ?Pourrait utiliser une mousebox.Mais comprenez que la mousebox vous fera perdre d'autres fonctionnalités de la souris pour cet objet (menus contextuels, sélection de graphiques, etc.)
Names default to here(1);
//initially no images
img1 = empty();
img2 = empty();
img3 = empty();
img4 = empty();
New Window("Images",
H List Box(
mb = MouseBox(
Panel Box("El 1", //place for EL images
EL1 = Picture Box(img1),
),
<<SETTRACKENABLE></SETTRACKENABLE>