alles deaktivieren (neuse Problem)

[Wadim]

Zitat von Stanlay Hanks:

Um APPs Beitrag noch zu ergänzen/zusammenzufassen (hab ich getestet):

Delphi-Quellcode:

var list : TStringList;
    a : Integer;
begin
 List := TStringList.Create;
 .
 . //Dein Code = . . .
 .
 For a := 1 to 15 do
   List.Add((FindComponent('edit'+IntToStr(a)) as TEdit).Text);

Man liest sich, Stanlay

cool- funktioniert

danke