VPF::Ошибка Canvas does not allow drawing - Форум программистов

megor

Дата 4.9.2011, 14:32 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 4.9.2011

Репутация: нет
Всего: нет

Есть простая программа которая считывает пиксели экрана и кликает по таймеру в определённое место. Используются всего 3 процедуры. В рандомное время вылетает ошибка "Canvas does not allow drawing", как её отловить понятия не имею. На форме размещены: кнопка, таймер, edit. Ничего нигде не рисуется. Как исправить ошибку? Пробовал делать Canvas.Lock и Unlock, не помогает
Вот как я считываю пиксель

Код


function DesktopColor(const X, Y: Integer): TColor;
begin
  with TCanvas.Create do
  try
    Handle := GetWindowDC(GetDesktopWindow);
    Result := GetPixel(Handle, X, Y);
  finally
    Free;
  end;
end;

А вот так кликаю

Код


procedure MouseClick(X: Integer; Y: Integer; iSleep: Integer = 100);
begin
  SetCursorPos(X, Y);
  Sleep(iSleep);
  Application.ProcessMessages;
  mouse_event(MOUSEEVENTF_LEFTDOWN, X, Y, 0, 0);
  Sleep(iSleep);
  Application.ProcessMessages;
  mouse_event(MOUSEEVENTF_LEFTUP, X, Y, 0, 0);
end;

volvo877

Дата 4.9.2011, 14:38 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2073
Регистрация: 15.11.2004

Репутация: 14
Всего: 116

Следи, чтоб утечек ресурсов не было. У тебя они есть, после GetWindowDC хендл надо освобождать через ReleaseDC, иначе

Цитата

After painting is complete, the ReleaseDC function must be called to release the device context. Not releasing the window device context has serious effects on painting requested by applications.

megor

Дата 4.9.2011, 14:55 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 4.9.2011

Репутация: нет
Всего: нет

Вы правы, действительно была утечка, ReleaseDC решил проблему. Спасибо volvo877))

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »