Hallo zusammen,
ich habe eine Frage zur Vererbung.
Ich habe eine Parent-Klasse, die mit
SQL Datenbank umgehen kann.
Delphi-Quellcode:
type TMasterClass = class (Tcomponent)
private
FConnection: TZConnection;
function checksqlconnect:boolean;
procedure ConnectionWrite(value:TZconnection);virtual;
Published
property Connection : TZConnection read FConnection write ConnectionWrite;
end;
Diese Funktionalität vererbe ich an einen Nachfahren, der noch etwas mehr kann.
Delphi-Quellcode:
type TURL = class (TMasterClass)
private
// Lokale Variablen
TProtokolltypes: array of string;
procedure ConnectionWrite(value:TZconnection);override;
......
Dieser Nachfahre kann jetzt zwar mit den
SQL-Datenbank umgehen, jedoch sind im die Verbindungsdaten unbekannt (Servername, Datenbankname,
DB-Typ etc.). Weiterhin erzeuge ich noch andere Nachfahren (hier nicht augelistet). Von allen Arten von Nachfahren gibt es mehrere Instanzen.
Nun zu meiner Frage.
Wie kann ich es machen, das alle Instanzen (aller Arten von Nachfahren) die gleichen Verbindungsdaten verwenden, OHNE das ich es jedesmal an alle übergeben muß. Prinzipell kann ich sie nicht als Konstanten festlegen.Hat jemand eine Idee?
Danke!