Простейший пример, объявляем Crt даже не вызывая функций и процедур модуля Crt - программа не дорабатывает до конца.
Код: Выделить всё
uses crt;
function thread0(p:pointer):longint;
begin
writeln('aaa');
writeln('bbb');
end;
begin
beginthread(@thread0);
writeln('yyy');
end.Если убрать объявление модуля Crt:
Код: Выделить всё
function thread0(p:pointer):longint;
begin
writeln('aaa');
writeln('bbb');
end;
begin
beginthread(@thread0);
writeln('yyy');
end.То всё прекрасно работает...
Бьюсь над проблемой уже месяца два... Помогите разобраться
