HyperLink
Bejelentkezés
E-mail: 
Jelszó: 





Skip Navigation Links
 

Internet Explorer History listáját kezelő komponens


Példaprogram letöltése

5387 bájt

Az Internet Explorer cím mezője tulajdonképpen egy legördíthető lista, amelyben az utoljára megnyitott weboldalak címei láthatók. Ebben a példában egy olyan komponenst készítünk, amely képes ezt a listát lekérdezni, sőt még módosítani, vagy törölni is. A listát akár használhatjuk arra is, hogy kielemezzük, vagy ellenőrizzük, akár törölhetjük is az illetéktelenek elől.

A mellékelt példaprogram megnyitása előtt a IEHistory.pas-ban lévő komponenst telepítenie kell a Delphi alá. Ehhez válassza a Component - Install Component menüpontot.
Az új komponenst a TComponent osztályból származtatjuk. Ebben két property-t hozunk létre. A TypedURLs property TStringList típusú, ebbe olvassuk be a címeket. A másik property a Count, amely azt mondja meg, hogy hány cím található a listában. Ez tulajdonképpen a TypedURLs Count property-jének értékét adja vissza, a property értéke közvetlenül nem módosítható.
A címek listája a Registry-ben található az alábbi kulcs alatt:
HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\TypedURLs
Ez alatt a kulcs alatt urlX nevű sztring típusú értékek vannak. A névben az X egy sorszámot jelöl.
A komponens Refresh metódusában megnyitjuk ezt a Registry kulcsot, és egy átmeneti TStringList típusú objektumba beolvassuk a kulcs alatt található értékek neveit a GetValueNames eljárással. Ezután egy ciklusban végigmegyünk ezen a listán, és egyenként kiolvassuk az adott névhez tartozó címet, amit beírunk az FTypedURLs objektumba.
A listát vissza is írhatjuk a Registry adatbázisba az Update eljárással. Ebben az eljárásban töröljük a fenti Registry kulcsot, majd újra létrehozzuk. Ezután egy ciklusban végigmegyünk a TypedURLs property-ben tárolt listán, és egyenként kiírjuk az elemeit a Registry-be. Mindegyik értéknek egyedi nevet kell választanunk, ami „urlX” lesz, ahol X a cím sorszáma.
A törléshez a Clear eljárást használhatjuk. Ez egy elég egyszerű eljárás, mert csupán annyit tesz, hogy törli a TypedURLs property-ben tárolt listát, majd meghívja az Update eljárást.

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

Copyright © 1999-2012 Animare Software Kft. Minden jog fenntartva!
| Készült: Animare Stúdió | Adatvédelem | Kapcsolat |