Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by bluescreen25,
14. Okt 2006
Vielen Dank marabu ! :cheers:
Haste noch einen Tipp warum nu manche Einträge etwas eingerückt sind...?
Bzw wie man dies beheben kann?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by bluescreen25,
14. Okt 2006
Trage ich
ShowList.Items.Count := DirLst.Count;
ein ,dann bekomme ich die Dirs angezeigt,umgekehrt auch die Files
bei
ShowList.Items.Count := DirLst.Count + FileLst.Count;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by bluescreen25,
14. Okt 2006
noch ein klitzekleines Problem:
wie bekomme ich die Einträge von Dir und Files in der Listview untereinander rein ?
Es funktioniert das mit den Directories, aber beides?
//Dateien und Ordner in die ListView eintragen
procedure ShowFiles(ShowList: TListView; Rekursive: Boolean; ShowDir: Boolean);
var
I: Integer;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by bluescreen25,
14. Okt 2006
Danke marabu :thumb:
Das kann doch nicht wahr sein :wall: Die ganze Zeit keine Anzeige.
So klappt es dann: (Listmedia wird ja erst später bekannt)
for iIndex := 0 to 1 do
begin
iString := lowercase(Ini.ReadString(Menu,'List' + IntToStr(iIndex) + 'Function','0'));
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by bluescreen25,
14. Okt 2006
Hmm klappt irgendwie nicht. Ich erzeuge das Listview dynamisch.
for iIndex := 0 to 1 do
begin
iString := lowercase(Ini.ReadString(Menu,'List' + IntToStr(iIndex) + 'Function','0'));
If iString = '0' then Goto ListEnde;
SkinList := TListView.create(SkinForm);
with SkinList do
begin
Parent := SkinForm;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by bluescreen25,
14. Okt 2006
Ich habe es mir mal ausgedruckt, versuche dies mal umzusetzen.
Erstmal Danke marabu ! :thumb:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by bluescreen25,
14. Okt 2006
Das war hier im Forum eine beschriebene Methode, welche nur bedingt Geschwindigkeit bringt.
Soweit ich gelesen habe, gibt es die Möglichkeit die ListView virtual zu machen, nur bekomme ich das aktuell an meinem Code nicht hin. Es geht hier um z.T. viele Einträge.
Dein Stichwort ist Datencontainer und da solls auch so gehen, das man diesen verlagert, na ich habe da keinen Ansatz....
Hier...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by bluescreen25,
14. Okt 2006
Hallo, wir haben bei dem Listview eine 1000fach angesprochene Verlangsamung drin.
Haben da auch die CodeSchnipsel versucht zu interpretieren.
Leider bekommen wir das mit dem VirtualListView nicht hin.
Kann da jemand mal einen Ansatz geben ?
//Dateien und Ordner in die ListView eintragen
procedure ShowFiles(ShowList: TListView; Rekursive: Boolean; ShowDir: Boolean);
var
FileLst,...