Problem: DBEdit/Edit Felder per Knopfdruck generieren

[DeddyH]

Was soll denn bei Assigned() herauskommen? Versuch es mal so (schnell dahergetippt):

Delphi-Quellcode:

var DBE: TDBEdit;
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));
                                FreeAndNil(DBE);

                        end;

 //               end;

end;