Ereignishandling

[wodim]

Hi,

eine Form soll eine Aktion auslösen., sobald sie sichtbar wird. Habe leider keine Anleitung gefunden, nach der das funktioniert. Habe z.B. das probiert:

https://wiki.freepascal.org/Execute_act ... vate_event

Mal abgesehen davon, dass das wohl nicht funzen kann, wenn man die Variable genauso nennt wie die Ereignisprozedur (ich sie also umbenannt habe), fühlt die Prozedur sich absolut nicht angespochen. (Hab' ein

Code: Alles auswählen

showmessage('bin da');

eingebaut und einen Haltepunkt drauf gesetzt, aber dazu kommt's gar nicht. (Das Formular erscheint in voller Schönheit.)

Das ist mit Sicherheit wieder ein Anfängerfehler (oder mit an Sicherheit grenzender Wahrscheinlichkeit ein Fehler in der Anleitung, wie ich sie in den letzten Tagen dutzendweise kennen lernen konnte). Wer weiß es besser? Danke im voraus.

[Zvoni]

was genau willst du erreichen bzw. was soll die Form machen bzw. nicht machen?

OnCreate --> der Form wurde Speicher zugewiesen, und der Constructor ausgeführt. Sie existiert jetzt im Speicher.
OnShow --> Die Form soll jetzt gezeichnet werden. Während OnShow ist die Form noch nicht sichtbar.
OnActivate --> Die Form wurde gezeichnet, und ist jetzt sichtbar. --> Achtung: OnActivate wird JEDESMAL ausgeführt, wenn die Form den Fokus erhält

[af0815]

Das ist mit Sicherheit wieder ein Anfängerfehler (oder mit an Sicherheit grenzender Wahrscheinlichkeit ein Fehler in der Anleitung, wie ich sie in den letzten Tagen dutzendweise kennen lernen konnte). Wer weiß es besser? Danke im voraus.

Ein typischen Anfängerfehler wäre, wenn du das OnActivate per Hand schreibst (deklarierst) und nicht den Rumpf über den OI (ObjectInspector) erstell lässt. Weil genau dann fehlt nämlich dem Compiler die richtige Zuordnung, die der OI im Hintergrund für dich erstellt. In den ObjektInspector gehen und dort das Tab Events öffnen, dort mit einem doppelklick auf OnActivate erstellst du den Rumpf (oder über die drei Punkte).

[Zvoni]

Ein typischen Anfängerfehler wäre, wenn du das OnActivate per Hand schreibst (deklarierst) und nicht den Rumpf über den OI (ObjectInspector) erstell lässt. Weil genau dann fehlt nämlich dem Compiler die richtige Zuordnung, die der OI im Hintergrund für dich erstellt. In den ObjektInspector gehen und dort das Tab Events öffnen, dort mit einem doppelklick auf OnActivate erstellst du den Rumpf (oder über die drei Punkte).

Und viel wichtiger: Die Adress-Zuordnung der Event-Prozedur

[wodim]

Ein typischen Anfängerfehler wäre, wenn du das OnActivate per Hand schreibst (deklarierst) und nicht den Rumpf über den OI (ObjectInspector) erstell lässt. Weil genau dann fehlt nämlich dem Compiler die richtige Zuordnung, die der OI im Hintergrund für dich erstellt.

Und viel wichtiger: Die Adress-Zuordnung der Event-Prozedur

Nachvollziehbar.

In den ObjektInspector gehen und dort das Tab Events öffnen, dort mit einem doppelklick auf OnActivate erstellst du den Rumpf (oder über die drei Punkte).

Sowas gibt's in meinem OI leider nicht. Welche Einstellung stimmt da nicht?

[Zvoni]

Ein typischen Anfängerfehler wäre, wenn du das OnActivate per Hand schreibst (deklarierst) und nicht den Rumpf über den OI (ObjectInspector) erstell lässt. Weil genau dann fehlt nämlich dem Compiler die richtige Zuordnung, die der OI im Hintergrund für dich erstellt.

Nachvollziehbar.

In den ObjektInspector gehen und dort das Tab Events öffnen, dort mit einem doppelklick auf OnActivate erstellst du den Rumpf (oder über die drei Punkte).

Sowas gibt's in meinem OI leider nicht. Welche Einstellung stimmt da nicht?

???????

Unbenannt.PNG (38.35 KiB) 9713 mal betrachtet

[wodim]

Danke, das war's! Immerhin hatte der OI meine selbstgebastelte Prozedur schon akzeptiert.

[wodim]

Also wen's interessiert:

was genau willst du erreichen

Eine Datenbankanwendung, bei deren Start der User aufgefordert (nein, gebeten ) werden soll, sich anzumelden. Mit dem üblichen Dialog (Username, Passwort etc). Und der wird eben so geöffnet:

Code: Alles auswählen

procedure TFormMain.FormShow(Sender: TObject);
var CC: longint;
begin
 	CC := FormDBLogin.ShowModal;
 	// ... Auswertung der Rückgabe ...	
end;

was soll die Form machen

Eben das, aber erst, wenn sie sichtbar ist. Vorher aber checken, ob ein Verbindungsaufbau überhaupt möglich ist (laufen Server und Client, ist der Client überhaupt installiert, nimmt der Server Anmeldungen von diesem <User>@<IP-Adresse> an etc. pp) ...

[Zvoni]

Also wen's interessiert:

was genau willst du erreichen

Eine Datenbankanwendung, bei deren Start der User aufgefordert (nein, gebeten ) werden soll, sich anzumelden. Mit dem üblichen Dialog (Username, Passwort etc). Und der wird eben so geöffnet:

Code: Alles auswählen

procedure TFormMain.FormShow(Sender: TObject);
var CC: longint;
begin
 	CC := FormDBLogin.ShowModal;
 	// ... Auswertung der Rückgabe ...	
end;

was soll die Form machen

Eben das, aber erst, wenn sie sichtbar ist. Vorher aber checken, ob ein Verbindungsaufbau überhaupt möglich ist (laufen Server und Client, ist der Client überhaupt installiert, etc. pp) ...

So wie dein Code jetzt ist, wird das Login gezeigt, obwohl FormMain noch "unsichtbar" ist, oder?

[wodim]

So wie dein Code jetzt ist, wird das Login gezeigt, obwohl FormMain noch "unsichtbar" ist, oder?

Völlig korrekt, das gehört in FormActivate(), danke für den Hinweis.

[wodim]

So wie dein Code jetzt ist, wird das Login gezeigt, obwohl FormMain noch "unsichtbar" ist, oder?

Völlig korrekt, das gehört in FormActivate(), danke für den Hinweis.

Und nicht in FormActivated(). Die kennt der OI gar nicht. Frag' mich echt, ob die Autoren dieser "Anleitung" überhaupt was getestet haben oder nur kritiklos von irgendwoher kopiert ...

https://wiki.freepascal.org/Execute_act ... vate_event

[wp_xyz]

So wie dein Code jetzt ist, wird das Login gezeigt, obwohl FormMain noch "unsichtbar" ist, oder?

Völlig korrekt, das gehört in FormActivate(), danke für den Hinweis.

Und nicht in FormActivated(). Die kennt der OI gar nicht. Frag' mich echt, ob die Autoren dieser "Anleitung" überhaupt was getestet haben oder nur kritiklos von irgendwoher kopiert ...

https://wiki.freepascal.org/Execute_act ... vate_event

Ich hab's überarbeitet. Den wiki-Autoren solltest du aber keine Schlampigkeit unterstellen. Fehler passieren. Und selbst wenn der Code, der hier beschrieben ist, getestet ist, kann beim Übertragen ins wiki und vor allem beim Kürzen sofort ein Fehler reinrutschen, den man selbst beim dritten Mal durchlesen übersieht. Das wiki ist ein Community-Projekt. Wenn du dich registriert hast, kannst du Fehler selbst korrigieren.

[Zvoni]

So wie dein Code jetzt ist, wird das Login gezeigt, obwohl FormMain noch "unsichtbar" ist, oder?

Völlig korrekt, das gehört in FormActivate(), danke für den Hinweis.

Und denk an die "Sperrvariable"!
OnActivate zündet JEDES MAL, wenn das Fenster den Fokus erhält.

User startet dein Programm, MainForm wird angezeigt, Login poppt auf (und stellt damit MainForm in den Hintergrund!!!!),
er meldet sich an, MainForm erhält wieder den Fokus, Login poppt auf...........


EDIT: hmmm..... wenn ich das so lese....
Ist doch ne geile Idee um User zu verarscxxxx....en

[wodim]

Völlig korrekt, das gehört in FormActivate(), danke für den Hinweis.

Und nicht in FormActivated(). Die kennt der OI gar nicht. Frag' mich echt, ob die Autoren dieser "Anleitung" überhaupt was getestet haben oder nur kritiklos von irgendwoher kopiert ...

https://wiki.freepascal.org/Execute_act ... vate_event

Ich hab's überarbeitet. Den wiki-Autoren solltest du aber keine Schlampigkeit unterstellen.

Oh, Entschuldigung, will's mir hier mit keinem versauen.

Fehler passieren.

Wem sagst du das. Irren ist menschlich, Korrigieren aber auch.

In diesem Zusammenhang ein kleiner Schwank aus meiner Jugend: Mein erstes "elektronisch" erstelltes Pamphlet war meine Diplomarbeit (schon ein Weilchen her, wie gesagt). Die haben 4 (fach- und auch deutschkundige) Leute korrekturgelesen, danach habe ich selber noch Fehler gefunden, aber solche wie "Silber" ohne "l".

Und selbst wenn der Code, der hier beschrieben ist, getestet ist, kann beim Übertragen ins wiki und vor allem beim Kürzen sofort ein Fehler reinrutschen, denn man selbst beim dritten Mal durchlesen übersieht.

Sach' ich doch, von irgendwoher kritiklos kopiert. Aber das sind offensichtlich keine Flüchtigkeitsfehler, auch keine, die bei der Übernahme passieren konnten: Eine Variable genauso nennen wie die Ereignisprozedur, in der sie verwendet wird - auweia! Und diese Prozedur kann's gar nicht geben. Wobei das wohl eher ein Fehler in der IDE ist - ich fände FormActivated() auch logisch. Deshalb hab' ich mich ja nach dem Fehler dumm und dämlich gesucht ...

Das wiki ist ein Community-Projekt. Wenn du dich registriert hast, kannst du Fehler selbst korrigieren.

Na, das hat Zeit. Erst mal suche ich die Fehler lieber bei mir selber.

[wodim]

Und denk an die "Sperrvariable"!
OnActivate zündet JEDES MAL, wenn das Fenster den Fokus erhält.

Naja, (verstehend) lesen kann ich schon. Trotzdem danke für die Wiederholung.

User startet dein Programm, MainForm wird angezeigt, Login poppt auf (und stellt damit MainForm in den Hintergrund!!!!),

So soll es auch sein. Vorher ist das ja auch für ihn völlig funktionslos, er sieht nur in der Statusleiste: "Nicht verbunden".

er meldet sich an, MainForm erhält wieder den Fokus, Login poppt auf...........

EDIT: hmmm..... wenn ich das so lese....
Ist doch ne geile Idee um User zu verarscxxxx....en

Ich werde mich hüten. Meine Zielgruppe ist nämlich ziemlich sensibel, wie ich sie sehe. Konkret: Angestellte einer großen Klinik, von Hilfskraft bis Chefarzt und Geschäftsführer. Der Gag: Die Idee kam mir als Patient. Ich musste da vielleicht 10 Abteilungen durchlaufen, und als ich so zum 5. oder 6. Mal ein und dasselbe gefragt wurde, was schon bei der Anmeldung erfasst worden war, platzte mir die Frage 'raus: "Wozu haben Sie hier ein Rechnernetz?" Und als ich den hochqualifizierten (und auch vielbeschäftigten) Chirurgen sah, der auch mich operiert hatte, wie er für einen anderen Patienten auf meinem Zimmer so einen Anmeldebogen ausfüllte, tat mir was weh. Milchmädchenrechnung: Was kosten 10 Minuten in der Klinik? Mal 10 (wie bei mir) mal >10.000 stationär behandelte Patienten im Jahr macht wieviel ...