Thema: Delphi Code vereinfachen

Einzelnen Beitrag anzeigen

Benutzerbild von alcaeus
alcaeus

Registriert seit: 11. Aug 2003
Ort: München
6.537 Beiträge
 
#6

Re: Code vereinfachen

  Alt 6. Mai 2004, 21:06
Zitat von Luckie:
Delphi-Quellcode:
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  Memo1.Visible := ComboBox1.ItemIndex = 0;
  Memo2.Visible := ComboBox1.ItemIndex = 1;
  Memo3.Visible := ComboBox1.ItemIndex = 2;
  Memo4.Visible := ComboBox1.ItemIndex = 3;
end;
Memox.Visible ist vom Typ Boolean
(ComboBoxx.ItemIndex = 0) ist vom Typ Boolean
Es handelt sich hier um eine Wertzuweisung so wie:
Delphi-Quellcode:
if (ComboBox1.ItemIndex = 0)[ = True] then
  Memox.Visible := True
else
  Memox.Visible := False;
[edit] Zum ersten mal Delphi-Tags vergessen[/edit]
Andreas B.
Die Mutter der Dummen ist immer schwanger.
Ein Portal für Informatik-Studenten: www.infler.de
  Mit Zitat antworten Zitat