есть две формы: главная frmMain и дополнительная frmFile
весь код - в главной
на дополнительной форме есть TEdit (ePath) и две кнопки, в свойствах которых прописан ModalResult: mrOk и mrCancel соответственно

принимаю по сети файл, хочу вывести дополнительное окно как модальное, чтобы перед сохранением файла автоматически появлявлялась форма в которой можно указать путь (куда сохранить)

procedure TfrmMain.TcpServerAccept(Sender: TObject; ClientSocket: TCustomIpClient);
var
 data:TMemoryStream;
begin
...
if frmFile.ShowModal=mrOk then data.SaveToFile(frmFile.ePath.Text); //<- здесь ступор
...
end;

при выводе окна, оно не закрывается по кнопкам, компилятор зависает на условии

если же такое условие сделать например в событии выбора меню, то всё нормально обрабатывается

что делать?

плиз, помогите :(

Если я не ошибаюсь, обращение к VCL из события OnAccept запрещено.

> kernel ©   (21.05.10 15:33) [2]

Причем, опять же, если я не ошибась, это относится не к самому событию, а к потокам, которые в данном случае необходимо синхронизировать.

спасибо kernel
что-то сразу не додумался