Как изменить имя файла при изменении типа файла в TSaveDialog

← →
Роман К (2004-04-12 22:50) [0]

Есть TSaveDialog. Можно ли так зделать, чтобы при изменении типа файла в комбобоксе "Тип файла" изменялось расширение файла в "Имя файла".

← →
Германн © (2004-04-13 01:56) [1]

Вообще-то говоря, сей комбобокс скорее предназначен для фильтрации списка файлов в выбранном каталоге. А в "Имя файла" принято (© Microsoft) принято показывать только имя, без расширения.
Но кто или что мешает воспользоваться событием OnTypeChange?

← →
Роман К (2004-04-13 02:49) [2]

> Но кто или что мешает воспользоваться событием OnTypeChange?

К сожалению это не проходит, я пробовал так:
st:=ExtractFileName(SaveDialog.FileName); st:=ChangeFileExt(st,".png"); SaveDialog.FileName:=st;

← →
Германн © (2004-04-13 03:06) [3]

А кто заставил тебя использовать ExtractFileName ?
А ну как прочитать хэлп?

function ExtractFileName(const FileName: string): string;

Description

The resulting string is the rightmost characters of FileName, starting with the first character after the colon or backslash that separates the path information from the name and extension. The resulting string is equal to FileName if FileName contains no drive and directory parts.

А уж в SaveDialog.FileName и то и другое всегда есть!

← →
Роман К (2004-04-13 12:32) [4]

В любом случае строчка: SaveDialog.FileName:=st; не срабатывает.

Я это когда-то делал. Через нахождение Child-окна и посылку туда соответствующего сообщения. Правда, тот проект не уверен, что быстро найду. Единственное полезное замечание: tOpenDialog.Handle - на самом деле не настоящий хэндл его окошка, а хэндл какого-то дочернего, так что надо искать от GetParent(OpenDialogN.Handle).

Как изменить имя файла при изменении типа файла в TSaveDialog Найти похожие ветки