Пишем на MIDletPascal

Omar-z53Oi
14 мар 2009 в 16:36

Дайте пожалуста прогу написаной на MP, хочу поредактировать на MP, так легче начинающим, я с пых также начинал:-).

demon112
15 мар 2009 в 13:14

Скажите, как анимацию вывести? через drawimage не выводит...(

cHeRsAnYa1
15 мар 2009 в 13:42

demon112, возьми библиотеку для работы с gif.

demon112
15 мар 2009 в 13:54

cHeRsAnYa1, второй раз это говришь...) лучше бы сказал конкретней что за библиотека и дал бы ссылю....

cHeRsAnYa1
15 мар 2009 в 15:48

demon112, я тебе даже сайт дал, где скачать можно! Хоть немного-то сам поищи.

demon112
15 мар 2009 в 15:56

cHeRsAnYa1, там регистрация((( не люблю я их.... Потом спам начинает приходить( и так у мя полный ящик спама...

demon112
15 мар 2009 в 16:13

А как это можно написать: if r1=r2=r3=0 then begin ... end;... Что написать вместо r1=r2=r3=0?

cHeRsAnYa1
15 мар 2009 в 16:35

demon112, юзай сервисы типа spamavert.com, и спама от регистраций не будет.

cHeRsAnYa1
15 мар 2009 в 16:36

demon112, seclub.org/forum/goto/7067095/ - не совсем понял, тебе надо проверить если все числа равны 0? Тогда можно сделать например так: if (r1=0) and (r2=0) and (r3=0} then...

demon112
15 мар 2009 в 17:43

cHeRsAnYa1, да, я уже разобрался с этим... Ну всё равно пасиб!

demon112
16 мар 2009 в 04:54

А как можно это реалезовать: допустим даны 5 целых чисел (а1, а2, а3, а4, а5). И как написать если 3 из этих чисел равны 6-ти (к примеру), тогда ....?

LtiomaP
16 мар 2009 в 08:35

demon112, проверяешь каждое и ставишь счетчик. если счетчик и в итоге больше 3 то и делаешь что надо