Eine Eigenschaft mehrer Editfelder ändern

Frischling · Hält's aus hier Beiträge: 10

hihu

eines Vorweg... Ich bin Anfänger

also ich habe 7 Editfelder mit der eigenschaft Readonly auf true..

und ich möchte bei allen 7 diese Eigenschaft auf false setzen,
jedoch net gerade
7 mal Editx.ReadOnly := False;
schreiben...

das müsste doch möglich sein das zu vereinfachen oder?

LCS · Verfasst: Do 26.09.02 11:24

Hi
man kanns vereinfachen. Wenn deine Editfelder Edit1, Edit2..Edit7 heissen, kannst du das so machen:

markieren

Quelltext

1:
2:
3:

   for i := 1 to 7 do
       with FindComponent('edit' + IntToStr(i)) as TEdit do
           ReadOnly := False;

Gruss Lothar

_________________
Der BH ist für die Brust, der Plan ist für'n Ar...

Frischling · Hält's aus hier Beiträge: 10

das war ja Turbosuperschnell

)

Danke werde es gleich ausprobieren

)

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme