TOpenDialog: nur TXTs öffnen können

[Neutral General]

Delphi-Quellcode:

if ExtractfileExt(Opendialog1.Filename) = '.txt' then
machwasduwillst
else
ShowMessage('Es können nur Textdateien geöffnet werden !');