DataSnap + FirDac (interface) three layers of mobile development
1, USES the framework design Frame, a main Form of all other forms of Frame, reducing the size of the APK
2, solve the Frame between the use of the Menu button, switch to the Frame is the Menu Key events
3, solve the Frame using the edit box at the bottom of the keyboard stopped problems
4, using the data control FirDac, all is the interface of using
5, solve the pictures, upload the file to a server file
6, to solve the image, upload the file to a server database

Now only the login function, and employee files (add, modify, delete, upload pictures)

APP configuration connection Settings
Server: 122.0.72.12
Account: admin password: admin

Download: http://pan.baidu.com/s/1i34cLTz

CodePudding user response:

Praise a


What is SQL script functions

CodePudding user response:

Mainly solve the mobile end do not need to write too many SQL statements, call directly input the name of the SQL script, automatic query, and increase the query conditions

CodePudding user response:

Very good, with what is control

CodePudding user response:

DataSnap Delphi's own

CodePudding user response:

Attention, thank you.

CodePudding user response:

Is not the source code,,,,,,,,

CodePudding user response:

CodePudding user response:

is used to earn some living expenses, sorry

CodePudding user response:

The building Lord, ask a question:
The unit Unit1;

Interface

USES the
System. The SysUtils, System. The Types, System. UITypes, System. Classes, System. Variants,
FMX Types, FMX Controls, FMX. Forms, FMX. Graphics, FMX. Dialogs,
FMX. Controls. The Presentation, FMX StdCtrls, FMX. Platform. Android, FMX. Helpers. Android.
//Androidapi.JNI.Net,
//Androidapi. JNI. GraphicsContentViewText,
//Androidapi. JNI. JavaTypes, FMX Objects, System. Generics. Collections, FMX. Ani, FMX. Effects;

Type
TForm1=class (TForm)
For: TButton;
Procedure Button1Click (Sender: TObject);
Private
{Private declarations}
Public
{Public declarations}
end;


Procedure TForm1. Button1Click (Sender: TObject);
The begin
If MessageDlg (' confirm exit? ', TMsgDlgType mtConfirmation, [TMsgDlgBtn mbOK, TMsgDlgBtn. MbCancel], 1)=mrOK then
ShowMessage (' ');
end;

Development environment is xe8, commissioning five inches in huawei mobile phones and Android version is 4.4.2, as for the,
Pop-up Blocking "dialogs not implemented on this platform", this is what reason, hope to solve, thank you.

CodePudding user response:

Source Shared?

CodePudding user response:

Reply: yan9708, tip framework method

MessageDlg (' are you sure you want to exit? ', TMsgDlgType mtInformation,
[TMsgDlgBtn mbOK, TMsgDlgBtn mbCancel], 0,
Procedure (const AResult: TModalResult)
The begin
If AResult=mrOK then

The Close;
End);

CodePudding user response:

Delphi box part has Shared the mobile framework, you can go to download

CodePudding user response:

Heard that WeChat want to open application number, we have a market to develop the APP?