În primul rând, trebuie să adăugăm o componentă responsabilă de conectarea la MS Agent Server. Implicit, această componentă nu este prezentă, cel puțin în Delphi 7 nu este prezentă exact. Prin urmare, trebuie să o adăugăm.
De ce avem nevoie de acest lucru și totul este simplu, executați comanda Component-Import ActiveX Control ... În listă găsim Microsoft Agent Control 2.0. apoi faceți clic pe butonul "Install" și instalați-l ca o componentă obișnuită. Apoi, noua noastră componentă instalată ar trebui să apară în fila ActiveX. Trebuie să fie ultima din listă (TAgent). Instalați-o pe formularul nostru, cu excepția cazului în care am instalat pe formularul TButton - 2 bucăți, de ce 2, pentru că vreau să arăt cum vă puteți arăta caracterul nostru în două moduri. Acum, principalul lucru, în primul moment, este conectarea la MS Agent Server. Pentru aceasta, selectați componenta TAgent și setați proprietatea Connected la True. sau scrieți următorul cod în evenimentul OnCreate:
Ei bine, jumătate din muncă este făcută, suntem conectați la server, atunci trebuie să afișăm cumva acest personaj pe care l-ați ales. Apropo de alegerea personajelor de pe Internet este foarte plină de caractere diferite, puteți găsi. Sau, pentru a seta standardul, e suficient să intri în dosarul MS Office instalat și să găsești acolo fișiere, * .acs extensions. După aceasta, începem încărcarea și afișarea caracterului nostru. Deci, la primul buton, evenimentul OnClick va scrie următorul cod
Chrr - responsabil pentru stocarea personajului pe care am ales să-l adăugăm programelor necesare, Req - responsabil pentru acțiunile efectuate de personaj, adică mutarea, animația, conversația și așa mai departe, adică pentru acțiunile sale. Ce facem mai intai sa incarce fisierul agentilor ms si sa-i dea un nume, in acest caz este ROCKY. Apoi, asociem Chrr cu numele personajului nostru. Folosind metoda Show, vom arăta caracterul nostru, și folosind metoda Speak, specificăm ce să spunem personajului nostru. În plus, putem muta personajul nostru folosind metoda MoveTo
Setați coordonatele (x, y) și viteza de mișcare. Este foarte ușor să faceți o mutare la tastă sau, mai precis, să controlați caracterul folosind tastele de tastatură. Să începem cu încă 2 variabile întregi. ei vor fi responsabili pentru stocarea coordonatelor actuale ale personajului nostru. Acum instalați componenta TActionList. care se află pe fila Standard. Apoi, faceți dublu clic pe această componentă și în fereastra rezultată creați 4 acțiuni, le puteți apela, nu voi, ei vor fi chemați de mine standard
În continuare, pentru fiecare acțiune din proprietatea ShortCut, setați cheia, după ce faceți clic pe care caracterul nostru se va mișca, am făcut-o
Acum, făcând clic dublu pe Acțiune, apăsăm și apare procedura de procesare și pentru fiecare procedură scriem mișcarea caracterului nostru în funcție de anumite coordonate.
Articole similare
Trimiteți-le prietenilor: