Скачать: CL | DM;

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

← →
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]

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

---

← →
Olgerd ©   (2002-05-10 17:14) [5]

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

---

← →
Anatoly Podgoretsky ©   (2002-05-10 17:51) [6]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.978 c