Помогите с Delphi (СРОЧНО, не бесплатно)

[HusIrk]

Выше обновил картинки этапов "трансляции L-систем с выводом образовавшихся фрактальных графов" :-)

Вообще исходник явно не последний рабочий вариант. Но на один запуск его теперь хватает...

[texoper]

По сути нужно выбросить инициализацию графики, заменить GetMaxx\GetMaxY на что-нибудь типа Form1->Width\Form1->Height (или как там в делфе Form1.Width вроде) и отрисовку LineTo\MoveTo поменять на Form1.Canvas.LineTo\MoveTo соответственно.

Пробовал, не пашет.

и даже не заметил, что задачу уже решили

Пока еще ничего не решено...

[HusIrk]

Явно не то, там вроде деревья должны получится.

хз че там должно получиться. Смотри картинки в посте №6.
Издалека похоже на дерево растущее в одну сторону дикими темпами.

[Господин Директор]

Пока еще ничего не решено...

Ну картинки выложили, спрашивают - оно, не?

Ты в оригинале-то скопилил программу, то ж самое показывает?

[HusIrk]

Ты в оригинале-то скопилил программу, то ж самое показывает?

Не будет она ничего показывать - там косяки в исходнике. Как минимум одна проверка неправильная.

[texoper]

Ты в оригинале-то скопилил программу, то ж самое показывает?

В оригинале тож не удалось запустить. По известным примерам должно получится что-то типо:

[pref]

Да нет там косяков, березки, снежинки, да елочки рисует. Готов с ней за 1 000 WMR расстаться.

[texoper]

Да нет там косяков, березки, снежинки, да елочки рисует. Готов с ней за 1 000 WMR расстаться.

А скидки студентам есть ? WMID скинь в личку, оплачу сразу.

[pref]

Скрины.


Кошелек в личке.

[HusIrk]

pref, у тебя фракталы не фрактальные
По второму скрину хорошо заметно.

Вот как должно быть, сначала фракталы заданные в исходнике:






Произвольный фрактал:


Пруф, под буквой а:

Текст программы на 95% совпадает с исходником, с парой исправлений, переводом на Дельфи + интерфейс для задания произвольных фракталов.

800 р.