code smell

[dinosaur]

Bei uns werden viele Forms in der Datenbank gespeichert, damit Kundenspezifische Anpassungen leicht möglich sind.
Beim auslesen aus der Datenbank hat es eine stelle die für mich einfach nach schlechtem Design aussieht..
Ein sehr grosser Block von If-Abfragen(für jede Komponente die verwendet werden kann ...):

Delphi-Quellcode:

if c = 'TLabel'        then control := NewLabel;
if c = 'TMyEdit'       then control := NewEdit;
if c = 'TMyMemo'       then control := NewMemo;
if c = 'TButton'       then control := NewButton;
if c = 'TMyButton'     then control := NewButton;
if c = 'TMyCheckBox'   then control := NewCheckBox;
if c = 'TRadioButton'  then control := NewRadioButton;
if c = 'TListBox'      then control := NewListBox;

//...usw.

Weiss jemand, wie man dies schöner gestalten könnte bzw. ein sinnvolles DesignPattern?