Палитра Win 3.11

[)Игнат(]

Здравствуйте! Я начал разбиратся с палитрой Win 3.11 и пришел к такому вопросу: возможно ли по событию FileList1Change открывать выбраный файл в ТМЕМО(если это текст) или в TImage (если картинка) и в медиаплеер(если звук)?

[zetrix]

Ответ: можно.

P.S.: но я бы делал по событию OnClick.

[)Игнат(]

Сообщение от zetrix

Ответ: можно.

P.S.: но я бы делал по событию OnClick.

Ну так что вы молчите!?

[Stilet]

Ну так что вы молчите!?

А что сказать? Ты как открываешь по FileList1Change, так же и по OnClick'у его открывай.
Примерно так:

procedure TForm1.FileListBox1Click(Sender: TObject);
begin
if ExtractFileExt(FileListBox1.Items[FileListBox1.itemindex])='.txt'
 then // откроем в Мемо
if ExtractFileExt(FileListBox1.Items[FileListBox1.itemindex])='.bmp'
 then // откроем в Image
if ExtractFileExt(FileListBox1.Items[FileListBox1.itemindex])='.mp3'
 then // откроем в Плеере
end;