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

Вниз

Что надо добавить.   Найти похожие ветки 

 
otecmaldun   (2008-12-20 00:30) [0]

В требованиях программы требуется непрерывный вывод прямоугольников на новую форму как это сделать зациклить вывод на форму если не трудно накидайте плиз. И еще обьясните как пользоваться "procedure tform1.drawline.xxxxxx"
Идет постоянно ошибка в этой строке. Вот мой код
procedure TForm1.Button1Click(Sender: TObject);
var
f2:Tform;
x1,x2,y1,y2:integer;
t:tdatetime;
begin
t:=now();
   beep;
   randomize;
   f2:=tform.Create(application);
   f2.Show();
   for x1:=1 to 200  do
 x2:=random(100);
 y1:=random(100);
 y2:=random(100);
 timer1.Enabled:=true;
 timer1.Interval:=1000;


 
имя   (2008-12-20 00:34) [1]

Удалено модератором
Примечание: spam


 
Anatoly Podgoretsky ©   (2008-12-20 00:38) [2]

> otecmaldun  (20.12.2008 0:30:00)  [0]

Освой begin end


 
имя   (2008-12-20 00:49) [3]

Удалено модератором


 
Германн ©   (2008-12-20 01:06) [4]

В добавок к [2]
1.
> В требованиях программы требуется непрерывный вывод прямоугольников
> на новую форму как это сделать зациклить вывод на форму

Скажи то же самое, но простыми словами.
2.
> И еще обьясните как пользоваться "procedure tform1.drawline.
> xxxxxx"
> Идет постоянно ошибка в этой строке.

В какой строке и какая ошибка?


 
имя   (2008-12-20 02:47) [5]

Удалено модератором


 
имя   (2008-12-20 02:53) [6]

Удалено модератором


 
имя   (2008-12-20 03:43) [7]

Удалено модератором


 
имя   (2008-12-20 04:25) [8]

Удалено модератором


 
sniknik ©   (2008-12-20 10:12) [9]

автору, если вопрос еще актуален можешь продублировать, лучше с учетом пожеланий ответивших...
эту ветку закрываю из за спама в ней.



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

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

Наверх




Память: 0.48 MB
Время: 0.012 c
15-1228447092
Slider007
2008-12-05 06:18
2009.02.01
С днем рождения ! 5 декабря 2008 пятница


15-1228719875
pavel_guzhanov
2008-12-08 10:04
2009.02.01
Как отключить оптимизатор в Delphi7


2-1229374412
bit
2008-12-15 23:53
2009.02.01
TListView get item


15-1228708456
Mozart
2008-12-08 06:54
2009.02.01
Биллинг...


15-1227739103
DillerXX
2008-11-27 01:38
2009.02.01
Вопрос к пользовтелям googlemail (gmail)