SaveDialog.Execute not doing anything in Windows 7

Question

Delphi 2007 on windows 7 just does nothing on the saveDialog.Execute call. I have seen another person mention this a few weeks back but it was with Borland c++.

Answer 1

I got the same problem (savedialog not working) in windows XP.

After lots of unsuccessful attempts according to the voluminous exchanges in the embarcadero group you mention (https://forums.embarcadero.com/thread.jspa?messageID=196950&tstart=0#196950).

I found what the reason was : the initial file dir and filename of the Savedialog12 were bad, contradicting each other, the filename containing the fullpath of the last file I had opened (I had thought it was smart to prepare the saving of the file I had opened last; unfortunately what I had put in the initialdir was equal to what I had put in the filename !)

The problem was already solved by clearing both fields of the save dialog.

Further, my initial goal to prepare the saving was reached by putting valid values in the involved fields :

SaveDialog1.FileName:=ExtractFileName(Opendialog1.Filename);
SaveDialog1.InitialFileDir:=ExtractFilePath(Opendialog1.Filename);

Answer 2

See the thread "TOpenDialog.Execute not working " on embarcadero newsgroups.

Problem there was resolved by deleting the executable name from "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options"