Fazer uma upload com o Delphi Intraweb
Estou utilizando o componente iwfile para carregar um determinado arquivo, logo em segui do carregamento do arquivo pelo componente exite um botão com o evento para realizar o upload desse arquivo no servidor conforme abaixo:
procedure TIWForm1.IWButtonImportaAsyncClick(Sender: TObject;
EventParams: TStringList);
begin
IWFile1.SaveTofile('C:\\'+IwFile1.Filename) ;
end;
Conforme o código sempre a propriedade FILENEMA do IWFILE esta vindo vazio, o que posso fazer para resolver o problema?
procedure TIWForm1.IWButtonImportaAsyncClick(Sender: TObject;
EventParams: TStringList);
begin
IWFile1.SaveTofile('C:\\'+IwFile1.Filename) ;
end;
Conforme o código sempre a propriedade FILENEMA do IWFILE esta vindo vazio, o que posso fazer para resolver o problema?
Pg Me
Curtidas 0
Respostas
Pg Me
20/10/2016
(Corrigindo a pergunta )
Estou utilizando o componente iwfile para carregar um determinado arquivo, logo em segui do carregamento do arquivo pelo componente exite um botão com o evento para realizar o upload desse arquivo no servidor conforme abaixo:
procedure TIWForm1.IWButtonImportaAsyncClick(Sender: TObject;
EventParams: TStringList);
begin
IWFile1.SaveTofile('C:\\'+IwFile1.Filename) ;
end;
Conforme o código sempre a propriedade FILENEMA do IWFILE esta vindo vazio, o que posso fazer para resolver o problema?
procedure TIWForm1.IWButtonImportaAsyncClick(Sender: TObject;
EventParams: TStringList);
begin
IWFile1.SaveTofile('C:\\'+IwFile1.Filename) ;
end;
Conforme o código sempre a propriedade FILENEMA do IWFILE esta vindo vazio, o que posso fazer para resolver o problema?
GOSTEI 0