Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Обновление формы и пауза в программе [D5, WinXP]

Страницы: 1 2 >
m-kirill-2003 © (2006-10-04 17:20:00)
Как сделать, что бы данные в форме постоянно обновлялись. Если добавляю часы, надо что бы цифры менялись. Версия про зацикливание не катит, надо что бы программа шла дальше.
И еще, как сделать поузу в программе, что бы она тупо отстановилась и подождала пару минут

ProgRAMmer Dimonych (2006-10-04 18:32:00) [1]
IMHO, нет. Можно только свой компонент написать, в котором хранить свойства всех шейпов, а он при запуске проги сам эти свойства расставит. Но это ни в какие временные рамки не влезет...

Leonid Troyanovsky (2006-10-04 18:31:00) [2]

> ProgRAMmer Dimonych (04.10.06 18:28) [20]

> han_malign © (04.10.06 18:28) [21]

Спамеры :)

Шумим, братцы, шумим.

--
Regards, LVT.

m-kirill-2003 (2006-10-04 18:30:00) [3]
Только минус в том, что они появляются только при запуске программы, их нельзя както редактировать на конструкторе форм... или можно?

han_malign (2006-10-04 18:28:00) [4]
дубль два
Shapes[i]:=TShape.Create(Self);
Shapes[i].Parent:= Self;
Shapes[i].Left:=100;
...

ProgRAMmer Dimonych (2006-10-04 18:28:00) [5]
a[i].Visible:=True;

> han_malign © (04.10.06 18:24) [17]
> Shapes[i]:=TShape.Create(Self);
> Shapes[i].Parent:= Self;
> Shapes[i].Left:=100;
> ...

m-kirill-2003 (2006-10-04 18:28:00) [6]
РАБОТАЕТ!!! УРА

m-kirill-2003 (2006-10-04 18:26:00) [7]
Вот что я сделал:
var
Form1: TForm1;
A:array[1..5] of tshape;
i:word;

потом
procedure TForm1.FormCreate(Sender: TObject);
begin
for i:=1 to 5 do
begin
A[i]:=TShape.Create(self);
A[i].Left:=10+5*i;
a[i].height:=30;
a[i].width:=30;
a[i].top:=100;
end;
end;

короче их не видно!

han_malign (2006-10-04 18:24:00) [8]
Shapes[i]:=TShape.Create(Self);
Shapes[i].Parent:= Self;
Shapes[i].Left:=100;
...

Leonid Troyanovsky (2006-10-04 18:23:00) [9]

> ProgRAMmer Dimonych (04.10.06 18:22) [15]

> Что за ошибка?

Обычную ошибку, ясень пень.

--
Regards, LVT.

ProgRAMmer Dimonych (2006-10-04 18:22:00) [10]
> [14]
Что за ошибка?

m-kirill-2003 (2006-10-04 18:20:00) [11]
Ошибку дает!

ProgRAMmer Dimonych (2006-10-04 18:10:00) [12]
1. Объявляем массив.
2. В OnCreate формы или где-нибудь ещё (зависит от программы) пишем приблизительно следующее.

for i:=1 to 10 do
begin
Shapes[i]:=TShape.Create(Self);
Shapes[i].Left:=100;
...
end;

Т.е. после создания вместо имени компонента указываем элемент массива.

Leonid Troyanovsky (2006-10-04 18:03:00) [13]

> m-kirill-2003 © (04.10.06 17:57) [11]

> можно ли из объектов tshape сделать, если да, то как эти
> фигуры разместить на форму, т.е. какое имя им давать

Размещение на форме не требует никаких имен.

--
Regards, LVT.

PS На второе высшее замахнулся?
Уважаю.

m-kirill-2003 (2006-10-04 17:57:00) [14]
Массив, что так такое знаешь?
Бывает из цифр, слов
тип array of
можно ли из объектов tshape сделать, если да, то как эти фигуры разместить на форму, т.е. какое имя им давать

ProgRAMmer Dimonych (2006-10-04 17:53:00) [15]
> [9]
Не, вообще по Дельфям.

Leonid Troyanovsky (2006-10-04 17:49:00) [16]

> ProgRAMmer Dimonych (04.10.06 17:47) [7]

> - мне подсказывали, теперь вроде как освоил более или менее
> успешно - вот другим помогаю.

Тоже пути и станции? Или воздушные перевозки?
Бедные мы, бедные.

--
Regards, LVT.

ProgRAMmer Dimonych (2006-10-04 17:49:00) [17]
> [5]
Извиняюсь, в этой формулировке не понял :(

ProgRAMmer Dimonych (2006-10-04 17:47:00) [18]
Насчёт вечного должника - это лишнее. Сам когда-то начинал - мне подсказывали, теперь вроде как освоил более или менее успешно - вот другим помогаю.
Удачи в цели из [4]

MsGuns (2006-10-04 17:47:00) [19]
Для того, чтобы "данные в форме обновлялись", в соответствующем блоке кода (в ветке - это событие таймера или приложения) надо "заставлять" форму или меняемые элементы (панельки, эдиты, комбобоксы и т.д.) перерисовываться. Для этого надо вызывать метод Update/Invalidate для перерисовываемого контрола.

m-kirill-2003 (2006-10-04 17:46:00) [20]
Еще один вопросик.
Можно ли создать из объектов (например фигур прямоугоьников) массив? Если да, то как эти элементы (массива) прописать на форме

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »