TSaveDialog

← →
tovSuhov (2003-07-16 15:58) [0]

Господа, подскажите...
В сабже , в фильтре добавляю, допустим, три типа:
тип А|*.a
тип В|*.b
тип С|*.c

Хочу добиться того, чтобы в зависимости от того, какой тип выбран, такое расширение и добавлялось к имени файла (если явно расширение не писать).
Хочу...Но пока не получается, приписывается тип с номером FilterIndex.
Как быть?

← →
Orden (2003-07-16 17:27) [1]

Можно поробовать через событие SaveDialog1TypeChange:

procedure TForm1.SaveDialog1TypeChange(Sender: TObject);
begin
Case SaveDialog1.FilterIndex of
1: SaveDialog1.DefaultExt:= "*.txt";
2: SaveDialog1.DefaultExt:= "*.html";
end;
end;

TSaveDialog Найти похожие ветки