Hallo Gemeinde,
ich versuche mich seit einigen Tagen mit der Entwicklung von Android-Apps, nachdem mir ein lieber Kollege hier das Konzept für MVP erläutert hat.
Damit wollte ich mich nun auch auf dieser Plattform etwas austoben. Der Code ist ja quasi der selbe.
Nachdem ich hier aber eigene Events brauche, die unter
Win32/64 auch sauber funktionieren, dachte ich mir, sollte das auch für Android gehen.
War aber nix.
Sobald ich die Events entferne, sehe ich die App im AVD, bzw. auch auf dem Smartphone. Aber eben nur die Oberfläche ohne Funktion.
Schalte ich die Events zu, dann bleibt der Bildschirm im AVD schwarz und Delphi meldet mir einen Fehler.
Im Interface-Teil sieht das so aus:
Code:
Type TNextCountryCodeEvent = procedure(Sender: TObject) of Object;
TPrevCountryCodeEvent = procedure(Sender: TObject) of Object;
TNumberCountryCodeEvent = procedure(Sender: TObject) of Object;
im Presenter so:
Code:
constructor TCountryCodePresenter.Create(const CountryCodeView: IMBCountryCodeView; const CountryCodeModel: IMBCountryCodeModel);
Var i : Integer;
Begin
fCountryCodeView := CountryCodeView;
fCountryCodeModel := CountryCodeModel;
* fCountryCodeView.OnNextCountryCodeEvent := ChangeNextCountryCode;
fCountryCodeView.OnPrevCountryCodeEvent := ChangePrevCountryCode;
fCountryCodeView.OnNumberCountryCodeEvent := ChangeNumberCountryCode;
Ab der Zeile, die mit * beginnt, knallt es.
Kann mir jemand einen passenden Tipp geben?