FreePascal.ru

Огромное спасиба, буду тестировать на винсе, о результате сообщу...

const SND_SYNC = $0000;
SND_ASYNC = $0001;
SND_NODEFAULT = $0002;
SND_LOOP = $0008;
SND_NOSTOP = $0010;

function PlaySound (pszSound: PWideChar; hmod: HMODULE; fdwSound: DWORD): BOOL; external 'coredll' name 'PlaySoundW';

вот те маленький примерчик

Если возникнет вопрос почему такая тупая реализация отвечу, там компоненты ток пару чтук работають по выньСЕ и не так как надо с глюками...

Игра на лазарусе Морской бой с ИИ для WIN32 WINCE
Вот сегодня сделал портик студенческой игрушки своей под лазарус
Честноговоря матерился я очень много насчет лцл для wince
Можете посмотреть результаты в архиве в ехе-шника один пот вин32 другой пот винсе
http://keep4u.ru/imgs/b/080126 ...

Это форма перерисовывается нижняя...

Сделал версии вин и винсе также сделал игровое поле на весь екран кпк с большими крушочьками
Качать тутже архив обновлен



скачать тут

Padre_Mortius
Саму игру писал в детстве на дельфе
Как было - зафигашил особо ничего не менял...
Всетаки игра была за час сделана.. конечно можно усовершенствовать... Флаг в руки сорсы есть...

ev
шарики покрасивше не умею рисоватья, под вынь32 сделаю ,под линукс не умею компилировать в лаазарусе
Увеличу размер шариков ато мелко слишком вышло...
Еще в планах сделать морской бой с компутером на выньсе ну и кросс конечноже...
но пока хочу реализовать идею одной программы пот пда ...

Пожалуйста можешь показать рабочий пример загрузки гет странички с интернета для WINCE я перепробовал много чего ничего не вышло...

Bupyc
Удалось както получить доступ к интернету на WINCE ато у меня бузуспешно...
?

Вот наваял игрушку сегодня за часик
Выглядит помоему неплохо играбельно для комуникаторов с тачскринами также при желании можно откомпилировать для win32
Tested on
Lazarus-0.9.24-fpc-2.2.0-20071114-win32 + Lazarus-0.9.24-fpc-2.2.0-20071105-cross-arm-wince-win32

http://keep4u.ru/imgs ...

*** Офтоп немножко ****

Free Pascal — язык програмирования созданный Блезом Паскалем после того, как ему удалось сбежать из тюрьмы. Назван в честь одноимённой картошки «фри». Блез большой любитель картошки «фри» и прочих продуктов Apple MacDonald's. Многие языковеды (языкологи) считают что Фри ...

ага понял... нужно узнать еще библиотеку где находится эта функция
по примеру

Псотавил сдк 2005 се
далее открыл там phone.h

//++++++
//
// PhoneMakeCall
//
// Dials a number

typedef struct tagPHONEMAKECALLINFO
{
DWORD cbSize;
DWORD dwFlags;

//Params to tapiRequestMakeCall
PCWSTR pszDestAddress;
PCWSTR pszAppName;
PCWSTR pszCalledParty;
PCWSTR pszComment ...

так и пиши в чем проблема ?
Оно так не работает ни в винде ни в винсе

тоесть в вот таком виде


private
procedure WMHotkey( var msg: TWMHotkey ); message WM_HOTKEY;

-------

procedure TForm1.WMHotkey( var msg: TWMHotkey );
begin
делать чтото..&#46 ...