Seite 1 von 1

Datei Type zum öffnen ermitteln

Verfasst: 14.09.2005 17:59
von MASH
Wenn ich eine *.txt Datei habe dann möchte ich davon ermitteln wie der Datetype deffiniert ist. Bei mir steht unter Eigenschaften "Textdatei". Und diese möchte ich auslesen ich möchte also zum TYP den Namen haben.

TXT = Textdatei

Verfasst: 14.09.2005 19:10
von benpicco
eine normale textdatei hat sowas glaube ich nicht, solange sie *.txt heiß, heißt sie Textdatei. Bei Bitmaps aber z.b. sind die ersten beiten zeichen der Datei "BM"

Verfasst: 14.09.2005 19:28
von HeX0R
Sowas in der Art ?

Code: Alles auswählen

Procedure.s DisplayName(File$)
	SHGetFileInfo_(File$, 0, @InfosFile.SHFILEINFO, SizeOf(SHFILEINFO), #SHGFI_TYPENAME)
	Result.s = PeekS(@InfosFile\szTypeName[0])
	ProcedureReturn Result
EndProcedure

Verfasst: 14.09.2005 21:02
von MASH
Genau das habe ich gesucht :mrgreen: .