[roman]

Pues algo como:

Código Delphi [-]
if OpenDialog.Execute then
begin
  AbrirArchivo(OpenDialog.FileName);
end;

// Saludos