En principio todos los diálogos se deben usar así:
Código Delphi [-]
if OpenPictureDialog.Execute then
begin
end
else begin
picture1.picture := nil;
OpenPictureDialog.filename := EmptyStr;
end;
Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
|