athena.gif (7242 Byte)

 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:   eigen1.jpg (29390 Byte)
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;