Вверх ↑
Этот топик читают: Гость
Ответов: 3745
Рейтинг: 619
#1591: 2018-03-21 11:51:47 ЛС | профиль | цитата
1) Установить из установщика компилятор
2) Распаковать архив с обновлением компилятора (в первом посте в параграфе "Установка")
3) Установить пакет - скачать архив с пакетом и распаковать, как описано в первом посте.

После компиляции проверить наличие в папке "HiAsm\Elements\Android\code\result\" файла "AndroidManifest.xml", папок "src", "bin". Если их нету - вероятно, HiAsm не имеет прав записи в свой каталог. Запустить HiAsm от имени Администратора, если компиляция происходит или файлы появляются - значит в этом проблема. Дать права полного доступа для Пользователей в свойствах папки HiAsm.
карма: 17

0
Ответов: 32
Рейтинг: -2
#1592: 2018-03-21 13:27:51 ЛС | профиль | цитата
Спасибо за информацию ! Сейчас попробую!
карма: -1
cschanell
0
Ответов: 32
Рейтинг: -2
#1593: 2018-03-21 14:39:45 ЛС | профиль | цитата
Спасибо! Все заработало!
(Пришлось переустанавливать два раза! (В первый раз я забыл закрыть файл андроид-проэкта и Hiasm на стадии установки пакета крашнулся :cry
Но теперь все работает!
Кстати как сделать PlaySound на андроид (очень надо!)? Может скрипт есть ?
карма: -1
cschanell
0
Ответов: 66
Рейтинг: 1
#1594: 2018-03-31 10:35:44 ЛС | профиль | цитата
На ББ стоит сервер, при подключении выводит IP подключенного клиента, но сообщения не получает, на клиенте ошибка отправки данных. Клиент запускал на реальном устройстве. Если клиент на ББ, то все нормально. Сервер стоит на Windows 2003 Server с белым IP

Add(TCPClient,5044424,252,217)
{
link(Data,1368656:Value,[])
}
Add(Button,16437796,168,217)
{
Left=5
Top=5
Caption="Подключить"
Point(onClick)
link(onClick,5044424:doConnect,[])
}
Add(EditText,1368656,252,154)
{
Left=5
Top=145
Width=370
}
Add(Button,11846647,168,259)
{
Left=385
Top=145
Width=85
Height=27
Point(onClick)
link(onClick,5044424:doSend,[(226,265)(226,230)])
}


Редактировалось 1 раз(а), последний 2018-03-31 10:35:59
карма: 0

0
Ответов: 3745
Рейтинг: 619
#1595: 2018-04-02 10:52:23 ЛС | профиль | цитата
Что такое "ББ"? Судя по "На ББ стоит сервер" и "Сервер стоит на Windows 2003 Server", то сервер стоит на компьютере. Или на эмуляторе, который на компьютере?
1) Схема сервера?
2) Может брэндмауер что-то там чудит?
карма: 17

0
Ответов: 66
Рейтинг: 1
#1596: 2018-04-04 09:54:22 ЛС | профиль | цитата
Вот так работает, а схема сервера самая стандартная, ББ - большой брат (ПК)

Add(TCPClient,5044424,371,301)
{
link(Data,1368656:Value,[])
}
Add(Button,16437796,287,301)
{
Left=5
Top=5
Caption="Подключить"
Point(onClick)
link(onClick,5044424:doConnect,[])
}
Add(EditText,1368656,371,238)
{
Left=5
Top=145
Width=370
}
Add(Button,11846647,287,343)
{
Left=385
Top=145
Width=85
Height=27
Point(onClick)
link(onClick,5044424:doSendAsync,[(345,349)(345,321)])
}

карма: 0

0
Ответов: 3745
Рейтинг: 619
#1597: 2018-04-04 10:52:16 ЛС | профиль | цитата
Дмитрий писал(а):
а схема сервера самая стандартная
Netspirit писал(а):
сервер стоит на компьютере. Или на эмуляторе, который на компьютере?
То есть, сервер сделан в пакете Delphi или в пакете Android? Сервер пакета Android может требовать переработки.
карма: 17

0
Ответов: 66
Рейтинг: 1
#1598: 2018-04-04 14:24:56 ЛС | профиль | цитата
Да

Add(MainForm,2953706,21,105)
{
Width=620
Height=514
link(onCreate,5642851:doOpen,[(138,125)(138,251)])
}
Add(TCP_Server,5642851,147,245)
{
Port=1557
link(onRead,7896961:doCharset,[])
}
Add(ListBox,11322327,259,245)
{
Left=5
Top=5
Width=600
Height=245
}
Add(Charset,7896961,203,245)
{
Type=7
link(onCharset,11322327:doAdd,[])
}
Add(Edit,5968868,35,252)
{
Left=5
Top=255
Width=595
Text=""
link(onEnter,4840390:doCharset,[])
}
Add(Charset,4840390,91,259)
{
Type=6
link(onCharset,5642851:doSend,[])
}

карма: 0

0
Ответов: 3745
Рейтинг: 619
#1599: 2018-04-04 15:07:01 ЛС | профиль | цитата
Попробуй этот сервер: /topic/63600
карма: 17

0
Ответов: 220
Рейтинг: 5
#1600: 2018-05-06 18:52:38 ЛС | профиль | цитата
Установил все как в первом посте, и не компилируются примеры с папки. Некоторые компилятся, эмулятор запускается, появляется надпись ANDROID и через 30 сек. закрывается сам эмулятор.
Скрин с ошибкой. http://prntscr.com/jefukp
Папка res вообще пустая
Система Windows 7 32bit
Как это исправить?

Редактировалось 2 раз(а), последний 2018-05-06 20:31:31
карма: 1

0
Ответов: 3745
Рейтинг: 619
#1601: 2018-05-07 12:34:58 ЛС | профиль | цитата
Sersey писал(а):
Папка res вообще пустая
Так и должно быть - она очищается после компиляциии. Попробуй запустить HiAsm от имени Администратора - если компиляция проходит и файл *.apk появляется, значит надо дать полный доступ для "Пользователей" в свойствах папки C:\HiAsm.
карма: 17

0
Ответов: 220
Рейтинг: 5
#1602: 2018-05-16 11:26:01 ЛС | профиль | цитата
Скажите, а нет нового адреса обновлений, а то adasm.com не доступен. У меня с примеров все работает кроме примера с почтой, при компиляции много ошибок.
карма: 1

0
Ответов: 3745
Рейтинг: 619
#1603: 2018-05-16 12:18:12 ЛС | профиль | цитата
Обновил архив пакета в первом посте. Но по сравнению с предыдущим обновлением, там, вроде, ничего касательно почты не менялось.
карма: 17

0
Ответов: 220
Рейтинг: 5
#1604: 2018-05-18 21:07:08 ЛС | профиль | цитата
Вот делаю тестовый браузер, в общем тренируюсь, изучаю. Так не формируется строка по непонятным причинам, после нажатия кнопки "перейти" проверяется введен ли правильный адрес, если адрес не правильный формируется строка поиска в гугл, но FormatStr не добавляет слова с EditText. посмотрите если не сложно
Add(MainActivity,2953706,70,14)
{
AppName="Web Browser"
Caption="Web Browser"
SysName="Browser"
}
Add(Button,5832610,133,189)
{
Left=10
Top=5
Width=65
LayoutManager="horizontal2"
Caption="Назад"
Point(onClick)
link(onClick,5934398:doGoBack,[(201,195)(201,118)])
}
Add(Button,6762961,133,224)
{
Left=75
Top=5
Width=65
LayoutManager="horizontal2"
Caption="Вперед"
Point(onClick)
link(onClick,5934398:doGoForward,[(208,230)(208,125)])
}
Add(Button,2266389,70,84)
{
Left=140
Top=5
Width=70
LayoutManager="horizontal2"
Caption="Перейти"
Point(onClick)
link(onClick,1736902:doEvent1,[])
}
Add(WebView,5934398,238,84)
{
Left=5
Top=95
Width=485
Height=270
LayoutManager="vertical"
WidthMode=0
Point(doGoBack)
Point(doGoForward)
Point(Progress)
Point(Favicon)
link(URL,10583360:Var2,[])
}
Add(Button,5922273,133,119)
{
Left=210
Top=5
Width=65
LayoutManager="horizontal2"
Caption=""
Point(onClick)
link(onClick,5934398:doRefresh,[(183,125)(183,97)])
}
Add(ImageView,6936181,273,280)
{
Left=5
Top=30
LayoutManager="horizontal1"
HeightMode=1
FixedWidth="40px"
Clickable=0
Focusable=0
Enabled=0
ScaleType=5
link(Bitmap,5934398:Favicon,[(279,204)(265,204)])
}
Add(Button,10142193,133,154)
{
Left=275
Top=5
Width=65
LayoutManager="horizontal2"
Caption="Стоп"
Point(onClick)
link(onClick,5934398:doStopLoad,[(192,160)(192,104)])
}
Add(Hub,1736902,119,84)
{
InCount=2
OutCount=3
link(onEvent1,5934398:doLoadURL,[])
link(onEvent2,15869708:In,[])
link(onEvent3,2003490:doStartThread,[])
}
Add(LineBreak,13930476,84,280)
{
link(Out,10678353:doStart,[])
Primary=[15869708,63,-189]
}
Add(EditText,13425607,238,21)
{
Left=130
Top=30
Width=350
Align=2
LayoutManager="horizontal1"
Capitalize=3
SingleLine=1
Text="http://google.ru/"
Hint="Введите адрес сайта"
Point(onClick)
link(onClick,1985438:doWork2,[])
}
Add(Hub,16619865,245,280)
{
link(onEvent1,6936181:doBitmap,[])
link(onEvent2,6490313:doData,[(271,293)(271,223)(226,223)(226,153)])
}
Add(DoData,6490313,238,147)
{
link(onEventData,13519115:doEvent1,[(282,153)(282,71)(194,71)(194,27)])
link(Data,5934398:CurrentURL,[])
}
Add(Timer,10678353,133,280)
{
Interval=500
link(onTimer,1369233:doCallEvent,[])
}
Add(UIThread,1369233,189,280)
{
link(onEvent,16619865:doEvent1,[])
}
Add(LayoutLinear,4529266,70,140)
{
Name="horizontal1"
Orientation=1
Order=1
}
Add(LayoutLinear,225971,70,175)
{
Name="horizontal2"
Orientation=1
Order=2
}
Add(LayoutLinear,2232492,70,210)
{
Name="vertical"
Order=3
}
Add(LineBreak,2540819,70,294)
{
Caption="Стоп"
link(Out,10678353:doStop,[(120,300)(120,293)])
Primary=[551200,238,-266]
}
Add(Download,625962,343,98)
{
link(onInvalidURL,16134033:doCallEvent,[])
link(onIOException,10930691:doShow,[(394,118)(394,153)])
link(URL,4534249:Var2,[])
}
Add(GetDataEx,10583360,238,63)
{
link(Data,13425607:Value,[])
}
Add(FormatStr,8119266,490,112)
{
DataCount=1
Mask="https://www.google.com/search?q=%1"
link(onResult,6894889:doReplace,[])
link(Str1,4534249:Var3,[(496,68)])
}
Add(GetDataEx,4534249,343,63)
{
Angle=3
link(Data,10583360:Var3,[])
}
Add(Hub,13519115,210,21)
{
InCount=2
OutCount=1
link(onEvent1,13425607:doText,[])
}
Add(StrReplace,6894889,560,112)
{
SubStr=" "
DestStr="+"
link(onReplace,1088407:doEvent1,[])
}
Add(ToastNotification,10930691,406,147)
{
Text="Сервер недоступен"
}
Add(Hub,1088407,616,112)
{
link(onEvent1,13519115:doEvent2,[(635,118)(635,76)(198,76)(198,34)])
link(onEvent2,1736902:doEvent2,[(635,125)(635,111)(107,111)(107,97)])
}
Add(Thread,2003490,301,98)
{
link(onStartThread,625962:doDownload,[])
}
Add(Hub,4279307,462,105)
{
link(onEvent1,1985438:doWork3,[(481,111)(481,74)(291,74)])
link(onEvent2,8119266:doFormat,[])
}
Add(HubEx,1985438,287,28)
{
link(onEvent,551200:In,[])
}
Add(UIThread,16134033,406,105)
{
link(onEvent,4279307:doEvent1,[])
}

Подсказок к кнопкам и картинкам не как нельзя добавить?
Пока с тем что есть разберусь, а дальше попытаюсь java учить, хоть и знаю что язык сложный, но приведется.
Я использую эмулятор BlueStacks

Редактировалось 2 раз(а), последний 2018-05-18 23:38:12
карма: 1

0
Ответов: 220
Рейтинг: 5
#1605: 2018-05-20 21:38:49 ЛС | профиль | цитата
Дайте компоненты, в первом посте написано, но все ссылки нерабочие, может завалялись,Дополнительные компоненты от GreM

Редактировалось 1 раз(а), последний 2018-05-20 21:47:11
карма: 1

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)