Also wenn ich TMail = Class
schreibe erbt diese automatisch von TObject ?
So ist es. TObject ist in der Klassenhierarchie ganz oben, sozusagen der Urvater aller Objekte.
TMail = Class
ist dasselbe wie
TMail = Class(TObject)
.
Zitat:
Wie lässt sich der Owner in meinem Beispiel einbauen, bzw macht dies überhaupt Sinn ?
Delphi-Quellcode:
constructor TMail.Create(AOwner: TComponent, param1, param2 :
String);
begin
inherited Create;
smtp := TIdSMTP.Create(
nil);
sslIOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(
nil);
end;
Ich kann bei
inherited Create;
keinen Owner angeben da meine Klasse von TObject erbt.
Das Create von TObject will keine Parameter.
Bzw was soll ich danach mit dem Owner anstellen wenn ich diesen im TMail.Create übergebe ?
Einen Owner gibt es erst bei TComponent. Entweder leitest du davon ab, oder du musst den Owner-Parameter weglassen. Kommt darauf an, was deine Klasse tun soll.
Grüße
Dalai