Хабр Курсы для всех
РЕКЛАМА
Большая витрина: от крупнейших школ до частных авторов. Сравнивайте по цене, длительности, формату и выбирайте самый подходящий курс!
procedure _Write(const Value: AnsiString); overload;
var
s: AnsiString;
begin
Writeln(Value); exit;
{
SetLength(s, Length(Value));
AnsiToOem(@Value[1], @s[1]);
Writeln(s);
}
end;
Отключение главной нити приложения от отладчика и уход от перехвата CreateFile()