منزل
Top.Mail.Ru Yandeks.Metrika
المنتدى: "Main";
الأرشيف الحالي: 2002.01.08;
تنزيل: [xml.tar.bz2];

إلى

كيف نفعل؟ البحث عن فروع مماثلة


nazgul   (2001-12-15 14:28) [0]

Надо написать прогу на дельфи.
Чтобы строила График функции по заданной формуле.
Говорят можнос пом-ю компонента Chart
но как я не знаю?



KilkennyCat   (2001-12-16 07:35) [1]

Уф... для начала нужен делфи. Любой.
Но Чарт не нужен, или не обязательно он. Смотря как нужно рисовать.
Если Вам необходимо нарисовать просто какую-нить параболу, для демонстрации формулы, то берется любой канвас... например, так:

Я взял PaintBox размером 300х300
в обработчике onPaint все пикселы, удовлетворяющие условию у=5*sin(x/3)
окрашиваются в черный цвет:

procedure TForm1.PaintBox1Paint(Sender: TObject);
فار
i: عدد صحيح
x, y : real;
بدأ
بالنسبة إلى i: = 1 to 30000 ابدأ
x := i/100;
y := 5*sin(x/3);
PaintBox1.Canvas.Pixels[round(x),round(y)+150] :=clBlack;
الغاية؛
الغاية؛

цикл 30000 раз для того, чтобы увеличить графическое разрешение,
соответсвенно в дальнейшем, координаты х и у уменьшаются в сто раз.
Если этого не сделать, сплошной линии не получится.
К у прибавляется 150 для смещения по вертикали.

P.S. Забавно, проверяя этот код, я полчаса забавлялся, рисуя всякую бяку, но так и не смог подобрать формулу для отрисовки параболы...забыл совсем математику.



MBo   (2001-12-16 07:47) [2]

кладешь на форму chart, создаешь в нем series1

لـ i: = تبدأ 1 إلى 100
x:=0.1*i;
y:=tvoyaformula(x);
series1.addxy(x,y);
الغاية؛



$Hic0   (2001-12-16 16:39) [3]

:)) y:=sqr(x) - парабола :)



BFG   (2001-12-16 16:40) [4]

>>Nazgul
А не хочешь так,чтоб любой график
функции ,записаной в Edit ,при нажатии кнопки выводился через Canvas имэджа? Я над этим довольно долго мучилси да так и ничего толкового не вышло.Если сможешь такое замутить то шли на paarik@zeos.net



nazgul   (2001-12-16 21:23) [5]

الناس
я уже разобрался
Написал прогу интерпретирующую график функции написанной в Edit"е
И рисует его в Чарте



Pat   (2001-12-17 00:59) [6]

>nazgul
Намыль прогу, пожалуйста. Я давно уже тра***сь с этим вопросом.



صفحات: 1 فرع كامل

المنتدى: "Main";
الأرشيف الحالي: 2002.01.08;
تنزيل: [xml.tar.bz2];

الطابق العلوي









الذاكرة: 0.57 ميغابايت
الوقت: 0.025 ج
1-22124
التخلي عن
2001-12-18 02:16
2002.01.08
العلامات على jpg ، bmp it.d.


14-22414
wHammer
2001-11-12 10:48
2002.01.08
دلفي 5 و (أو (xor)) C ++ باني 5؟


3-21909
DeadMoroz
2001-12-03 15:21
2002.01.08
يوم جيد ، أنا بحاجة إلى المشورة ، بلز


14-22356
سميك
2001-11-06 20:00
2002.01.08
التدخل في البرمجة .... ألم الأسنان!


7-22424
نيك
2001-09-21 14:30
2002.01.08
عند تثبيت Pro ، فإنك تعطي أخطاء على محرك الأقراص C





الأفريكانية الألبانية عربي الأرميني أذربيجان الباسكي البيلاروسية Bulgarian التشيكية الصينية المبسطة) تقاليد صينية) الكرواتية التشيكية دانماركي Dutch أنجليزي الإستونية الفلبينية Finnish جيب
الجاليكية الجورجية الألمانيّة اليونانيّة الكريولية الهايتية اللغة العبرية الهندية الهنغارية أيسلندي Indonesian الأيرلندية Italian اليابانيّة الكوريّة اللاتفية اللتوانية المقدونية الملايو المالطية Norwegian
اللغة الفارسية بولنديّة البرتغاليّة رومانية Russian صربي السلوفاكيّة سلوفيني إسباني السواحيلي Swedish Thai التركية الأوكراني الأردية الفيتنامية ويلزي اليديشية البنغالي البوسنية
السيبيونو الاسبرانتو الغوجاراتية الهوسا همونغ الإيبو جاوي الكانادا الخمير لاو لاتينية الماوري المهاراتية المنغولية النيبالية البنجابية الصومالية التاميل التيلجو اليوروبا
زولو
Английский Французский ألماني Итальянский البرتغالية Русский Испанский