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

Вниз

массив tEdit   Найти похожие ветки 

 
denis24   (2003-06-25 11:33) [0]

Как можно оптимально проверить не пусты ли tedit?
Через цикл это понятно ,а вот как обращаться именно к эдитам.
Короче азы VCL ;)


 
Poirot ©   (2003-06-25 11:38) [1]

if Components[i] is TEdit then
if (Coponents as TEdit).text = "" then blablabla....




 
Palladin ©   (2003-06-25 11:39) [2]

1 TComponent.FindComponent + определенный порядок наименования объектов
2 хранение созданых также и в своем контейнере


 
kudatsky   (2003-06-25 11:41) [3]

procedure TForm1.Button1Click(Sender: TObject);
Var
I:Integer;
begin
for I:=0 to ControlCount-1 do
if Controls[I] is TEdit then
if TEdit(Controls[I]).Text <> "" then
TEdit(Controls[I]).Text:=IntToStr(I);
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
1-20136
Ahmad K
2003-06-24 19:25
2003.07.07
ShellExecute(handle, open , http://www.de.ru , nil, nil, SW_????


14-20237
McSimm
2003-06-19 15:07
2003.07.07
Московская пирушка 6 июня. Долгожданный отчет :)


1-20117
Sergant
2003-06-24 19:26
2003.07.07
Работа с модальными формами.


1-20147
lightix
2003-06-24 16:18
2003.07.07
QReport - как программно сменить принтер?


9-19946
Ёгурт
2002-12-15 18:57
2003.07.07
А какой алгоритм у крестиков и ноликов