PÜ 4: Das verrückte Edit-Feld
Zielstellung und Szenario:
Dieses Programmierobjekt soll das Zusammenspiel von
Objekteigenschaften, Ereignissen und Methoden verdeutlichen, indem
an einem Edit-Feld über Button-Click-Ereignisse bestimmte
Eigenschaften zur Laufzeit per Wertzuweisung geändert werden.
Zur Zeiteinsparung bekommen die Schüler das unten abgebildete
Formular bereits als Datei vorgegeben.
Der Lehrende demonstriert anhand der Eigenschaft Edit1.Visible
die Benutzung der Online-Hilfe von Delphi und setzt die daraus
gewonnenen Informationen in die entsprechenden Prozeduren um.
Die Schüler nutzen anschließend diese Vorgehensweise und vervollständigen
systematisch die noch fehlenden Prozeduren für die übrigen
Buttons. Zur Ergebnissicherung notieren sie ihre Erkenntnisse in
einer Tabelle.
| Formular: |  |
Zusammen-
fassung: |
| Eigenschaft | Bedeutung | Beispiel für eine Wertzuweisung |
| Visible | Sichtbarkeit der Komponente | Edit1.Visible := False; |
| Enabled | steuert, ob die Komponente auf Maus-, Tastatur- und Timerereignisse reagiert | Edit1.Enabled := True; |
| Color |
hiermit wird die Hintergrundfarbe der
Komponente festgelegt. |
Edit1.Color := clRed; |
| Width |
bestimmt die horizontale Größe des
Dialogelements oder Formulars |
Edit1.Width :=
Edit1.Widht+10; |
| Height |
bestimmt die vertikale Größe des
Dialogelementes oder Formulars |
Edit1.Height :=
Edit1.Height-10; |
| Font.Color |
bestimmt die Schriftfarbe innerhalb
des Dialogelementes |
Edit1.Font.Color :=
clGreen; |
|
Beispiel-
prozeduren: |
procedure
TForm1.Button1Click(Sender: TObject);
begin
Form1.Caption := Edit1.Text;
end;
procedure
TForm1.Button2Click(Sender: TObject);
begin
Edit1.Visible := False;
end;
|
| 
DIENSTE
