Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Основна";
Поточний архів: 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: integer;
x, y: real;
починати
for i: = 1 to 30000 do begin
x: = i / 100;
y: = 5 * sin (x / 3);
PaintBox1.Canvas.Pixels [round (x), round (y) + 150]: = clBlack;
end;
end;

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

PS Цікаво, перевіряючи цей код, я півгодини бавився, малюючи всяку бяку, але так і не зміг підібрати формулу для відтворення параболи ... забув зовсім математику.



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

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

for i: = 1 to 100 do begin
x: = 0.1 * i;
y: = tvoyaformula (x);
series1.addxy (x, y);
end;



$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 вся гілка

Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.57 MB
Час: 0.024 c
3-21925
Nailka
2001-12-04 16:16
2002.01.08
проблема з пошуком в поле типу Long в Oracle


14-22398
Jey
2001-11-10 18:55
2002.01.08
Тут ось закортіло IRC клієнт зробити ....


1-22237
PVR
2001-12-16 17:20
2002.01.08
TListView допоможіть сортувати


3-21963
szap
2001-12-05 11:53
2002.01.08
Швидкість


3-21939
SAN
2001-12-04 16:01
2002.01.08
MSSQL





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська