edit-felder in schleifen auswerten und checkboxen komplett f

[marabu]

Bei meinem Code Beispiel müssen die Zuweisungen einfach nur umgekehrt werden.

Delphi-Quellcode:

procedure TDemoForm.LoadEditText(sl: TStrings);
var
  i: integer;
  edit: TEdit;
begin
  for i := 0 to ComponentCount - 1 do
    if Components[i] is TEdit then begin
      edit := Components[i] as TEdit;
      edit.Text := sl.Values[IntToStr(edit.Tag)];
      // edit.Text := sl.Values[edit.Name];
    end;
end;

Grüße vom marabu