Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.10.28;
Скачать: CL | DM;

Вниз

Господа, подскажите плз как програмно убрать с формы   Найти похожие ветки 

 
smartleds   (2007-10-05 20:50) [0]

компонент edit.
У меня при каждом нажатии кнопки button3 на форме появляется окно edit, соответственно в массиве  ArrOfEdit:array of TEdit; добавляется один компонент.
Теперь нужно сделать чтобы при нажатии на другую кнопку последние окно edit удалялось. Как из массива удалить я понял , а как с формы?
Вот часть кода для создания окон Edit

procedure TForm1.Button3Click(Sender: TObject);
begin
i:=i+1;
SetLength(ArrOfEdit, Length(ArrOfEdit)+1);
ArrOfEdit[High(ArrOfEdit)]:=TEdit.Create(self);
ArrOfEdit[i-1].Parent:=Form1;
ArrOfEdit[i-1].Width:=40;
ArrOfEdit[i-1].Height:=20;
 ArrOfEdit[i-1].Left:=X1;
 ArrOfEdit[i-1].Top:=Y1;
  X1:=X1+80;
         end;


 
Leonid Troyanovsky ©   (2007-10-05 21:00) [1]


> smartleds   (05.10.07 20:50)  

> компонент edit.

Компонент edit убирается с формы (или, во-ще, убирается)
путем простого Free.

Остальные проблемы его уже не касаются.

--
Regards, LVT.


 
smartleds   (2007-10-05 21:19) [2]

что-то ошибку дает, так пытаюсь
ArrOfLabel[High(ArrOfEdit)]:=TEdit.free;
SetLength(ArrOfEdit, Length(ArrOfEdit)-1);


 
Плохиш ©   (2007-10-05 21:21) [3]


> ArrOfLabel[High(ArrOfEdit)]:=TEdit.free;

Это где такой синтаксис описан и у какого языка?


 
Anatoly Podgoretsky ©   (2007-10-05 21:21) [4]

> smartleds  (05.10.2007 21:19:02)  [2]

К Борману


 
smartleds   (2007-10-05 21:32) [5]

Всем большое спасибо , понял вот так надо.
ArrOfLabel[High(ArrOfLabel)].Free;



Страницы: 1 вся ветка

Текущий архив: 2007.10.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.017 c
15-1191529240
TwentyTwo
2007-10-05 00:20
2007.10.28
Задать вопрос, который юридически невозможно закрыть даже методом


2-1190980483
foreverDelphi
2007-09-28 15:54
2007.10.28
как написать компонент видимый за пределами формы


6-1168705868
vidiv
2007-01-13 19:31
2007.10.28
сетевой select в INDY


15-1190773341
Slider007
2007-09-26 06:22
2007.10.28
С днем рождения ! 26 сентября 2007 среда


2-1191331842
_volodya
2007-10-02 17:30
2007.10.28
Массивы / TList