[th_bav]

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

[dr. F.I.N.]

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

[Ama]

Код:

1 2 3 4 5

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

[th_bav]

Код:

1 2 3 4 5 6 7 8 9

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???

Код:

1	Ed.Name := 'Edit45';

[th_bav]

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

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

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

Код:

1 2 3 4 5 6 7 8 9

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