Hi,
danke für die Antwort. Ich habe Deine Verbesserungen eingepflegt. Jetzt bekomme ich immer die Meldung: Eine Komponente mit dem Namen "Button 2" existiert schon. Ein Button heißt auch "Button 2". Allerdings verstehe ich nicht, warum er Button2 als Bezeichner nimmt. Die Fehlermeldung taucht in folgender Zeile auf:
dbf.create(Form1);
und nciht in der Konstruktor-Methode. Ich erzeuge das Objekt wie folgt:
Delphi-Quellcode:
procedure TForm2.Button2Click(Sender: TObject);
var dbf : TDatenbank;
begin
dbf.create(Form1);
dbf.destroy;
end;
Beim Start des Programms rufe ich im onCreate des Formulars so auf (ohne Fehlermeldung):
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
db1 := TDatenbank.create(Form1);
db1.onFehler := dbFehler;
end;
Ulrich