Добрый день!
Я хочу чтобы в главной форме в цикле показывалась переменная счетчика цикла в label.caption. Это я сделал.
Теперь при некотором условии создается новая форма (show), в ней тоже цикл; переменную цикла тоже хотелось бы вывести на экран. Я это делаю в label2.caption. Но ничего не получается.
Код для второй формы.
Код:
1 2 3 4 5 6 7 8 9 10 11 | procedure TchildForm . FormShow(Sender: TObject);
var
jj: Integer ;
begin
for jj:= 0 to 5000 do
begin
showChildLabel . Caption:= 'jj = ' + IntToStr(jj);
showChildLabel . Show;
showChildLabel . Update;
end ;
end ;
|
К сожалению, я немодальная форма создается, но в нее не обновляется свойство caption для label2.
Олег.