Problem: DBEdit/Edit Felder per Knopfdruck generieren

[DeddyH]

Delphi-Quellcode:

var DBE: TComponent;
var y: Integer;

begin

                Save_NumFields := NumFields; // NumFields wird mit der Funktion übergeben und ist eben die Anzahl der Felder, die erstellt werden sollen

               
//               if not Assigned(DBE) then begin

                        for y := 1 to Save_NumFields do begin
                                DBE := Form1.FindComponent('DBEdit_' + IntToStr(y));
                                if (DBE is TDBEdit) then
                                  FreeAndNil(DBE);

                        end;

//               end;

end;