StringGrid := Listview | Komponenten Inhalt kopieren

[Plague]

Guten Abend,

mir ist eben eine Idee gekommen. Da ich es nicht hinbekommen habe, meine Ergebnisse aus einer MySQL Datenbankabfrage in einer Listview Komponente anzeigen zu lassen, frage ich mich nun, ob es möglich ist, ein gesamtes StringGrid zu kopieren... Geht das? Und wenn ja wie?
Ich kann mir nicht vorstellen, dass es so aussieht wie im Titel (als StringGrid1 := Listview1).

Danke
Thomas

[Sebastian Nintemann]

Hallo Thomas,
schau dir mal die Eigenschaften Rows bzw. Cols an, beide sind vom Typ TStrings.
Mit diesen Eigenschaften ist es dir also möglich, eine bestimmten Zeile oder Spalte eines StringGrids beispielsweise die Items eines ListViews oder die Lines eines Memos zuzuweisen und umgekehrt.

Gruß, Sebastian

[Sharky]

Hai Plague,

Zitat:

Zitat von Plague

...Da ich es nicht hinbekommen habe, .... in einer Listview Komponente anzeigen zu lassen, ....

Warum geht das denn nicht bei Dir?

Ich mache das in einem Projekt z.B. so:

Delphi-Quellcode:

procedure TFRM_Main.ShowLaender;
var
  LI: TListItem;
begin
  with DataModule1.ZReadOnlyQuery1 do
  begin
    close;
    SQL.Text := 'SELECT * FROM laender ORDER BY name_de';
    open;
    ListView1.Items.BeginUpdate;
    Listview1.Items.Clear;
    while not (EOF) do
    begin
      LI := Listview1.Items.Add;
      LI.ImageIndex := 0;
      LI.Data := Pointer(FieldByName('id').AsInteger); // ID speichern!
      LI.Caption := FieldByName('name_de').AsString;
      LI.SubItems.Add(FieldByName('kurzzeichen').AsString);
      LI.SubItems.Add(FieldByName('name_en').AsString);
      LI.SubItems.Add(FieldByName('lkz').AsString);
      Next;
    end;
    ListView1.Items.EndUpdate;
    close;
  end;
end;

[Plague]

Ich vermute mal, dass du die ZEOS Komponenten verwendest, oder?
Ich habe gestern versucht diese zu installieren, aber es klappt nicht. Gibt es da einen bestimmten Trick???