Nome do Aqruivo
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.
If OpenDialog1.Execute then
edit1.text:=openDialog1.filename;
end;
neste caso retorna uma string com o diretorio onde está o arquivo.
Anonymous
Curtidas 0
Respostas
Carnette
11/02/2003
Tenta isto...
If OpenDialog1.Execute then
edit1.text:=ExtractFileName(openDialog1.filename);
end;
If OpenDialog1.Execute then
edit1.text:=ExtractFileName(openDialog1.filename);
end;
GOSTEI 0
Anonymous
11/02/2003
use a função ´extracfilename´
ExtractFileName(OpenDialog1.FileName)
se quizer somente a extenção do arquivo :
ExtractFileExt(OpenDialog1.FileName)
ok??
ExtractFileName(OpenDialog1.FileName)
se quizer somente a extenção do arquivo :
ExtractFileExt(OpenDialog1.FileName)
ok??
GOSTEI 0