save as dialog uses?

[dahead]

du sollst ja auch nicht TCustomaction zu den uses hinzufügen, sondern nur die unit die TSaveDialog benötigt (was delphi wie matze gesagt hat egtl. automatisch tut).

probier doch mal folgenden code ohne die komponente auf der form:

Delphi-Quellcode:

var
  SD: TSaveDialog;
begin
  SD := TSaveDialog.Create(Self);
  with SD do
    begin
      Title := 'Datei speichern als...';
      Filter := 'Alle Dateien (*.*)|*.*';
      DefaultExt := '.txt';
      if Execute then
         ShowMessage(Filename);
    end;
   SD.Free;
end;

edit: kein roter kasten (krk)