Nome do Aqruivo

11/02/2003

1

O problema é o seguinte. Eu não consigo obter somente o nome do qruivo qaundo lido de um opendialog

If OpenDialog1.Execute then
edit1.text:=openDialog1.filename;
end;

neste caso retorna uma string com o diretorio onde está o arquivo.


Responder

Posts

11/02/2003

Carnette

Tenta isto...


If OpenDialog1.Execute then
edit1.text:=ExtractFileName(openDialog1.filename);
end;


Responder

11/02/2003

Anonymous

use a função ´extracfilename´


ExtractFileName(OpenDialog1.FileName)



se quizer somente a extenção do arquivo :

ExtractFileExt(OpenDialog1.FileName)

ok??


Responder