15. december 2002 - 15:02Der er
4 kommentarer og 1 løsning
Mappe navn.
Hvordan får jeg et program til at finde mappe navnet istedet for hele stien med "ExtractFilePath()". Jeg skal nemlige bruge det sammen med en søgefunktion hvor den når den finder den søgte fil i en mappe skriver, skal den skrive mappen og ikke hele stien i en Tcombobox
Jeg har prøvet med:
List.Add(extractfilename(Res.Name));
men som sagt så finder den stien i stedet for mappe navnet.
function PathName(Filename:String):String; var s,path,temp:string; i:integer; begin path:=extractfilepath(Filename); Delete(path,length(path),1); for i := length(path) downto 0 do begin if path[i] = '\' then begin Result:=S; exit; end; temp:=s; s:=path[i]+temp; end; end;
procedure TForm1.Button1Click(Sender: TObject); begin Label1.Caption:=PathName(ParamStr(0)); end;
Min "sendt mappe" har ændret navn. Hvordan ændrer jeg navnet igen?
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.