Насколько я знаю, вы не можете изменить размер окна предварительного просмотра (извиняюсь за неудобства).
Примечание
Ваш код не будет компилироваться. Я предполагаю, что вы хотите, чтобы screenFolder
был автоматически открыт. Если это так, используйте свойство default location
, которое автоматически перейдет к нужной папке. Ваш новый код должен выглядеть примерно так ...
set theFile to (choose file with prompt "Select an image to read:" default location screenFolder of type {"JPG"})