Werte aus dynamisch erzeugten Edits

**Cosamia**

Hallo Zusammen,

ich stehe gerade irgendwie auf dem Schlauch.
Ihr könnt mir sicherlich helfen.

ich erzeuge mit folgendem Code meine dynamische Anzahl von Editfelder über ein Array.

zusammenfalten · markieren

Delphi-Quellcode:

			 for n := 0 to high(Mydata) - 1 do begin

      {Panel malen}

      NewPanel := TJvPanel.Create(BOT_BEST_PANEL);

      with NewPanel do begin

        {Positionierung im Grid}

        BoundsRect := AlignGrid.CellRect(mydata[n].row,mydata[n].col);

        Width := intPanelWidth;

        Height := intPanelHeight;

        Parent := AlignGrid;

        ParentBackground := true;

        FlatBorder := true;

      end;

      {Edit malen}

      NewEdit := TEditX.Create(NewPanel);

      with NewEdit do begin

        Top     := EDITYPOS;

        Left    := EDITXPOS;

        Width   := EDITWidth;

        Height  := EDITHeight;

        Parent  := NewPanel;

        ActiveColor := $00FEEFDD;

        minvalue := mydata[n].minValue;

        maxvalue := mydata[n].maxValue;

        showhint := true;

        hint := 'Minimum: '+ floattostr(minvalue) +#13#10+'Maximun: '+floattostr(maxvalue);

        digits   := mydata[n].digits;

        Datatype  := deFloat;

        docheckRange := true;

        doformatValue := true;

        Editlabel.Caption := mydata[n].caption;

        text    := FloatToStr(mydata[n].default);

        OnOutOfRange := MyOutOfRange;

      end;

Soweit so gut. Nun stellt sich für mich gerade die spontane Frage, wie ich die Daten, die der User dann in die Edit Felder eingibt, wieder in einem Array einsammle.

Jemand eine Idee?

Danke

Werte aus dynamisch erzeugten Edits

Werte aus dynamisch erzeugten Edits

Forumregeln