Welcome
Guest
, you are in:
<root>
•
Anmelden
CP Wiki
Navigation
¶
CP Solutions
Startseite
domizil+
Startseite
Administration
Administration
Neue Seite
Alle Seiten
Kategorien
Navigations-Pfade
Datei Manager
Neuer Benutzer
Suche im wiki
»
Zurück
function ExtractFileExt(aFileName: string) : string
Modified on 13/02/2008 11:30
by manuel
Categorized as
Nicht kategorisiert
((([image| |http://www.cp-austria.at/website/DesktopModules/Wiki/images/Home.gif|MainPage] » [MainPage|Startseite] » [netFramePlattform|netFrame als Plattform Menü] » [GlobaleMethoden|Globale Methoden] | {searchbox} [Search.aspx?FullText=1|Erweiterte Suche]))) '''netFrame-Syntax:{BR} function''' ExtractFileExt(aFileName: string) : string{BR} {BR} '''Beschreibung:'''{BR} Die ExtractFileExt Funktion extrahiert aus dem aFileName die Dateinamen Erweiterung.{BR} Die Erweiterung wird einschliesslich des Punktes zurück gegeben (.txt, .doc usw.){BR} {BR} '''Beispiel:'''{BR} {BR} {{{{procedure sample; var fullFileName : string; begin // Set up a full file name with drive and path fullFileName := 'C:\Program Files\Borland\Delphi7\Projects\Unit1.dcu'; // Show the component parts of this full name ShowMessage('Drive = '+ExtractFileDrive (fullFileName)); ShowMessage('Dir = '+ExtractFileDir (fullFileName)); ShowMessage('Path = '+ExtractFilePath (fullFileName)); ShowMessage('Name = '+ExtractFileName (fullFileName)); ShowMessage('Ext = '+ExtractFileExt (fullFileName)); end;}}}}{BR} '''Ergebnis:'''{BR} {BR} Drive = C:{BR} Dir = C:\Program Files\Borland\Delphi7\Projects{BR} Path = C:\Program Files\Borland\Delphi7\Projects\{BR} Name = Unit1.dcu{BR} Ext = .dcu{BR}
ScrewTurn Wiki
version 3.0.1.400. Some of the icons created by
FamFamFam
.