[perl-win32-gui-users] File Save with Vista

[John W. <jo...@jo...>]

I have a program that uses Win32::GUI::GetSaveFileName to open a "Save As"
dialog window.  In win98 and XP it works fine.  With Vista the "File Name"
and "Save As Type" text fields are missing and do not appear in the dialog
window.  Any ideas on how to get these to appear with Vista?  Using Vista
Home Premium version.  Here's my code that fails with Vista...

  # Set up directory and file name
  my $file = "Untitled\0" . ' ' x 256;;
  my $directory = $cnst_graphics_directory ;

  # Save as file dialog box, show files with *.txt extension, in messages
folder
  $file = GUI::GetSaveFileName
  (
    -owner     =>  $window_graphics ,
    -title     =>  'Save As' ,
    -directory =>  $directory ,
    -filter    =>  [ 'Text files' , '*.txt' , 'All files' , '*.*' ] ,
    -file      =>  $file
  ) ;

Many thanks in advance for your help.

John
jo...@jo...
801 815 9265