|
consegir el nombre de un archivo abierto con un openpicturedialog
hola
Me hace falta conseguir el nombre de la jpg que abrí con el OpenPictureDialog.
Utilicé este codigo pero no funcionó, no sé si será por el Windows 8 o que no lo hice bien.
procedure TForm1.Button1Click(Sender: TObject);
begin
if not OpenPictureDialog1.Execute then Exit;
Label1.Caption:=OpenPictureDialog1.FileName;
Label2.Caption:=OpenPictureDialog1.Title;
Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;
Antes el OpenPictureDialog1.Title me daba el nombre del archivo pero ahora se me queda en blanco.
Gracias de antemano
Dany
|