Einzelnen Beitrag anzeigen

Chris1986

Registriert seit: 17. Jul 2003
Ort: Aachen
350 Beiträge
 
Delphi 7 Enterprise
 
#1

Zugriff auf Listview über Form2

  Alt 1. Dez 2003, 01:08
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:

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
Es gibt nur 10 Typen von Menschen auf der Welt:
Die, die Binärcode verstehen und die, die es nicht tun . . .
  Mit Zitat antworten Zitat