![]() |
Re: TListView Problem
Ist getestet. Funktioniert einwandfrei.
|
Re: TListView Problem
Weitere Infos:
Vielleicht ist das das Problem: Ich sehen in meinem ListView zwar die Columns aber nicht das Raster. Hat das was zu sagen? 2.:Ich hab gemerkt, dass der Scroll-Balken immer kleiner wird, wenn cih oft drauf drücke ( auf den button ), und tatsächlich steht in der Column[0] 'OptionalComponents'. Allerdings ist davor so ca 20 Zeilen leer. Irgendwie komisch. |
Re: TListView Problem
Hänge mal ein Demo-Projekt mit deinem Code an. Dann gucke ich mir das mal an. Aber beeile dich nach meinem fünften Southern-Cola könnte das nicht mehr klappen. ;)
|
Re: TListView Problem
Hallo,
ListView.GridLines:= Trure ? Heiko |
Re: TListView Problem
Liste der Anhänge anzeigen (Anzahl: 3)
Ok. hier ist es
|
Re: TListView Problem
Liste der Anhänge anzeigen (Anzahl: 3)
Wenn ich "Application.MainFormOnTaskbar := True;" in der dpr-Datei auskommentiere, geht der Code bei mir einwandfrei.
Ich sehe nach Klick auf "Get" einen Eintrag in der ListView "OptionalComponents". Wähle ich als Pfad z.B. "SOFTWARE\Microsoft\Windows", dann sehe ich entsprechend mehrere Einträge. Um die Spalten 2 und 3 musst du dich natürlich noch selbst kümmern (steht übrigens alles in der DP). Aber die erste Spalte wird korrekt gefüllt. Edit: Luckie nutzt "GetKeyNames". Ich habe in meinem oberen Code "GetValueNames" verwendet. Vielleicht suchst du das (einfach "GetKeyNames" durch "GetValueNames" ersetzen). Je nachdem, was du anzeigen möchtest. Mein Code erzeugt die Ausgabe im Anhang "matze", deins das im Anhang "luckie". Der Anhang "matze_erweitert" erzeugt eine Ausgabe, wie du sie dir vielleicht vorstellst, nur für einen anderen Registry-Schlüssel (ich kaue dir aber nicht alles vor). |
Re: TListView Problem
Zitat:
|
Re: TListView Problem
Wow. Das einzige was falsch war, war dass ich die ganze Zeit über GetKeyNames genommen hab. Das funktioniert natürlich nciht. Danke Leute ich hab es jetzt.
Falls nachfolgende nocheinmal das Problem haben, hier mein code. (Vorhanden ist ein LiestView1 mit 3 Subitems, in denen die Registry aufgeführt werden soll.
Delphi-Quellcode:
Vielleicht postet ja noch jemand die Möglichkeit einen RegistryKey-Type als String zu bekommen.
procedure GetValues(Sender: TObject);
var Keys: TStringList; Reg: TRegistry; i: Integer; li: TListItem; begin Reg := TRegistry.Create(KEY_READ); Keys := TStringList.Create; try try Reg.RootKey := HKEY_LOCAL_MACHINE; if Reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run', False) then begin Reg.GetValueNames(Keys); for i := 0 to Keys.Count - 1 do begin li := ListView1.Items.Add; li.Caption := Keys.Strings[i]; li.ImageIndex := 1; //li.SubItems.Add(); Hier liest man dann noch den KeyType aus. Das versuche cih auch grade noch aber ihr findet mit Sicherheit was. li.ImageIndex := 2; li.SubItems.Add(Reg.GetDataAsString(Keys.Strings[i])); end; end else raise Exception.Create('Schlüssel konnte nicht geöffnet werden'); except on E: Exception do ShowMessage(E.Message); end; finally Reg.Free; Keys.Free; end; end; |
Re: TListView Problem
Hat vielleicht noch jemand was dazu?
Ich bräuchte wirklich dringend den Type. |
Re: TListView Problem
Hallo,
also ich schaue mir immer dazu zuerst mal die Hilfe an, in diesem Fall also TRegistry. Dort steht dann TRegistry.GetDataInfo Die Methode liefert Informationen über einen bestimmten Datenwert, der zum aktuellen Schlüssel gehört. Heiko |
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:49 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz