Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   FreePascal (https://www.delphipraxis.net/74-freepascal/)
-   -   Formularvererbung -> Meldung beim speichern (https://www.delphipraxis.net/136804-formularvererbung-meldung-beim-speichern.html)

dfried 8. Jul 2009 09:20


Formularvererbung -> Meldung beim speichern
 
Hallo,

ich nutze in Lazarus Formularvererbung und hab in meinem Parentformular auch eine Methode "onClose" definiert.
Wenn ich nun im davon abgeleiteten Formular irgendwelche Änderungen mache, dann kommt beim speichern immer die folgende Meldung:

Zitat:

Die folgenden Methoden die von frmXXX:TfrmXXX verwendet werden sind nicht im Quelltext frmXXX.pas.
frmXXX.OnClose=FormClose
Die hängenden Verweise löschen?
Wenn ich diese lösche geht natürlich die Formularvererbung nicht mehr, gehe ich auf "Beibehalten und fortsetzen" funktioniert zwar alles aber beim nächsten speichern kommt die Abfrage wieder :-(

Es ist ja aber grad der Sinn, dass ich im abgeleiteten Formular nicht jede Methode nochmal anlegen muss.

Hat hier jemand eine Lösung dafür?

khh 8. Jul 2009 11:14

Re: Formularvererbung -> Meldung beim speichern
 
Zitat:

Zitat von dfried
Es ist ja aber grad der Sinn, dass ich im abgeleiteten Formular nicht jede Methode nochmal anlegen muss.

Hat hier jemand eine Lösung dafür?

ich denke da machst irgendwo nen Fehler,
hast ein bischen Quelltext für uns ?


Gruss Kh

dfried 8. Jul 2009 13:49

Re: Formularvererbung -> Meldung beim speichern
 
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:

Zitat von khh
ich denke da machst irgendwo nen Fehler,
hast ein bischen Quelltext für uns ?

Hab mal ein kleines Testprojekt angehängt.

Im aktuellen Zustand kann man über das Menu das Testformular öffnen und über den Button wieder schliessen, da im Parent im onClose ein CloseAction := caFree drin steht.

Wird nun der Source von formInheritedTest.pas verändert und gespeichert, dann fragt kommt wieder diese Meldung, klickt manhier auf "entfernen", dann komtm die Meldung zwar nie wieder, aber die Vererbung funktioniert dann nicht mehr, da er ins lfm dann eine Zeile "OnClose = nil" einträgt!?!

Kannst du erkennen was da falsch ist?


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:57 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz