Форум: "Начинающим";
Текущий архив: 2009.02.01;
Скачать: [xml.tar.bz2];
ВнизЧто надо добавить. Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.018 c