Wie zu verwenden Listview richtig in delphi?

Mein code ist unten, es ist richtig funktioniert, aber nach dem kompilieren das Programm sehe ich alle fullname und Land vertikal aufgelistet sowas wie :

_________________________________
Fullname1
Country1
Fullname2
Ländern2
Fullname3
Country3
etc...

SQLQuery1.SQL.Text := 'SELECT * FROM users where user_age="'+age+'"';
SQLQuery1.Open;
rec := SQLQuery1.RecordCount;

SQLQuery1.First; // move to the first record
ListView1.Visible := false;
if rec>0 then
begin
while(not SQLQuery1.EOF)do begin
ListView1.Visible := true;
        // do something with the current item
ListView1.AddItem('Full name: '+SQLQuery1['fullname'], Self);
ListView1.AddItem('Country: '+SQLQuery1['cntry'], Self);

    // move to the next record

SQLQuery1.Next;

end;

Aber ich will etwas Wie :

Wie zu verwenden Listview richtig in delphi?

Sie sind das hinzufügen von Elementen und nicht die sub-Elemente! Müssen Sie das Element hinzufügen und dann mit return Wert hinzufügen, auf die SubItems-Auflistung.
Wie Unterelement hinzufügen ?
Abgesehen von der Verwendung von Unterpositionen, werden Sie wahrscheinlich wollen, um die ListView ist Visible-Eigenschaft Außerhalb der Schleife...
Head to dieser SO Frage.
Sind Sie sich bewusst, Sie hätte nur ein DBGrid und lassen Sie delphi die Arbeit für Sie tun. Es nennt sich Data Bewusst Steuert, und es ist eine sehr schöne Funktion in Delphi. Sie können es tun, ohne code, oft.

InformationsquelleAutor Rafik Bari | 2011-12-23

Schreibe einen Kommentar