|
Registriert seit: 30. Mai 2008
407 Beiträge
Lazarus
|
Re: Code verkürzen (Clear bei mehreren Edits)
1. Mai 2009, 12:20
Zitat von Hansa:
Zuerst : ComponentCount <F1>
Prinzip ist so :
Delphi-Quellcode:
if (MeineKomponente is TEdit) then
(MeineKomponente as TEdit).Clear;
Uff, fast schon zu spät.  Trotzdem genau gucken : meine Zeilen sind etwas anders wegen dem "as". Dann kann man sich das as schenken.
Delphi-Quellcode:
TForm.FindChildControl
TForm.FindComponent
Aber alle Edits in eine TObjectList stecken und die durchlaufen wäre imho deutlich eleganter.
Man kann einen Barbier definieren als einen, der alle diejenigen rasiert, und nur diejenigen, die sich nicht selbst rasieren.
Rasiert sich der Barbier?
|