Показать сообщение отдельно
  #7  
Старый 16.10.2010, 14:28
whizzkey whizzkey вне форума
Прохожий
 
Регистрация: 16.10.2010
Сообщения: 35
Репутация: 10
По умолчанию

всё разобрался - в модуле надо удалить все что относится к форме

Код:
interface
procedure ReadTest;
implementation

{$R *.dfm}

procedure TForm1.ReadTest;
  begin
AssignFile(FTest, FileName);
Reset(FTest);
Read(FTest,Test);
CloseFile(FTest);
end;
И теперь процедуру можно подключать куда угодно)
Ответить с цитированием