|
Создание Tedit'a делается так
unit ..
.....
var
Edits : array[0..100] of TEdit;
count : integer;
...
procedure lala ();
begin
Edits[count]:=TEdit.Create(Form1);
Edits[count].parent:= имя панели или где их тебе надо разместить
Edits[count].OnEnter:=OnEnterEdits - это твоя процедура, должна быть определена в классе формы. (procedure TForm1.OnEnterEdits....)
и так далее.
Для более конкретного ответа нужно больше данных. Хотя, в принципе, я тебе все, чтобы ты смог сделать сказал.Тебе только нужно оформить как тебе нужно.
|