Forum: Object-Pascal / Delphi-Language
Delphi
by Haegar,
21. Feb 2003
danke, hat mir echt weitergeholfen, bin mal wieder ein stück schlauer! :hello:
dann werd ich mich mal ransetzen und probieren
ciao haegar
Forum: Object-Pascal / Delphi-Language
Delphi
by Haegar,
21. Feb 2003
ja da beispiel, is aus dem buch "Delphi 6 grundlagen und Profiwissen".
da haben sie das beispiel schrittweise ein wenig optimiert, so das dann die destructor-prozedur wegfiel! is aber ansonsten ganz gut, und kapiert hab ichs nu auch.
danke leutz
ciao haegar
Forum: Object-Pascal / Delphi-Language
Delphi
by Haegar,
20. Feb 2003
ääähh....aha...naja ich mach mich erstml ins bett, hab ja schließlich schule. und dann kann ich mir das morgen in aller ruhe nochmal alles duchdenken.
danke ciao haegar
Forum: Object-Pascal / Delphi-Language
Delphi
by Haegar,
20. Feb 2003
aber in meinem beispiel ist die write-geschichte auch nicht von nöten, oder? denn es wird nirgends eine ALTERSANGABE gemacht! es wird lediglich bei FormCreate das Baujahr angegeben! und da tritt ja die function in kraft
wenn ich beispielsweise die write-property nutzen wollen würde, dann müsste ich das folgendermaßen machen!?
Auto.Alter:=10; würde dann ein durch eine Jahresangabe bei...
Forum: Object-Pascal / Delphi-Language
Delphi
by Haegar,
20. Feb 2003
ja da fällt mir noch was ein, mal gucken ob ich das dann verstanden hab!
procedure TForm1.FormCreate(Sender:TObject);
begin
Label1.caption:='Alter: '+IntToStr(Alter);
end;
so ist der zugriff auf alter in dem beispiel gesteuert!
heisst das, das procedure schreibAlter(a:integer); gar nicht aufgerufen/benutzt wird!? ist die dazu da, das ich per altersangabe (entspricht dann a?) das...
Forum: Object-Pascal / Delphi-Language
Delphi
by Haegar,
20. Feb 2003
also irgendwie hab ich hier nen beispiel aus nem buch, aber ich komm noch nicht ganz dahinter!
hier der wichtige Teil des quelltextes
interface
type TAuto=class(TObject)
private
bj:integer;
function liesAlter: integer;
procedure schreibAlter(a:integer);
public