[defcon1_es]

Hola,
puedes usar la función ExtractFileName sobre la propiedad FileName del openDialog.

Código Delphi [-]
function ExtractFileName(const FileName: string): string;

Salu2.