Macrosubstituição do nome do arquivo

17/02/2003

0

:?: Tenho um Form de cadastro de clientes, que além dos dados básicos gravo também uma fotografia e um pequeno vídeo do cliente.
A cada vídeo que gravo de cada cliente é sempre criado um arquivo de nome VIDEO.AVI.
Preciso gravar cada arquivo de vídeo com a combinação:

Exemplo:
VD + Cód.Cliente + .AVI >>> ‘VD’ + 00035 + ‘.AVI’

Para determinar o nome que o arquivo tem que ter estou fazendo:
M_Video := DtmDados.Clientes.FieldValues[´Cli_Cod´]; // pego o código do cliente
M_Video := ´VD´ + M_Video + ´.AVI´; // monto a string com o nome do arquivo

Mas e agora, como continuar. Tenho que trocar o nome do arquivo Vídeo.Avi para o conteúdo de M_Video, como se faz.

Obrigado
Neto


Anonymous

Anonymous

Responder

Posts

18/02/2003

Carnette

Use a função
RENAMEFILE(nomeantigo,novonome);

if RENAMEFILE(nomeantigo,novonome) then
ShowMessage(´Arquivo renomeado com sucesso´)
else
ShowMessage(´Ocorreu algum problema´);


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar