AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Was ist ein Objekt ?

Ein Thema von mr_emre_d · begonnen am 27. Jul 2008 · letzter Beitrag vom 29. Jul 2008
Antwort Antwort
Apollonius

Registriert seit: 16. Apr 2007
2.325 Beiträge
 
Turbo Delphi für Win32
 
#1

Re: Was ist ein Objekt ?

  Alt 27. Jul 2008, 15:48
Natürlich sind sie mächtiger. Du kannst sie wie Klassen behandeln, oder wie Records:

Delphi-Quellcode:
TWuppdi = object
  Foo: Integer;
  procedure Bar;
  constructor Create(FooVal: Integer);
end;

procedure TWuppdi.Bar;
begin
  Writeln(Foo);
end;

constructor TWuppdi.Create(FooVal: Integer);
begin
  Foo := FooVal;
end;

procedure Proc;
var Wupp1: TWuppdi; Wupp2: ^TWuppdi;
begin
  //als Record
  Wupp1.Foo := 5;
  Wupp1.Bar;
  //als Klasse
  New(Wupp2, Create(8));
  try
    Wupp2.Bar;
  finally
    Dispose(Wupp2);
  end;
end;
Die Syntax ist zwar ziemlich seltsam, aber es funktioniert. Objects entsprechen praktisch den erweiterten Records aus Delphi 2006 (oder gab es die schon früher? ), zusätzlich ist aber Vererbung möglich.
Wer erweist der Welt einen Dienst und findet ein gutes Synonym für "Pointer"?
"An interface pointer is a pointer to a pointer. This pointer points to an array of pointers, each of which points to an interface function."
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:40 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz