Danke für die weiteren Antworten.
Zitat:
Setze einfach inmmer ein inherited; Jede Klasse erbt..
Also wenn ich
TMail = Class
schreibe erbt diese automatisch von TObject ?
Zitat:
Im Free/FreeAndNil ist bereits ein "if Assigned" eingebaut, also nochmal ist nicht nötig. (doppelt ist nicht falsch, nur unnötig)
Danke für den Hinweis das wusste ich nicht.
Nun habe ich noch eine weitere Frage.
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 ?
Gruss Int3g3r.