chaplin.u@gmail.com

Я имею ввиду Buttton как говорит Леонид Якубович : в этом слове есть 3 такие буквы значит вам полагается шкатулочка...

может проблема в этом : locMessageForm.Buttton.ModalResult := mrOk;

что тут на форуме происходит ? получается что проще в книжках найти ответ. не верю что никто не знал об TTabTransition::Slide

так это для дельфинов а я на бильдере..

Есть пример TTabbedwithNavigationForm . когда я провожу пальцем в сторону то табы меняются но скачком ( сначала один таб а потом сразу второй) . как сделать чтобы это было плавно т.е чтобы видно было оба таба сразу.

решение как я и предполагал простое. У ListBox есть свойство GroupingKind. Так вот по дефолту оно стоит Plaint (без зазоров) а когда меняешь на Grouped появляются полосочки как я и хотел. странно что никто на форуме этого не знал...

Освежите в памяти для того чтобы аппликация была совместима с Лоллипопом ( Андроид 5) какие версии SDK NDK должны стоять ?

ага и сидим 15 секунд и ждём может чего произойдёт. И я знаю что - юзер вырубит апликацию и пошлёт матом того кто это написал.

Я так понимаю вот уже получен Result := FJGatt.discoverServices; и если " if Result then begin FServicesEvent.WaitFor(BLEDiscoverServicesTimeout); Result := FLastStatus = TBluetoothGattStatus.Success; зачем опять брать Result и сравнивать с FLastStatus := TBluetoothGattStatus.Failure; чёто наворотили они.

так можно на дельфях писать ? правописание правильное ?

дык и я в тот огород камень

а если нет - то будет стоять 15 секунд ???? это что за логика ? я поменял на 500 ( полсекунды ) и стало гораздо лучше. а это что за перл ? Result := FLastStatus = TBluetoothGattStatus.Success;

что-то тут не ладно с логикой : function TAndroidBluetoothLEDevice.DoDiscoverServices: Boolean; const BLEDiscoverServicesTimeout = 15000; begin InternalGetGattClient; Result := False; if GetIsConnected then begin FServicesEvent.ResetEvent; FServices.Clear; FLastStatus := TBluetoothGattStatus.Failure; if FRefreshMethod and FForceRefreshCachedServices then FJGatt.refresh; Result := FJGatt.discoverServices; if Result then begin FServicesEvent.WaitFor(BLEDiscoverServicesTimeout); Result := FLastStatus = TBluetoothGattStatus.Success; if Result then begin InternalGetServices; FReconnected := False; DoOnServicesDiscovered(Self, FServices); end; end; end; end; --------------- не могу понять зачем задержка на 15000 ?

вроде всё путём : 1.BluetoothLE1->DiscoverDevices(ScanningTime); - находит устройство 2.FBLEDevice->Connect(); - подключается 3. FBLEDevice->DiscoverServices(); - читает сервисы но периодически застревает Кто-то знает что может быть ?

я делаю для Андроида и там такие потоки слёз програмистов... Два телефона с одной и той же версией а работают по разному.... так что Sleep(N) самое удачное решение. Спасибо !

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

В программе данные не успевают обработаться. нужно сделать задержку на секунду. поставить цикл не хотелось бы чтобы не загружать прибор. может кто подскажет мудрое решение.

примерчик плиз. я ужастно люблю коды ( желательно для бильдера).

ok, сервер сторонний а в радосной студии есть решение для клиента ? компонента к которой обращаться ? пример ?

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

Если вопрос задан в теме TListBox -> стилизация то видимо речь идёт об TListBox. Курсы я не кончал так что стиль поменять не могу. если это так просто - сделайте это пожалуйста в качестве тренировки.

а какие данные ещё нужно ? у стандартного листбокса нет каких-то полосок между итемами а у этого есть. можно конечно ставить панели на каждый итем но потом придётся обращаться не детям а к внукам а это не удобно. что такое кастомный итем ? может люди закончившие курсы по стилям могут кастомнуть стиль листбокса ? есть желающие ?

Как сделать разделители между итемами. Как на картинке.

устройство тут не причём. я повторюсь что речь идёт о доступе к функции которая описана в Androidapi.JNI.Bluetooth.pas. Должны быть стандартные способы обратиться к этой функции. Кстати для проверки можно обратиться к любой другой функции (которую ты можешь проверить ) описаной в этом или другом файле в этой-же директории.

если дело в оплате то можно договориться.