А как создать процесс?

← →
MisterBin © (2002-05-09 18:37) [0]

У меня программа блокирует курсор функцией Sleep(), но при этом и сама не отвечает. Можно ли как то это избежать, чтобы блокировался только курсор. Если можно пример

← →
ZZ © (2002-05-09 19:09) [1]

С какох пор Sleep используется для блокировки курсора?

попробуй использовать ClipCursor

← →
Mystic © (2002-05-09 19:11) [2]

Путей собственно два

1) Создать собственный поток File -> New -> Thread (или почитать об объекте TThread)

2) Разбить большое ожидание на ряд мелких, вызывая время от времени ProcessMessages:

const SleepTime = 20;

Duration := 0;
repeat
Sleep(SleepTime);
ProcessMessages;
Duration := Duration + SleepTime;
until Duration > 1000;

← →
Manulo © (2002-05-10 15:13) [3]

> С какох пор Sleep используется для блокировки курсора?
>
> попробуй использовать ClipCursor

ZZ Полностью согласен.... Кроме того есть немеряно других путей заблокировать курсор

← →
MisterBin © (2002-05-10 15:29) [4]

А какие? Можно пример?

procedure TForm1.FormCreate(Sender: TObject); begin ShowCursor(False); end;

For I := 1 to Maxint do For j := 1 to Maxint

А как создать процесс? Найти похожие ветки