Zugriff auf Listview über Form2

**Chris1986**

Hallo,
ich habe eine Form1, auf der eine Listview ist. Mit einer Function die als public deklariert ist lassen sich die Werte auslesen. Das funktioniert allerdings nur, wenn ich aus Form1 auf die Listview zugreife. Versuche ich die Function über einen Button auf Form2 aufzurufen, bekomme ich eine Fehlermeldung. Kann mir jemand helfen? Hier mal der Quelltext:

zusammenfalten · markieren

Delphi-Quellcode:

			  public

    { Public-Deklarationen }

    function oeffne_Tuerchen(Datum: word): TTuerchen;   {TTuerchen = record

                                                                       Bild,

                                                                       Bildtext; string;

                                                                     end;}

//...

implementation

function TVerwaltung.oeffne_Tuerchen(Datum: word): TTuerchen;

//gibt die Werte die in der Listview stehen zurück

var lauf,

    Zeile: integer;

begin

  Result.gefunden := false;

  for lauf := 0 to lstvVerwaltung.Items.Count-1 do  //<= hier wird die Zugriffsverletzung ausgegeben

  begin

    if lstvVerwaltung.Items.Item[lauf].Caption = inttostr(Datum)

      then begin

             Zeile := lauf;

             Result.gefunden := true;

             break;

           end;

  end;

  if not Result.gefunden

    then exit;

  Result.Bild     := lstvVerwaltung.Items.Item[Zeile].SubItems.Strings[0];

  Result.Bildtext := lstvVerwaltung.Items.Item[Zeile].SubItems.Strings[1];

end;

TTuerchen ist ein record-Typ. Ich probiere nämlich gerade einen Adventskalender zu programmieren 8)

MfG
Christian

Zugriff auf Listview über Form2

Zugriff auf Listview über Form2

Forumregeln