Studiu de caz serviciu simplu datasnap xe - Calculator - software-ul

Rezumat: Articolul se ocupă cu crearea unui simplu serviciu Delphi XE, de exemplu, „calculator“, care implementează funcțiile de bază ale calculelor aritmetice. Acest pas cu pas studiu de caz este foarte simplu, astfel încât, chiar novice programatori Delphi va fi capabil să-l joace. Scopul acestui studiu de caz este de a face cunoștință cu procesul de creare a clienților și servere DataSnap. simplu „calculator ca serviciu“ nostru înseamnă că aplicațiile client și server. Ambele programe - Delphi VCL Forms Win32, și de a comunica folosind protocolul TCP / IP. Sperăm să vă placă!

Primul pas este de a crea o nouă aplicație server DataSnap folosind vrăjitorul „DataSnap Server“.

Porniți Delphi XE.

Pe prima pagină, lăsați implicit „Tipul proiectului“ opțiune cum să „VCL Forms Application“.

Pe a doua pagină a expertului și lăsați opțiunile deja selectate. În continuare, vom înlocui metodele demonstrative (metode de propoziții) opțiunile noastre de server.

În a treia imagine, vom părăsi valoarea implicită „211“ pentru numărul de port TCP / IP. Încercați întotdeauna să inspecteze porturile disponibile prin apăsarea butonului „Port Test“.

Pe ultima pagină, avem de asemenea, va utiliza opțiunea implicită pentru a selecta clasa de bază ca „TComponent“, care va fi clasa noastră care pune în aplicare metodele de server.

Dați clic pe butonul „Finish“, expertul va crea un nou proiect cu trei module.

Salvați întregul proiect opțiunea "File -> Save All".

Creați un dosar nou pentru toate fișierele pentru un anumit studiu de caz „C: \ DataSnapLabs \ SimpleCalc“.

Păstrați principala formă de aplicare ca „FormServerUnit“, în timp ce pentru alte nume, utilizați numele standard - „ServerContainerUnit1“ și „ServerMethodsUnit1“ - și de a salva proiectul ca „SimpleCalcServer“.

În această etapă în fereastra Delphi Project Manager, vezi imaginea de mai jos:

Deschideți modulul „ServerMethodsUnit1.pas“ și pune în aplicare funcționalitatea unui serviciu simplu care efectuează operații aritmetice. Înlocuiți metode demonstrative adăugat de master ( "EchoString" și "ReverseString"), la datele de opțiunile noastre "Add" ( "fold"), "Scădeți" ( "scade"), "Multiply" ( "multiplica") și "Divide" ( "împărțit").

Codul sursă pentru modulul „ServerMethodsUnit1“ ar trebui să arate așa:

Sunteți sunt puse în aplicare pe deplin serverul nostru. Pentru a implementa aplicația client, serverul trebuie să fie difuzate.

Selectați „Run -> Run Fără Debugging“ pentru a rula serverul (în afara debugger) și a minimiza fereastra sa.

Nu închideți aplicația server până la sfârșitul studiului de caz.

Faceți clic dreapta pe grupul de proiect în cadrul Managerul de Proiect și selectați „Add New Project“.

Faceți clic pe "OK". Pentru grupul de proiect actual pentru a adăuga un nou proiect.

Urmează păstrarea noului proiect „File -> Save All“.

Selectați directorul creat pentru a stoca fișierele proiect server-ului, și de a salva formularul principal la cererea clientului ca „FormClientUnit“, proiectul în sine ca un „SimpleCalcClient“, precum și întregul grup de proiect „SimpleCalcGrp“.

Acum, fereastra Manager de proiect ar trebui să arate astfel:

Asigurați-vă că aplicația client, proiectul este activ, apoi selectați „File -> New -> Altele“, în caseta de dialog „elemente noi“, selectați „Modulul DataSnap Client“.

Ca și ultima dată, vă rugăm să păstrați toate opțiunile implicite din expert.

Pe prima pagină, lăsați un „server de locație DataSnap“ ca „serverul local“.

DataSnap Serverul nostru este un „stand alone“ (aplicație independentă independentă), astfel încât doar să faceți clic pe „Next“.

Am fost de acord să utilizeze „TCP / IP“ ca protocol, astfel încât să păstreze opțiunea selectată.

Dați clic pe „Test Connection“, pentru a verifica dacă serverul este de fapt „asculta“ la portul 211, și apoi faceți clic pe „Finish“.

Wizard pentru a adăuga două unități la cererea clientului nostru „ClientClassesUnit1“ și „ClientModuleUnit1“.

Ultima sarcină în acest studiu de caz este de a pune în aplicare interfața aplicației client.

Acum, sub formă de cod client trebuie să utilizați în mod corespunzător tehnicile pe ecran (furnizat) prin „ClientModule1.ServerMethods1Client“ proprietate. Aceste metode au aceleași nume și semnături precum și metodele implementate pe server.

În continuare, punerea în aplicare a formei principale a aplicației client.

În cele din urmă, forma mea este după cum urmează:

Probabil, nu trebuie să-ți spun cum să-l joace!

Acum vezi cât de ușor este de a crea un server și clienții DataSnap și folosind Delphi XE J

In acest studiu de caz, am folosit Delphi XE pentru a construi un serviciu simplu DataSnap XE un calculator care la nivel de implementare reprezintă o aplicație Win32 în comunicarea între care folosește protocolul TCP / IP.