Posts by Patrick Alves • 434 points
11 posts
-
1
votes2
answers365
viewsA: Convert Header C/C++ to Delphi
To convert DLLIMPORT VListDevices(const char*** devices,int *N) The function statement was thus: function VListDevices(devices: PPCharArray; N: PInteger): Integer; stdcall; To call and access their…
-
2
votes3
answers722
viewsA: Count in Firebird 3.0 Bigint X Firebird 2.5 Integer
In Firebird I believe I have no way to configure this, see on Release Notes pag. 89. Unfortunately in this case you will have to cast or if you are using the Fields added on qry or clientdataset I…
-
1
votes1
answer221
viewsA: Error passing script from Firebird database to Postgresql
If you have the same structure in both banks and are migrating from one to the other, you may be using the tool Fullcopyconvert which is paid for but I think the trial version can help you. If it is…
-
1
votes1
answer87
viewsA: Set font color in cell in Broffice
It is really necessary to convert the color, try with this function: function SwapColor(nColor: TColor): TColor; var c1, c2, c3: byte; begin c1 := (nColor and $000000FF); // $..0000FF c2 := (nColor…
delphianswered Patrick Alves 434 -
3
votes3
answers3550
viewsA: How to make your Android virtual keyboard visible/invisible while Tedit is in focus
Try using the global variable VKAutoShowMode := TVKAutoShowMode.vkasAlways, so that the keyboard always appears. Also be sure to include Unit FMX.Types in the project, as this global variable…
-
1
votes1
answer469
viewsA: Assign value to a Boolean variable according to selected Radio Button
You can check the property Checked of RadioButton. It would be something like that: if RadioButton1.Checked then ShowMessage('Ativo!') else ShowMessage('Inativo!'); In your case, by uploading…
-
1
votes2
answers365
viewsQ: Convert Header C/C++ to Delphi
The intention is to consume a dll of biometrics http://www.veridisbiometrics.com/index.php/produtos/biometric-sdk-free I thought the best way would be to convert the headers they provide (not a good…
-
0
votes2
answers1047
viewsA: Generate Sequence Records with Clientdataset (Multiuser)
Well, after a few tests, I reached a point where I was able to solve it as follows: I use a Trigger before Insert (Firebird) to generate the sequence. The code looks like this: SELECT…
-
1
votes2
answers1047
viewsQ: Generate Sequence Records with Clientdataset (Multiuser)
Guys I have the following scenario: Order Table with Company, Numeropedido that are primary key. Other fields like Customer, Value, ect... I have an Sqlquery, a Datasetprovider and a connected…
-
7
votes1
answer333
viewsA: Delphi estate
So!! Following @Pagenotfound’s tips I did it this way: First I created a component for each connection: TRede = class(TComponent) private FPorta: Integer; FIP: string; published property IP: string…
-
10
votes1
answer333
viewsQ: Delphi estate
I have a component that has the function of connecting to a specific hardware. It connects through the network or serial port. Something like the code below: TConexao = (conRede, conSerial);…