Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Assign auf Vorfahr-Komponente

    Delphi
    by shmia, 15. Jun 2009
  Hier mal das Grundgerüst:
  procedure TMeineKlasse3.Assign(Source: TPersistent);
  var
  t : TMeineKlasse3;
  begin
  if Source is TMeineKlasse3 then
  begin
  t := TMeineKlasse3(Source); // Hilfsvariable macht das Leben angenehmer
  self.z := t.z;
  end;