Einzelnen Beitrag anzeigen

Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#16

Re: Multipage-Support: Ich komme nicht weiter

  Alt 19. Aug 2007, 16:57
Hi,

also, nochmal langsam

Wie auf DSDT.info steht, kann man mit einer property Lese- und Schreibzugriff auf eine Variable (ich sage mal) "überwachen". Mit Read überwacht man Lesezugriff und mit write Schreibzugriff. Bei unserer Items-Property gibt es aber nur ein Read, will heißen, man kann nur Lesen und nicht Schreiben:

property Items[Index: Integer]: TSeite read GetSeite; Ruft man nun im Source Items[Index] auf, wird die Function GetSeite aufgerufen.

Delphi-Quellcode:
function TDokument.GetSeite(Index: Integer): TSeite;
begin
  Result := TSeite(inherited Items[Index]);
end;
Wie Du hier siehst, wird schon eine Seite zurückgegeben (Funktionen kennst Du ja bestimmt, nur statt hier ein Boolean, Integer oder String zurückgegeben wird, wird hier ein Object, eine TSeite, zurückgegeben).

Deswegen kannst Du auch direkt auf Items[Index].Width zugreifen und brauchst nicht TSeite(Items[Index].Width) schreiben.

Unter dem Stichwort Hier im Forum suchentypisierte Listen sollte noch mehr zu finden sein.
  Mit Zitat antworten Zitat