Buscar

Upload com intraweb - delphi

Código

Coloque um IWFile da Palheta IwStandart, e um IWButton.

uses
  SwSystem;

procedure TPageUpLoad.IWButtonEnviarClick(Sender: TObject);
begin
  Inherited;
  IWFile1.SaveToFile(gsAppPath + 'Upload' + IWFile1.FileName);
end;

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Arquivos
Adicionada dia: 08/05/07
Por: Fabiano Felgas
Visualizada: 6803 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009