Datei/Programmnamen anzeigen

[endeffects]

hallo,

danke ersteinmal für die hilfe,
ich hab dazu nun folgende funktion im forum gefunden:

Delphi-Quellcode:

function TIEHelperOP.ShowDllPath: String; stdcall;
var
  TheFileName : array[0..MAX_PATH] of char;
begin
  FillChar(TheFileName, sizeof(TheFileName), #0);
  GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName));
  Result := TheFileName;
end;

diese liefert den vollständigen pfad inkl der dll zurück,
da ich die funktion nicht vollständig nachvollziehn kann
würde mich interessieren ob es hier auch möglich nur den
dateinamen anzuzeigen? oder muss ich diesen über pos/copy
extrahieren?