Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Fehler in Listview abfangen...? (https://www.delphipraxis.net/17705-fehler-listview-abfangen.html)

Plague 8. Mär 2004 19:17


Fehler in Listview abfangen...?
 
Guten Abend,

ich habe ein kleines Problem. Bei einem Doppelklick auf eine Listview-Komponente sollen eine Form geöffnet werden (allerdings nur wenn man auf den Wert doppelklickt). Ich habe versucht, es so abzufangen:
Delphi-Quellcode:
if Listview1.Selected.Selected = true then
...
aber damit klappt es leider auch nicht...

Was mache ich falsch, bzw. was muss ich machen.?

Danke
Thomas

Christian Seehase 8. Mär 2004 19:29

Re: Fehler in Listview abfangen...?
 
Moin Thomas,

erst mal müsstest Du prüfen, ob überhaupt ein Item ausgewählt wurde, da ansonsten das erste Selected nil enthält, und somit, bei dem Versuch das zweite Selected abzufragen, eine Access Violation produziert.

Plague 8. Mär 2004 19:35

Re: Fehler in Listview abfangen...?
 
Puuuuh... Das hört sich kompliziert an...
Bitte ein bisschen genauer oder ein Beispiel ;)

Thomas

Christian Seehase 8. Mär 2004 19:38

Re: Fehler in Listview abfangen...?
 
Moin Thomas,

bevor Du ListView.Selected in der Form ListView.Selected.Selected verwenden kannst, musst Du prüfen, dass ListView.Selected <> nil ist.

fränk0815 8. Mär 2004 19:38

Re: Fehler in Listview abfangen...?
 
Code:
if ListView.Items.SelCount > 0 then
  if ListView.Selected.Selected then
    begin
      //tue irgendwas
    end else exit;
else exit;
... So könnte es vielleicht gehen

Plague 8. Mär 2004 19:48

Re: Fehler in Listview abfangen...?
 
Vielen Dank

Es klappt jetzt wunderbar... :)

Gruß
Thomas

tableD 8. Mär 2004 20:00

Re: Fehler in Listview abfangen...?
 
Besser wäre (wie bereits oben erwähnt):

Delphi-Quellcode:

  if ( listView1.Selected <> NIL ) then // Ist Auswahlzeiger vorhanden (größer 0) dann weiter
  begin

   ..

  end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:39 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