Показать сообщение отдельно
  #3  
Старый 25.02.2014, 06:22
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,018
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Код:
if OpenDialog1.Execute Then
  If MatchesMask(OpenDialog1.FileName,'*.gbt') Then
     LoadDataFromTheFile(OpenDialog1.FileName);
Ответить с цитированием