Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**marabu**

Für dich:

Delphi-Quellcode:

			function ExtractFileIdent(fn: TFileName): String;

begin

  Result := ChangeFileExt(ExtractFileName(fn), '');

end;

marabu

marabu Registriert seit: 6. Apr 2005 10.109 Beiträge	#4 Re: Dateityp assoziieren und starten 7. Feb 2006, 19:51 Für dich: markieren Delphi-Quellcode: function ExtractFileIdent(fn: TFileName): String; begin Result := ChangeFileExt(ExtractFileName(fn), ''); end; marabu
	Zitat