• Üyelik paylaşımı yasaktır! Hesabınızı başkalarına vermeyin! Hesap paylaşımları yasaklama ile sonuçlanacaktır.

Delphi-Cursor'u Gizlemek

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

ByClxon

Süper Üye
Katılım
7 Ocak 2016
Mesajlar
955
Beğeni Puanı
4
Yaş
22
PHP:
procedure rShowCursor(bShow: BOOL);
var
r: trect;
begin
if not bShow then begin // Hide
r.Top := 0;
r.Left := GetSystemMetrics(SM_CXSCREEN)
+ GetSystemMetrics(SM_CXCURSOR);
r.Right := r.Left;
r.Bottom := 0;
ClipCursor(@r);
SetCursorPos(0,0);
end else begin // Restore
ClipCursor(nil);
SetCursorPos(GetSystemMetrics(SM_CXSCREEN) div 2,
GetSystemMetrics(SM_CYSCREEN) div 2);
end;
end;
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...


Üst Alt