Hola dauryakatimi2.
Básicamente con un componente
TImage.
Te pongo un ejemplo muy simple que te permite recorrer tu disco y visualizar imágenes al hacer doble click sobre el nombre del archivo.
Componentes:
.
TDirectoryListBox (Paleta Win 3.1)
.
TFileListBox (Paleta Win 3.1)
.
TImage (Paleta Additional)
Código:
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
__fastcall TForm1::TForm1(TComponent* Owner): TForm(Owner)
{
}
#include <jpeg.hpp>
void __fastcall TForm1::FormShow(TObject *Sender)
{
DirectoryListBox1->Align = alLeft;
FileListBox1->Align = alLeft;
Image1->Align = alClient;
DirectoryListBox1->Directory = "C:\\";
FileListBox1->Mask = "*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.vmf";
Image1->Stretch = TRUE;
}
void __fastcall TForm1::DirectoryListBox1Change(TObject *Sender)
{
FileListBox1->Directory = DirectoryListBox1->Directory;
}
void __fastcall TForm1::FileListBox1DblClick(TObject *Sender)
{
/* Aca se carga la imagen en el TImage */
Image1->Picture->LoadFromFile(FileListBox1->FileName);
}
Un saludo.