Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Datensätze aus ner ListView ohne ID ändern? (https://www.delphipraxis.net/171015-datensaetze-aus-ner-listview-ohne-id-aendern.html)

Andreas L. 16. Okt 2012 08:34

AW: Datensätze aus ner ListView ohne ID ändern?
 
Geht ganz einfach:

Schreiben der ID:
Delphi-Quellcode:
var
  ListItem: TListItem;
begin
  ListItem := ListView1.Items.Add;
  ListItem.Caption := 'xyz';
  //...
  ListItem.Data := TObject(DeineDBKompo.FieldAsInteger);
end;
Lesen:
Delphi-Quellcode:
var
  ID: Integer;
begin
  ID := Integer(ListItem.Data);
end;

Popov 16. Okt 2012 15:14

AW: Datensätze aus ner ListView ohne ID ändern?
 
Zitat:

Zitat von Furtbichler (Beitrag 1187197)
Das Aufteilen der Strings per ExtractSubStr ist nicht gerade best practice.

Das eigentlich Problem mit Beispielen ist sie so zu konzipieren, dass deren Code sich nur um das Wesentliche dreht und die Lösung gleich erkennbar ist. Die Lösung per ExtractSubStr war in diesem Fall bewußt nicht optimal, sondern nur zweckmäßig. Wie auch immer AllexII seine ListView organisiert, er hat eine Methode für seine Standarddaten. Und die wollte ich nicht in Frage stellen. Ihm fehlte nur noch die Möglichkeit ein Wert extra zu speichern. Der unwichtige Part sollte hier besonders kurz gehalten werden. Ich hab gestern zufällig ein anderes Beispiel für ListBox veröffentlicht und dort die Daten auch zuerst als Record angehängt. Allerdings war ich mir dann nicht sicher ob die Methode für den Empfänger zu komplex oder zu neu ist. Also habe ich die Daten in einen String gelegt. Das versteht jeder.

Aber um auf deine Aussage zu kommen - natürlich hast du Recht. Ist man erst mal gezwungen Daten als Objekt anzuhängen, was lediglich das Löschen der Daten geringfügig verkompliziert, kann man es letztendlich für alle Daten nutzen, denn dann sind die Möglichkeiten fast unendlich.


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:59 Uhr.
Seite 2 von 2     12   

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