Ну дарова тебе, глубоко увожаемый ALL !!! У всех наверно на компьютерах стоит такая полезная программа ACDsee... Ну вот, пора вытеснить её с рынка просмоторщиков... :-))))))) (если у тебя получится напиши мне :-) ) Напишем мы сегодня примитивную прогу для просмотра картинок под название ImageView на Delphi причём с ОДНОЙ строчкой кода!!! (правда это тока мы нпишем одну строчку, а дельфи создаст все остальные) ... Ну чего, готов? Поехали!!!

 Создавай новый проэкт, сохраняй его(проэкт) под именем ШьфпуМшуц, ой не, чего-то не то... А-а-а-а я забыл раскладку поменять ;-) !!! Под имене ImageView его сохраняй!!! Затем кидай со вкладки WIN 3.1 на форму TDriveComboBox , TFileListBox , TDirectoryListBox , затем со вкладки Additional кидай на форму компонент TImage .
Посмотри как у меня получилось:



 Ну ещё надо поменять св-ва этих компонентов след образом:

TDriveComboBox
Name:	DriveCombo
DirList:	выбери DirList(это наш компонент)
TDirectoryListBox
Name:	DirList
FileList:	выбери FileList(это тоже наш компонент)
TFileListBox
Name:	FileList
Mask:	*.bmp;*.ico;*.wmf;*.emf
TImage
Name:	Image
Proportional:	True

Ну думаю всё понятно с этими св-вами, но на всякий случай обьясню! В TDriveComboBox мы к нему привязывали TDirectoryListBox, чтобы из-за изменений в DriveCombo, менялось содержимое в DirList. В св-ве FileList, нашего компонента DirList, тоже самое! Ещё в свойстве MASK компонента TFileListBox будут отображаться тока файлы с указаными разширениями. В TImage, св-во Proportional у нас стоит True, это значит что если у нас большая картинка, и она не помещается в TImage, то тогда картинка ПРОПОРЦИОНАЛЬНО уменьшается.

А вот теперь и настала пора написать эту одну строчку кода. Выдели наш компонент FileList, перейди на вкладку Events в ObjectInspectoe`е, находи поле OnDblClick, (это когда мы двойным щелчком кликаем по компоненту) кликни по этому полю два раза и в созданной дельфи процедурой пиши следующее:

Image.Picture.LoadFromFile(FileList.Filename);

Как показавает эта строчка мы загружаем картинку в Image из файла по которому ты 2 раза шмякнул...

Ну вроде всё. Если чего не понял пиши на vostepan@mail.ru

На всякий случай исходняк(5,09 kb)