Тема: KolibriOS on Windows (KoW)
Думается, для упрощения отладки нужно иметь реализацию базовых функций KolibriOS под Windows. Так можно будет ходить пошагово и смотреть, где баг. Для начала достаточно всего нескольких функций, используемых нашими программами:
procedure DrawWindow(Left, Top, Width, Height: LongInt; Caption: PKolibriChar; BackColor, Style, CapStyle: LongWord);
procedure DrawText(X, Y: LongInt; Text: PKolibriChar; ForeColor, BackColor, Flags, Count: LongWord);
procedure DrawButton(Left, Top, Width, Height: LongInt; BackColor, Style, ID: LongWord);
procedure DrawRectangle(X, Y: LongInt; Width, Height: LongWord; Color: LongWord);
procedure SetPixel(X, Y: LongInt; Color: LongWord);
function GetKey: TKeyboardInput;
function GetButton: TButtonInput;
function WaitEvent: LongWord;
function WaitEventByTime(Time: LongWord): LongWord;
function GetScreenSize: TSize;
function GetThreadInfo(Slot: LongWord; var Buffer: TThreadInfo): LongWord;
Если сделать базовую обвязку, остальные функции можно добавлять по мере надобности. Файловые функции добавлю я сам. Они сейчас в процессе переосмысления для внедрения Unicode и реализации строк.
Добавлено 2021-01-08 в 19:59
Выложил концепт на GitHub, пока в отдельной ветке.