
	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ó? |

TEdit komponens tartalma másolásának megakadályozása

Példaprogram letöltése

4349 bájt

E példában egy olyan TEdit komponenst készítünk, amelynek szövegét nem lehet se kimásolni, se kivágni vágólapra, sőt onnan beilleszteni sem lehet új szöveget.

A mellékelt példaprogram megnyitása előtt a PreventClipEdit.pas-ban lévő komponenst telepítenie kell a Delphi alá. Ehhez válassza a Component - Install Component menüpontot.

Ennek megvalósítására egy igen egyszerű trükköt fogunk felhasználni. Létrehozunk három esemény kezelőt a másolás, kivágás illetve a beillesztés kezelésére.

    procedure WMCut(var Message: TMessage); message WM_CUT;
    procedure WMCopy(var Message: TMessage); message WM_COPY;
    procedure WMPaste(var Message: TMessage); message WM_PASTE;

Minden esemény kezelő eljárásban meghívjuk az Exit eljárást, mellyel megszakítjuk az adott esemény feldolgozási folyamatát. Így ezzel elérjük azt, hogy az Edit komponens szövegét nem lehet kimásolni vagy kivágni, illetve új szöveget beilleszteni sem.

procedure TPreventClipEdit.WMCopy(var Message: TMessage);
begin
  Exit;
end;

Cikksorozat

#ID	Kategória	Cikk címe	Sorozat
1488	Delphi	MS SQL tárolt eljárások	1. rész
1499	Delphi	MS SQL tárolt eljárások	2. rész
1507	Delphi	MS SQL tárolt eljárások	3. rész
1519	Delphi	MS SQL tárolt eljárások	4. rész
1526	Delphi	MS SQL tárolt eljárások	5. rész
1537	Delphi	MS SQL tárolt eljárások	6. rész
1546	Delphi	MS SQL tárolt eljárások	7. rész
1553	Delphi	MS SQL tárolt eljárások	8. rész
1564	Delphi	MS SQL tárolt eljárások	9. rész
1573	Delphi	MS SQL tárolt eljárások	10. rész
1582	Delphi	MS SQL tárolt eljárások	11. rész
1591	Delphi	MS SQL tárolt eljárások	12. rész
1600	Delphi	MS SQL tárolt eljárások	13. rész
1609	Delphi	MS SQL tárolt eljárások	14. rész
1617	Delphi	MS SQL tárolt eljárások	15. rész
1626	Delphi	MS SQL tárolt eljárások	16. rész

Könyv

Ez a cikk megtalálható ebben a könyvben: Delphi Software Offline 2002 évkönyv 523. 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!