[th_bav]

Добрый день.
Подскажите как мне создать компонент Edit на форме по нажатию на кнопку??? В инете рылся, но ничего стоящего не нашел

[dr. F.I.N.]

А я сразу нашел....

[Ama]

Код:

 var Ed: TEdit;
....
 Ed:= TEdit.Create(Form1);
 Ed.Parent:= Form1;
....

[th_bav]

Код:

var
Ed: TEdit;
begin
 Ed:= TEdit.Create(SQLEditor);
 Ed.Parent:= SQLEditor;
 Ed.Left:=100;        
 Ed.Height:=30;   
 Ed.Width:=100;    
 Ed.Top:=100; 

Как присвоить элементу новое имя??? к примеру чтобы Edit43???

[lmikle]

Сообщение от th_bav

Как присвоить элементу новое имя??? к примеру чтобы Edit43???

Код:

Ed.Name := 'Edit45';

[th_bav]

Блин, ну я и программер , я даже не подумал, что кавычки надо, спасибо буду пытаться

[Страдалецъ]

И маленький советик при создании компонента программно. Свойство Parent заполняйте после всех предварительных операций с компонентом т.е. делайте так:

Код:

 
var
Ed: TEdit;
begin
Ed:= TEdit.Create(SQLEditor);
 Ed.Left:=100;        
 Ed.Height:=30;   
 Ed.Width:=100;    
 Ed.Top:=100; 
 Ed.Parent:= SQLEditor;

[NumLock]

установка свойства Height не влияет на высоту TEdit, пока AutoSize == True