Quantcast
Channel: Embarcadero Community - Embarcadero Community
Viewing all 1888 articles
Browse latest View live

Getit -- LifeTrak Move -- Berlin 10.1

$
0
0

I tried to run the LifeTrakPas demo and it won't discover the LifeTrak Move device.

Yet the LifeTrak is paired to the development PC show up when scanned by the BTLE component.

I can't test with Berlin 10.2 since Getit is empty and I have not seen a fix yet.

 

Has anyone been able to run the LifeTrak demo successfully yet ?

 

Clark


Unable to install android app to emulator: 2

$
0
0

I only created a single device in the AVD manager but see 2 devices in the IDE. 

I chose the bogus target device since it did not have a (x) on it.  Here's the error I get when I try a manual install:

C:\Users\Public\Documents\Embarcadero\Studio\19.0\CatalogRepository\AndroidSDK-2433_19.0.26309.314\platform-tools>adb install "C:\Dev\Delphi\Delphi 10\Android Test\Android\Debug\AndroidTest\bin\AndroidTest.apk"
Failed to install C:\Dev\Delphi\Delphi 10\Android Test\Android\Debug\AndroidTest\bin\AndroidTest.apk: Failure [INSTALL_FAILED_NO_MATCHING_ABIS: Failed to extract native libraries, res=-113]

 

Foreground Service In FMX Android Development

$
0
0

Dear Sir,

I am trying to create a service application in FMX Android (Delphi XE10.1 Berlin Update 2) but when the host app is in foreground or in background everything works well. However, if I close the host app service stops as well.

I know that in android if the service is declared to run in the foreground, it's rarely killed. So is there a way to create a foreground service in FMX and if yes can you provide us an example ?

 

Thank you very much in advance for your answer.

10.2 Tokyo handles BLE discovery on Android differently than 10.1 Berlin.

$
0
0

(My apologies for this lengthy entry)

I have had some problems getting BLE to work according to my needs on both iOS and Android, but after some work arounds (see my comment and issues on quality.embarcadero.com: RSP 16891, 17763, and 17764) things have worked quite well (although BLE on iOS seems more stable than on Android).

Having switched to Tokyo, However, I have had to revise my handling of BLE device discovery, and I wonder if anyone else has noticed this change, if my original way of handling things (which was convenient) was fundamentally wrong, and/or if the behavior on Tokyo is as intended and by design or a bug.

In my application, I often need to "rediscover" a BLE device that was "defined" a long time ago (often in a previous app session). I handle this by storing the device name and MAC address so that I quickly can run discovery using a TBluetoothLEScanFilterList with the proper LocalName and DeviceAddress at some later point in time when I need to communicate with the device.

Using Berlin, I simply used a procedure like InitializeMyDevice below where BluetoothLE1 is a TBluetoothLE, FMyBleDevice is a TBluetoothLEDevice, and BluetoothLE1 has an OnDiscoverLEDevice = BluetoothLE1DiscoverLEDevice. Everything works fine: if the device is found, descovery stops immediately; if not, discovery times out.

Using Tokyo, however, the same code doesn't work:  

1. during Application.ProcessMessages the bleMainDiscoverLEDeviceis never called and the discovery always times out;

2. after timeout and exit of InitializeMyDevice all calls to bleMainDiscoverLEDeviceis do occur, but this is "too late".

Of course, this issue can be circumvented using, e.g., a second procedure to capture the result, but the "Berlin" method was quite simple and convenient.

So, hopefully some of you can have a look at the code below and explain to me what's going on!

Thanks in advance /Per

Code:

procedure BluetoothLE1DiscoverLEDevice(...)

begin

  // Double check

  if ((ADevice.DeviceName = MyDeviceName) and (ADevice.Address = MyMacAddress)) then

  begin

    FMyBleDevice := ADevice;

    BluetoothLE1.CancelDiscovery;

  end;

end;

function InitializeMyDevice: Boolean;

var

  LBleFilterList: TBluetoothLEScanFilterList;

  LBleFilter: TBluetoothLEScanFilter;

begin

  LBleFilterList := TBluetoothLEScanFilterList.Create;

  LBleScanFilter := TBluetoothLEScanFilter.Create;

  LBleScanFilter.LocalName := MyDeviceName;

  LBleScanFilterList.Add(LBleScanFilter);

  LBleScanFilter.DeviceAddress := MyMacAddress;

  LBleScanFilterList.Add(LBleScanFilter);

  try

    FMyBleDevice := nil;

    BluetoothLE1.DiscoverDevices(3000, LBleScanFilterList);

    while (FMyBleDevice = nil) do

       Application.ProcessMessages;

     Result := (FMyBleDevice = nil);

  finally

    LBleScanFilterList.Free;

  end;

end;  

RAD server apache installation

$
0
0

Hello,

I'm trying to deploy Rad Server 10.2 under apache on linux.

I installed Interbase xe7 and register my Rad server licence.

 When running EMSDevServerCommand it works correctly I can can access default ressources and a custom ressources.

 

But when i try to access EMS ressource throug apache i get a message

{"error":"Resource not found: \/version","description":"The request does not identify a known application, resource, endpoint, or entity"}

This message tells me ems-server is running as this outpout comes from ems but it seems it is not able to find any ressource.

Does anyone have an idea ?

 

Thanks

 

Delphi web broker bridge - is this really completely broken? If so, what do we use now?

$
0
0

We have a delphi 3-tier EDP system currently in Delphi XE version. It has worked well with SOAP using a web-server created using the web broker bridge. We are trialling 10.2 Tokyo, and it seems that anything that looks like it will make a web API is absolutely broken.

When we try to create a simple web application using the wizards provide, the IDE actually CRASHES.

Maybe we are simply too stupid to know what we are doing - I would love for this to be true.

If it is not broken, what must we do to get the trial IDE to run with a web client-server type app? 

If this is utterly and irretrievably broken now, and if it will not be fixed by Embarcadero, what must we use now to do this 3-tier type work.

Thanks.

 

SIFT, SURF and ORB in C++ Builder

$
0
0

Hello, I'm in a research project for key points detection and recognition in document images and i need the implementation of SIFT, SURF and ORB in C++ Builder does it exist ?  

Delphi 10.2 Tokyo: Components do not show some images from TimageList on Android

$
0
0

 

I tried to compile and run original sample application on Android tablet - “ListVieImageIndex”. I found out that some rows of TlistView did not show any picture. Then I created simple program with several buttons, which give image from TimageList and behaviour for similar – some buttons were without image.

Same applications compiled in Delphi 10.1. Berlin work well.

Next problem with Delphi is caused by version of Android. It is not possible on Android v.7 to debug a program, because after installation on Android and start process launching is debugging stopped with error: “run-as: Could not set capabilities: Operation not permitted”.

 

 

 

 

 

 


 

 


Unable to open .bpg file in starter edition

$
0
0

I'm unable to open .bpg file in starter edition of delphi.May I know how to open such kind of files in delphi

Tethering: How to know who sended a transient Resource (RemoteItem)?

$
0
0

The server needs to response to a specific profile that sended it a transient resource, but the property "Profile" of AResource parameter is null.

 

How to know who sended to Server the transient resource?

diskfree() gives errors if polling an optical drive in which a cd has been inserted then ejected

$
0
0

I have a routine that checks for diskfree and disksize on my logical drives. This also checks the two opticals I have. Everything worked fine with nothing in the drives. I then tested the procedure with a CD in the drive, and it reported a read only drive - again, fine. I then ejected the CD, ran the procedure again and it comes up with an error message every time, for both diskfree and disksize, and for both my optical drives. The error message is that there is no disk in the optical drive (which is, of course, correct!) - I have attached a grab of it (I think?) Repeatedly clicking "Continue" does progress the application.

I tried putting the diskfree and disksize calls in a "try-except" but it still causes the error. I closed Delphi and relaunched, but the error is still there, so I restarted Windows which fixed it. This is why I think it a Windows 10 issue. It's like when the optical drive is accessed with a disk in it, something is set which is NOT reset when the cd is ejected. Or am I being plain stupid?

To keep my program running, I have had to code in a skip of the optical drives, when I would rather the application detected it/them with or without media and before/after media was inserted, but didn't generate the error message. Is there a Delphi command to reset whatever it is causing the issue? Or does anyone have a different suggestion? Or just tell me I am being daft.

I am using Delphi 10 Starter Edition on Windows 10 64 bit.

Graham.

Lack of beacons events on Delphi Android

$
0
0

Hello,

Beacon events on Delphi Berlin Upd. 2 + Android Apps get fired occasionally. As you can see on the image, there is no activity in 22 seconds. I tried to set TBeaconManager.ScanningSleepingTime to 0 and reduce TBeaconnmanager.ScanningTime to 100 with no success. BTW, the App works nicely on Windows and iOS, the maximum inactivity I receive is 2 seconds in both cases.

In order to gain the maximum activity the event OnCalcDistances is also trapped.

It is not a device (Nexus 6p) problem since the 'Locate' App from Radius Networks also updates the beacons information on every second.

I'm really exhausted with this bug. Any help is really appreciated.

Regards,

Screenshot

Store option on Win10 provisioning tab disabled

$
0
0

- My operating is Win10

- My Delphi version is DX 10.2 Tokyo Enterprise

- I have installed the windows 10 SDK

- I try to create an application for the windows store

- I can create an "Ad hoc" appx package

- When I try to click the "Store" option on the provisioning tab, nothing happens, seems to be disabled

Does anyone know why this is option is disabled?

 

Error position top button after alter anchors

$
0
0

I have a TPanel with a TButton.

TPanel heigth = 77

Align = altop
BelvelKind = bkFlat or bkTitle or bkSoft


Tbutton property

top = 25

Alter property TButton

Anchors
akLeft = false
akTop = false
akRight = true
akBottom = true

After saving the form and closing the IDE form and reopening the form in the IDE, the top of the TButton changes to 21.
If it close again and open it will decrease the top by 4.

Thanks.

TListView crash on FilledListItem binding

$
0
0

 

i read some sample using FilledListItem on binding,

but i always get crash,

any help,

sample include here listview_always_buggy

delphi berlin

 

procedure TForm1.LinkListControlToField1FilledListItem(Sender: TObject;

  const AEditor: IBindListEditorItem);

var

  LItem: TListViewItem;

begin

  if AEditor.CurrentIndex > 0 then

  begin

    LItem := ListOrder_H.Items[AEditor.CurrentIndex];

 

    LItem.Objects.DetailObject.Font.Size := 10; // crash here

    LItem.Objects.AccessoryObject.Visible := False;

 

    LItem.Objects.TextButton.Enabled := False;

    LItem.Objects.TextButton.Visible := False;

 

    if FDMemTable1.Active = True then

      if FDMemTable1.RecordCount > 0 then

      begin

        if FDMemTable1.FieldByName('validasi_terkirim').AsString <> '' then

        begin

            LItem.Objects.AccessoryObject.Visible := False;

            LItem.Objects.TextButton.Enabled := False;

            LItem.Objects.TextButton.Visible := True;

            LItem.ButtonText := 'Sdh dikirim';

        end

        else

        begin

          LItem.Objects.AccessoryObject.Visible := False;

          LItem.Objects.TextButton.Enabled := False;

          LItem.Objects.TextButton.Visible := False;

          LItem.ButtonText := 'Open';

        end;

 

      end;

 

      //LItem.Objects.ImageObject.Bitmap.Assign(Image1.MultiResBitmap[1].Bitmap);

  end;

end;

 


Code Completion -- 10.2

$
0
0

While I can build and deploy to Android, code completion is broken.

All the System and FMX units indicate as being unknown.

Have to manually type everything.

Anyway to fix this without doing another re-install etc ?

Have a tight deadline and really need to get the code out to the customer.

Would use 10.1 but it won't run on Android without using up a high percent of the CPU cycles.

Worked out that 10.2 used a tenth of what 10.1 did for the sensors I am using.

FYI for comparison 10.1 used ~50% and 10.2 ~5% running the same code.

 

The classic VCL Ribbon controls are not on GetIt for Delphi 10.2 Tokyo

$
0
0

Any ideas on when this may be added?

Delphi mswinsck.ocx issue

$
0
0

I have applications using 'mswinsck.ocx' file for windows messages. My 'mswinsck.ocx' file is registered from 'C:\Windows\SysWOW64' folder.

All 32bit applications are working fine with this ocx file.

Now I am migrating my Delphi applications from 32bit to 64bit.

Should I require 64bit ocx file to run 64 bit exes? I downloaded one and tried to register from system32 folder but got following error message:

"Class not registered"

I do not have code files of ocx file.

Asynpro – Link Error – Adselcom.dfm

$
0
0

Hello,

I am using Asynpro for seriell communication and everything works.

My project must be executable without DLL, so I change the following project settings.

Project-C++-Linker

With dynamic RTL left = false

Packages-Runtime-Packes

Link with runtime packages = false

After that I try to complie and following errors occur.


Error: File Adselcom.dfm not found

Error: Can not execute link


My question is, what can I do to remove these errors?

Or how can I compile my project, that no DLL are needed to execute.


Thank you for your help.

AsynPro linker problems

$
0
0

I´m using RAD C++ 10.2 Tokio to create a program VCL 32bits. The program compiles and runs well until... I need to manage serial communications, so I have installed the free tool AsynPro. As soon as I add non-visual component "TApdComPort" named "ApdComPort1". The link fails to finish the linking. The message is:   [ilink32 Error] Error: Unable to open file 'ADSELCOM.DFM' [ilink32 Error] Error: Unable to perform link   I have tested with RTL enable or disabled. I have tested with Run Time Packages false/true. In all this cases, the error continues appearing. I have checked the "#include "AdPort.hpp"" line is in Header of my file.   Can anybody help me ??     Regards, Daniel

Viewing all 1888 articles
Browse latest View live


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>