is-Logo PAT 01 -  V. 09
Ereignissteuerung   -   Aufgabe und Hinweise

S. Spolwig

[Home | Unterrichtssequenzen]
[Startseite]

Page down

Die Version V. 09 besteht nur aus FensterFrm und ist eine aktionsfähige fertige Bedienungsoberfläche, die zwar noch nicht mit den echten Daten arbeitet, aber bereits die vorgesehenen Aktionen demonstriert. Eine Entwicklung, die dem Kunden das bestellte Produkt in dieser Weise präsentiert, nennt man Rapid Prototyping.

Dazu sind folgende Schritte erforderlich:

  1. Kontrollieren Sie, ob alle GUI-Komponenten einen richtigen Namen haben.
    Das ist für die nächste Aktion wichtig, weil mit diesen Namen automatischen entsprechende Methoden erzeugt werden.

  2. Erzeugen Sie durch Doppelklick auf die Buttons die entsprechende Ereignisbehandlungsprozedur, die dadurch in den Programmtext geschrieben wird. Sie werden in der Reihenfolge eingesetzt, in der Sie sie anklicken.

  3. Erzeugen Sie durch Doppelklick auf das Fensterformular die Prozedur FormCreate (...)

  4. Ergänzen Sie die Prozedur EndeBtnClick mit der Zeile : FensterFrm.Close

  5. Fügen Sie in allen anderen Steuerbutton-Prozeduren Meldungen ein (in Hochkommata) :
    '.. ist noch nicht fertig ...'    (s. Hinweis)

  6. In der Fensterleiste oben soll der Programmname, die Versionsnummer und der Hersteller stehen und beim Anklicken der Funktionen Neu, Anzeigen, Ändern, ... ein Hinweis, was der Benutzer gerade gewählt hat.

  7. Schreiben Sie eine private Methode Init, mit der Sie alle Editfelder bei Bedarf leeren können:
    Etwas so:
     

    procedure TFensterFrm.Init;
    (* ------------------------------------------------------- *)
    begin
      FensterFrm.Caption := ' PAT 01 - V. 0.9  von Elli Pirelli';
      NameEdt.Text := '' ;
      ... 
      ...
    end;


    Diese Methode ruft man zum ersten Mal am besten in der Methode FensterFrm.FormCreate auf, die Sie mit einem Doppelklick auf das Fensterformular erzeugen.

 
Hinweise:

Meldungen ausgeben:

Eine Meldung wird angezeigt, in dem man dem MeldePnl einen Text (in Hochkommata) übergibt:

   MeldePnl.Caption := ´ ... das ist die Meldung !´

Dort, wo Sie eine Meldung brauchen, schreiben Sie in die Ereignisbehandlungsprozedur diesen Aufruf hinein.

Beispiel:

Procedure AendernBtnClick (Sender : Tobject);
Begin
   ....
   MeldePnl.Caption := ´.. noch nicht fertig.´
End;

Meldung löschen:

  • Erzeugen Sie eine Ereignisbehandlungsprozedur für MeldePnl
  • Ergänzen Sie sie mit der Zeile: MeldePnl.Caption := ´´ ;    (das ist ein leerer String)

©    05. Oktober 2008    Siegfried Spolwig

page_top