ImageSelectionBox.st
changeset 72 f17df5ea35ed
parent 64 10910b8b003a
child 86 4d7dbb5f1719
--- a/ImageSelectionBox.st	Wed Aug 30 20:06:56 1995 +0200
+++ b/ImageSelectionBox.st	Thu Sep 07 14:48:20 1995 +0200
@@ -76,9 +76,11 @@
 	    self topView withWaitCursorDo:[
 		image := Image fromFile:fileNameString.
 		image notNil ifTrue:[
-		    info label:'Size: ' ,
-			       (image width printString , ' x ' , image height printString),
-			       ' Depth: ' , image depth printString.
+		    info label:(resources string:'Size: %1 x %2' 
+					  with:image width printString
+					  with:image height printString),
+			       (resources string:' Depth: %1' 
+					    with:image depth printString).
 
 		    (image width <= 64 and:[image height <= 64]) ifFalse:[
 			image := image magnifiedPreservingRatioTo:64@64.
@@ -122,7 +124,7 @@
 
     super initialize.
 
-    label := 'Image dialog'.
+    label := (resources string:'Image dialog').
     labelField label:(resources string:'select an image file:').
 
     prefY := buttonPanel preferredExtent y.