
	Kezdőlap Cikkek Tallózó Cikksorozatok Összes cikk Fórum Fórum kezdőlap Archívum Hírlevél Letöltés Állás, munka Webszolgáltatás Megtekintés Aktuális TV műsor TV csatornák listája Könyvek Software Offline évkönyvek Delphi 1999 Delphi 2000 Delphi 2001 Delphi 2002 Delphi 2003 Visual Studio.NET C# 2001 Visual Studio.NET C# 2002 Visual Studio.NET C# 2003 Windows 2001 Windows 2002 Windows 2003 Havilapok Keresés Oldaltérkép Impresszum

Bejelentkezés

E-mail:
Jelszó:

| Regisztráció | Jelszó? |

Egyedi naptár készítése

Példaprogram letöltése

6492 bájt

Ebben a cikkben egy olyan programot készítünk, ami az aktuális hónapot jeleníti meg a képernyőn. A megjelenítéshez felhasználja a beállított Windows háttérképet. Az ablak tetszőleges helyre mozgatható, az utolsó pozíciót megjegyzi, és a legközelebbi indításkor ugyanott jelenik meg.

A naptár kirajzolása a WMPaint eljárásban történik, ami a WM_PAINT esemény bekövetkezésekor fut le, vagyis minden esetben, amikor szükséges az ablak területének frissítése. A kép előállításához létrehozunk egy TBitmap típusú objektumot (bmp). Erre azért van szükség, mert a képet pixelenként fogjuk manipulálni, és ez a Canvas Pixels tömbjén keresztül nagyon lassú lenne.

A PaintDesktop függvénnyel átmásoljuk a Windows háttérkép azon részét a Canvas-ra, amely pont az ablak alatt található. Ez a függvény csak a képet másolja, az ikonokat nem!

  
  PaintDesktop(Canvas.Handle);

Miután megtörtént a háttérkép másolása a Canvas-ra, a Canvas-t átmásoljuk a bmp képre, és ott folytatjuk tovább a rajzolást.

A Form mozgathatóságáról is gondoskodnunk kell, mivel az nem rendelkezik fejléccel. A mozgatáshoz a Form területén történt egér gomb lenyomásakor intézkedünk.

procedure TForm1.WMLButtonDown;
begin
  inherited;
  if Msg.wParam=MK_LBUTTON then begin
    ReleaseCapture;
    Perform(WM_SYSCOMMAND, SC_MOVE+2, 0);
  end;
end;

Cikksorozat

#ID	Kategória	Cikk címe	Sorozat
3333	Windows	Net Shell parancsok	1. rész
3367	Windows	Net Shell parancsok	2. rész
3396	Windows	Net Shell parancsok	3. rész

Könyv

Ez a cikk megtalálható ebben a könyvben: Delphi Software Offline 2001 évkönyv 318. oldal

Felhasználási feltételek

A Software Online szoftverfejlesztői magazin mindegyik cikke, minden megjelent képe, és egyéb publikált anyaga szerzői jog védelme alatt áll! Bármilyen formában történő másodlagos terjesztésük, közzétételük vagy felhasználásuk kizárólag a kiadó előzetes írásbeli engedélyével történhet!