Moin,
Ich Code derzeit ein Programm welches Plugins unterstüzt. Nun wollte ich, das ein Plugin in die Statusbar ein neuen Eintrag hinzufügen kann.
Pseudocode:
Delphi-Quellcode:
// Caption wird erfolgreich zurück gegeben
ShowMessage(TButton(PluginManager.Plugin[I].StatusBarControl).Caption);
// Testbutton erstellen
btn := TButton.Create(self);
btn.Caption := 'Test Button';
// Dies Funktioniert, der Button wird in der Statusleiste angezeigt
TJvStatusPanel(JvStatusBar1.Panels[0]).Control := btn;
// Dies Funktioniert nicht, der Button wird in der Statusleiste nicht angezeigt
TJvStatusPanel(JvStatusBar1.Panels[0]).Control := TButton(PluginManager.Plugin[I].StatusBarControl);
Warum funktioniert das nicht? Es ist mir unerklärlich.
Fehler:
Zitat:
---------------------------
Debugger
Exception Notification
---------------------------
Project Main.exe raised
exception class EConvertError with message 'Cannot assign a TFont to a TFont'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------
Du derefernzierst p2 einmal und weißt die Adresse von i zu. Das heißt p2 (also der Zeiger auf einen Zeiger) zeigt auf den Zeiger p1 welchen du so auf i zeigen lässt.