Pascal 7 & Objects


         

SetupWindow


-----------------------------------------------------------------

procedure SetupWindow; virtual;

Ограничивает число символов в имени файла значением fsPathName. Если Caption не равно 0, устанавливает заголовок ди- алогового блока в Caption. копирует FilePath в PathName, а расши- рение PathName - в Extension. Обновляет блоки списка для соот- ветствия текущему имени файла.



Содержание  Назад  Вперед