259800_de-DE

liliconcom

Wie öffne ich eine Bilddatei, nachdem ich auf Picture Box geklickt habe?

Hallo zusammen,

Ich verwende Bildfelder, um 4 Bilder anzuzeigen, die aus Dateien geladen wurden. Die Größe der Bilder muss für Anzeigezwecke reduziert werden. Ich möchte jedoch eine Originalbilddatei öffnen, nachdem ich auf das im Bildfeld angezeigte Bild geklickt habe. Für Tipps wie das geht wäre ich dankbar.

Mit freundlichen Grüßen.

//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);

Betreff: Wie öffne ich eine Bilddatei, nachdem ich auf Picture Box geklickt habe?

Vielen Dank für Vorschläge und Code! Mit Öffnen eines Originalbildes meinte ich das Öffnen der Datei zB in Paint, um Bilddetails in Originalgröße zu untersuchen. Gibt es eine Möglichkeit, das zu tun? Grüße

BEARBEITEN:

Eigentlich könnte ich ein neues Fenster erstellen und dann das Bild wieder öffnen, aber in Originalgröße.

BEARBEITEN:

Ok, ich habe es geschafft, das neue Fenster zu öffnen und das Bild anzuzeigen (mit Paint oder etwas anderem ist eigentlich nicht nötig). Ich stelle Code von vince_faller mit sehr kleinen Änderungen zur Verfügung, vielleicht ist es für jemanden hilfreich. Vielen Dank noch mal.

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>

Betreff: Wie öffne ich eine Bilddatei, nachdem ich auf Picture Box geklickt habe?

Könnte eine Mausbox gebrauchen.Beachten Sie jedoch, dass Sie durch die Mausbox andere Mausfunktionen für dieses Objekt verlieren (Kontextmenüs, Diagramme auswählen usw.).

 

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>