Save dialog - update file extension in dialog on type change

[WojTec]

How can I update file name in dialog on type change?

Delphi-Quellcode:

procedure OnTypeChange(...);
// Set DefaultExt here...
// Update file name:
SaveDialog.FileName := ChangeFileExt(SaveDialog.FileName, SaveDialog.DefaultExt);

But looks to not occur when type combobox is changed.

How can do it?

[DeddyH]

Do you mean the content of the edit on the dialog form? IIRC this will not get updated automatically when the filename changes. To see if your changes are taking place you will have to display a messagebox or something like that (for testing only, of course).

[Sailor]

The following code in the OnTypeChange event handler
will do it:

WITH SaveDialog
DO BEGIN
SendMessage(GetParent(Handle),cdm_SetControlText,E dt1,
Integer(PChar(ExtractFileName(file_id))));
SetWindowText(GetParent(Handle),PChar(Title))
END

[WojTec]

Zitat von Sailor:

The following code in the OnTypeChange event handler
will do it:

WITH SaveDialog
DO BEGIN
SendMessage(GetParent(Handle),cdm_SetControlText,E dt1,
Integer(PChar(ExtractFileName(file_id))));
SetWindowText(GetParent(Handle),PChar(Title))
END

@Sailor, what is "Edt1", "file_id" and "Title"?

[DeddyH]

I just found this article, hope it helps.

[WojTec]

Thanks But it don't working on Vista-based - on XP is ok, but on newer not. Why I'm not surprised? Ah. Do you know some trick to do it working on Vista/7 too?

[DeddyH]

Taken from the MSDN:

Zitat:

[Starting with Windows Vista, the Open and Save As common dialog boxes have been superseded by the Common Item Dialog. We recommended that you use the Common Item Dialog API instead of these dialog boxes from the Common Dialog Box Library.]

This leads to this article: http://msdn.microsoft.com/en-us/library/bb776913

A quick google search brought up this piece of code, maybe it can be useful: http://www.mail-archive.com/forum@ps.../msg17009.html

[WojTec]

So, there is TSaveDialog. How to update edit inside on Vista-based Windowses?

[DeddyH]

I don' t know because I didn' t test the code. But things such as "SetFileNameLabel" sound interesting to me.

[Sailor]

Edt1 is defined in Dlgs, it means the corresponding edit box.
Title is a property of (Save) dialogs and file_id is the file name
you care about. It works fine under Vista too, under Windows7 I
don't know.