كيفية إضهار Edit

لم نفهم سؤالك .. الرجاء التوضيح .

لدي Form تحوي على combobox (يحتوي على قائمة من الأشهر) ,أريد عند إختيار أحد عناصر القائمة , تضهر بجانبه EDitBox تحتوي كعنوان إسم العنصر المختار من قائمة ال combobox.

عليك تعريف كائن جديد من نمط tedit ثم إنشاءها عند الضغط على combobox ليصبح الكود النهائي:

............
var
  Form1: TForm1;
 t:tedit;
implementation

{$R *.dfm}



procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if t<>nil then
t.Free;

t:=tedit.Create(self);
t.Parent:=self;

t.left:=ComboBox1.Left+ComboBox1.Width+5;
t.Top:=ComboBox1.Top;

t.Text:=ComboBox1.Text;

end;
................

شكرا على الرد , لكن في حالة ما إذا لم بكن هناك EditBox و لكن DBEditBox لحقل من حقول Table لقاعدة بيانات.

أي أن DBEditBox يوجد من قبل , غير أنه ليس مرئي.