XProfan

Español

Registry.pcu y Registry.inc, Copyright by Thomas Schulz (aka ts-soft)
Veröffentlicht bajo Lizenz el LGPL: [...]

Um el doch muy eingeschränkte Funktionalität de XProfan a Bearbeitung el Registry a erweitern,
Yo esta Unit/Incluir geschrieben.

Anforderungen:
de Win95, NT4 con installiertem IE4 oder höher
Nur con XProfan 10 getestet

Parámetro y Bedeutungen:
- KeyName$ = Der gesamte Key, inclusive Klasse, Profano kürzel voluntad unterstützt!
Ejemplo: HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersion
oder: HKEY_2SOFTWAREMicrosoftWindowsCurrentVersion

- ValueName$ = Eintrag (S3 en el Profano-Ayuda)

- Value$ oder Value& = Valor (S4 en el Profano-Ayuda)

- Index& = 0 - ?, para Enumerationen (ListSubKey, ListSubValue)

- Type& = Der Typ des Eintrags (SetString)
1 = REG_SZ (default)
2 = REG_EXPAND_SZ
3 = REG_BINARY
4 = REG_DWORD (para Largo mejor SetLong uso!)
7 = REG_MULTI_SZ

Como lo en dieser Unit/Incluir una Klasse es, es como erstes siempre una Objeto a erzeugen!

z.B:
Kompilieren Marca Separación

!$$U Registry.pcu
Declare Reg#
Reg# = New(Registry)re>

oder:
Kompilieren Marca Separación

!$$U Registry.pcu
Declare Reg#
Dim Reg#, Registry
Reg#.Init()  wicht

pre>

Am ende otra vez con Disponer liberación!

Folgende ObjectVariable es disponible:
.Error& (z.B. Reg#.Error&) <> 0 bedeutet Fehler

Folgende öffentliche Métodos hay:

Fehler$ = .GetErrMsg()
Ergebnis& = .DeleteKey(KeyName$)
Ergebnis& = .DeleteEmptyKey(KeyName$)
Ergebnis& = .DeleteValue(KeyName$, ValueName$)
Type& = .GetValueType(KeyName$, ValueName$)
Ergebnis$ = .ListSubKey(KeyName$, Index&)
Ergebnis$ = .ListSubValue(KeyName$, Index&)
Ergebnis& = .GetLong(KeyName$, ValueName$)
Ergebnis$ = .GetString(KeyName$, ValueName$) Funktioniert con allen Registrytypen!
Ergebnis& = .SetLong(KeyName$, ValueName$, Value&) no existente Keys voluntad autom. erstellt!
Ergebnis& = .SetString(KeyName$, ValueName$, Value$[, Type&]) Type& es Optional, default = REG_SZ!

Beispiele a allen Métodos son esta!

Feedback willkommen!

Registry.zip	13 kB

Kurzbeschreibung:	Versión 1.3

Hochgeladen:	06.12.2006

Ladeanzahl:
		Descargar

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

- Página 1 -

Proc ?_Registry.Registry
Proc ?_Registry.Registry

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Jac
de
Lad

Verdammt. Yo mi korrigiert debería lo doch
Kompilieren Marca Separación

Proc ?_Registry.?_Registryre>

heißen, oder?!

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Müsste entonces en el Klassendefinition no auch class ?_blub=+?_blub@ posición?

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

RGH

[quote:ecb7539923=iF]Müsste entonces en el Klassendefinition no auch class ?_blub = +?_blub@ posición?

[/quote:ecb7539923]
Exactamente!

Saludo
Roland

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

- Página 2 -

Würde lo una Sinn hacer, el Métodos auch una Namespace a geben? Yo denke veces, como el Métodos sowieso sólo en Klasse erreichbar son (debería), debería el Namensraum el Klasse alles abdecken. Oder Irre Yo ahora

PS: Der Constructor ha sólo Dummy-Function

, el Syntax con New es schöner

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Hm sí Yo glaub Usted irrst porque lo va por lo tanto el el Konstruktor no como solcher erkannt se si él no auch el NameSpaceSign trägt.

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Yo sería veces sagen Festplattenplatz haben todos genug - en el Bezug en XProfan wäre como Geschwindigkeit angebrachter.

Geschwindigkeitsoptimierung, cómo ellos para una Registry-Editor oder ähnlich braucht, es así en uno Unit no posible. In uno Unit kann Yo no en el voraus Wissen, qué como nächstes kommt, así el el Key cada Vorgang geöffnet y otra vez geschlossen se, qué natürlich en direkter API-Nutzung beschleunigt voluntad podría. Yo denke veces el redactar de Registry-Editoren es una Ausnahmefall, así el el Geschwindigkeit vollkommen ausreichend es. Am Code selber es ansonsten IMHO nichts a optimieren.

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Was es con Call en lugar de external? Yo mi sólo ums a übertreiben...

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

[quote:eed748como24=iF]Was es con Call en lugar de external? Yo mi sólo ums a übertreiben...

[/quote:eed748como24]
Der Gedanke me está auch ya gekommen, aber el Advapi32.dll es sí ya statisch a Runtime gebunden, así el el schnelleren Delphi-Aufrufe a Geltung kommen y lo auch kein Sicherheitsleck son. Como tener ihr sowieso qué verkehrt verstanden, denke Yo. Lediglich el shlwapi.dll es no statisch en el Runtime gebunden, aber el se sólo para 2 Métodos gebraucht (DeleteKey, DelteteEmptyKey), el debería also nichts bringen.

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

[quote:f01e8c7b50]así el el schnelleren Delphi-Aufrufe a Geltung kommen [/quote:f01e8c7b50]
Wird ahora offtopic, pero yo denke el el no así es. Yo verweise sí hier xpse

en una BeispieCode a el cada nachprüfen puede Call en diesem Fall deutlich! más rápido es. Oder reden wir aneinander vorbei?! Egal - es eh offtopic.

05.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Actualización sobre Versión 1.2

iFs Vorschlag a Beschleunigung umgesetzt

El meisten API-Aufrufe laufen ahora encima Call, qué wohl sinnvoll es, como sí dieselbe API meist mehrmals benötigt se. Jetzt es aber necesariamente erforderlich, el el Constructor ausgeführt se, alternativ gibts ahora el método .Init()
Das erste Posting, sowie el Beispiele fueron entsprechend angepaßt.

Saludo
Thomas

06.12.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Hm sí Yo glaub Usted irrst porque lo va por lo tanto el el Konstruktor no como solcher erkannt se si él no auch el NameSpaceSign trägt.

Hab Yo wohl vorher übersehen