forum.boolean.name - Windows XS + Исходник !

forum.boolean.name (http://forum.boolean.name/index.php)

- Проекты на MidletPascal (http://forum.boolean.name/forumdisplay.php?f=88)

- - Windows XS + Исходник ! (http://forum.boolean.name/showthread.php?t=18385)

MegaX5

20.07.2013 10:45

Windows XS + Исходник !

Вложений: 1

Windows XS от MeGaX5
Для новичков я сделал не большой Windows, он легкий, много во что тяжеловатого там нету, я так думаю.
Внимания не каких функций там нету, просто время, можно открыть мой компьютер, панель и настройки.
Разрешение "240x320".(Внимания на других экранах могут быть баги)

_DARKSIDER_

20.07.2013 18:46

MegaX5,на твоём месте я бы подумал,прежде чем выкладывать этот 'hello world'.
З.ы.:курсор уходит за пределы экрана :В

Чуть позже проверю твой код на компе,интересно посмотреть на процентное содержание быдлокода :D

_DARKSIDER_

20.07.2013 19:54

Ответ: Windows XS + Исходник !

Посмотрел я исходники. Лучше бы и не смотрел...
З.ы.: что у тебя делают функция isblock из урока Tiger1025 и повторная перерисовка с задержкой? О_0

MegaX5

21.07.2013 09:35

Ответ: Windows XS + Исходник !

_DARKSIDER_, Ха-ха я её удалить хотел, забыл, это я пытался сделать 2 мерный массив (Точнее карту). Все остальное написано мной.

Цитата:

З.ы.:курсор уходит за пределы экрана :В

Исходник открытый исправь я щя на другим проектом работаю.

Цитата:

З.ы.: что у тебя делают функция isblock из урока Tiger1025 и повторная перерисовка с задержкой? О_0

У тайгера Boolean а это Map:array [0..1,0..1] of integer, попробуй удали функцию и вставь ту функцию из урока Tiger1025 и посмотри что будет !

_DARKSIDER_

21.07.2013 11:22

Ответ: Windows XS + Исходник !

Цитата:

Сообщение от MegaX5 (Сообщение 263914)

Исходник открытый исправь я щя на другим проектом работаю.

Нет уж,спасибо,я лучше сам сделаю-проще будет (хотя смысла в создании таких мидлетов нет :crazy: )

Reizel

22.07.2013 16:24

Ответ: Windows XS + Исходник !

ёптвую...

Цитата:

den:=getDay(time);

mes:=getMonth(time)+1;

god:=getYear(time);

if mes =1 then mesc:='января';

if mes =2 then mesc:='февраля';

if mes =3 then mesc:='марта';

if mes =4 then mesc:='апреля';

if mes =5 then mesc:='мая';

if mes =6 then mesc:='июня';

if mes =7 then mesc:='июля';

if mes =8 then mesc:='августа';

if mes =9 then mesc:='сентбря';

if mes =10 then mesc:='октября';

if mes =11 then mesc:='ноября';

if mes =12 then mesc:='декабря';

date:=(''+den+' '+mesc+' '+god+'г.');

MegaX5

22.07.2013 17:34

Ответ: Windows XS + Исходник !

?
у меня то кого нету

Fred-boy

23.07.2013 08:45

Ответ: Windows XS + Исходник !

MegaX5, перезалей в зипе, на линуксе rar не открывается.

MegaX5

23.07.2013 08:56

Ответ: Windows XS + Исходник !

Вложений: 1

WinZip

Randomize

23.07.2013 09:30

Ответ: Windows XS + Исходник !

Цитата:

Сообщение от Fred-boy (Сообщение 264042)

MegaX5, перезалей в зипе, на линуксе rar не открывается.

ABTOMAT

23.07.2013 09:57

Ответ: Windows XS + Исходник !

Цитата:

Сообщение от Randomize (Сообщение 264046)

Fred-boy

23.07.2013 13:58

Ответ: Windows XS + Исходник !

Reizel

23.07.2013 22:58

Ответ: Windows XS + Исходник !

Цитата:

Сообщение от Fred-boy (Сообщение 264061)

да полуркай ты альтернативы

den	23.07.2013 23:17

Ответ: Windows XS + Исходник !

это у тебя что-то с пакетным менеджером, проверь источники приложений.

Часовой пояс GMT +4, время: 19:40.