12/08/2004

savedialog e opendialog

Como passar para o Opendialog, o Path de uma rede(InitialDir)? Isto deve ser fixo(em designtime) e não após executar o OpenDialog. Comogo não está funcionando. Não sei se é o tipó de arquivo, ou qquer outra coisa. O saveDialog serve para salvar um arquivo nima determinada pasta?


Paulo

Respostas

12/08/2004

Motta

procedure TForm1.FormCreate(Sender: TObject);
begin
  with OpenDialog1 do
  begin
    InitialDir := ´z:\pastasemnome\subpasta´;
    if Execute then
      ShowMessage(FileName);
  end;
end;



Responder Citar