Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#4

Re: edit-felder in schleifen auswerten und checkboxen komple

  Alt 20. Jun 2005, 07:33
Hallo Torsten,

den Inhalt deiner Edit-Felder kannst du so abgreifen:

Delphi-Quellcode:
procedure TDemoForm.SaveEditText(sl: TStrings);
var
  i: integer;
  edit: TEdit;
begin
  sl.BeginUpdate;
  sl.Clear;
  for i := 0 to ComponentCount - 1 do
    if Components[i] is TEdit then begin
      edit := Components[i] as TEdit;
      sl.Values[IntToStr(edit.Tag)] := edit.Text;
      // sl.Values[edit.Name] := edit.Text;
    end;
  sl.EndUpdate;
end;
Gespeichert werden die Feldinhalte im Name-Value-Format. Entweder du initialisierst die tag property der Edit-Felder und erhältst sowas wie "1=Inhalt von Edit-Feld mit tag 1" oder du nimmst die auskommentierte Variante und greifst später über den Komponentennamen zu: "Edit1=Inhalt von Feld 1".

Grüße vom marabu
  Mit Zitat antworten Zitat