Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Wie selektierten EIntrag einzeln anzeigen ? (https://www.delphipraxis.net/27209-wie-selektierten-eintrag-einzeln-anzeigen.html)

sugaFRAG 5. Aug 2004 21:38


Wie selektierten EIntrag einzeln anzeigen ?
 
moin Jungs,

also ich hab als database mySql laufen und greife über dieses Zeos darauf zu.

Die Daten werden in einer Listview angezeigt.

Nun möchte ich davon einen eintrag ändern !

Wie mach ich das ?

ich habe gedacht, dass ich den selektierten eintrag kopiere und in einzelne editfelder anzeigen lasse und mittels button die tabelle update.

Doch wie komme ich an den selektierten eintrag und dessen splaten und einträge ran ?

Die Tabelle sieht wie folgt aus:

ID - Produktname - Hersteller - Preis - Menge - Verbraucht

so da möcht ich jetzt die einzelenen zB. den Produktname Testprodukt und Menge 100 in ein einzelnes Editierfeld anzeigen lassen, wenn ich in der liste auf das produkt klicke.

Kann mir einer erklären wie ich das mache ? Am besten wäre ein bissel Code zum verstehen.

Danke im Vorraus.

cu
sugaFRAG

sugaFRAG 5. Aug 2004 23:59

Re: Wie selektierten EIntrag einzeln anzeigen ?
 
Hat keiner eine Idee ?

ich müsste praktisch nur die werte der spalte die im listview makiert ist in ein edit feld kopieren und anzeigen. Das ist mein prob.

DataCool 6. Aug 2004 00:50

Re: Wie selektierten EIntrag einzeln anzeigen ?
 
Hi,

einfach ne Query an die DB mit :

'Update TabelleXYZ set Produktname = 'Auto', Hersteller = 'Mercedes', Preis = 20.000, Menge = 2,
Verbraucht = 9.5 where ID = 1234'

schicken das wars.

sugaFRAG 6. Aug 2004 10:06

Re: Wie selektierten EIntrag einzeln anzeigen ?
 
hmm naja ich meinte eigentlich was anderes aber als ersatz geht das natürlich auch.

teebee 6. Aug 2004 10:24

Re: Wie selektierten EIntrag einzeln anzeigen ?
 
Wenn Du auf die Einträge des ListView zugreifen willst, geht das so:
Delphi-Quellcode:
Var SelItem: TListItem;

SelItem := ListView1.Selected;
If SelItem<>Nil Then Begin
  HauptEintrag := SelItem.Caption;
  UnterEintrag1 := SelItem.SubItems[0];
  UnterEintrag2 := SelItem.SubItems[1]; // usw.
End;
Gruß, teebee


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:56 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz