unit1.lfm

object Form1: TForm1
  Left = 562
  Height = 134
  Top = 208
  Width = 169
  Caption = 'Visio VBA Save As'
  OnCreate = FormCreate
  LCLVersion = '2.2.0.4'
  Visible = True
  object SaveDialog1: TSaveDialog
    Left = 52
    Top = 41
  end
end