924752_it-IT

liliconcom

Zoom sull'immagine della casella immagine

Si apre una finestra con un'immagine. Vorrei che gli utenti potessero ingrandire l'immagine per vederne maggiori dettagli, ma non vedo alcuna funzionalità di zoom nella finestra. Come posso fare?

dt = Current Data Table();<BR />// Plot bitmap
bitmap = New Window( (dt << Get Name()) || " Bit Map",
	pic_file = Open( file_path, png);
	pic_file << Set Size( {500, 500} );
	pb = Picture Box( pic_file );
);

Automazione e scriptingRe: Zoom sull'immagine della Picture Box

Offrire immagini tramite Graph Box è un'opzione che consentirebbe agli utenti di utilizzare lo strumento Lente di ingrandimento dalla barra degli strumenti.

Modifica: ho dimenticato di aggiungere lo script di esempio

Names Default To Here(1);

imgBox = Graph Box(frameSize(500, 500), SuppressAxes);
win = New Window("Image", imgBox);

img = Open("$SAMPLE_IMAGES/tile.jpg", "jpg");
img << Set Size({500,500});

fb = win[framebox(1)];
fb << AddImage(Image(img));
img_seg = fb<< FindSeg(PictSeg(1));

img_seg << Fill Graph;
img_seg << lock(1);

Write();

Re: Zoom sull'immagine della casella immagine

wow, una soluzione alternativa davvero creativa/utile!!!

Re: Zoom sull'immagine della Picture Box

Dopo aver definito Zoom immagine , è possibile utilizzarlo ovunque sia necessario:

PictureBoxZoom = Function( {filename},
	window:img = Open( filename, "jpg" );
	Graph Box(
		frameSize( 300, 300 ),
		SuppressAxes,
		<
     <ADDIMAGE></ADDIMAGE>