savedialog e opendialog

Delphi

12/08/2004

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

Paulo

Curtidas 0

Respostas

Motta

Motta

12/08/2004

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



GOSTEI 0
POSTAR