Versiune completa:Grafica In Borland Pascal
Daca puteti sa-mi imi dati cateva sugestii despre cum as putea realiza colorarea meniului de rulare sau despre cum pot desena linii in acelasi meniu .
ce legatura are un arbore binar cu meniul de rulare? Si daca tot veni vorba, ce intelegi tu prin "meniu de rulare"? Ce face, in linii mari, aplicatia in care vrei sa introduci aceste grafice (ca sa stim cum le integram)?
Am un fisier in care am memorat vectorul de "tati" al unui arbore binar.Din acest fisier citesc arborele si apoi vreau sa il desenez prin metoda injumatatirii ecranului.In JAVA am reusit destul de simplu:pe un applet cu 2 butoane si cateva text field-uri.Insa in pascal nu stiu prea multa grafica.(ma refer la desenare pe baza de coordonate si la crearea unei intrerfete cat mai simple si mai manevrabile)
Dumb question: daca ai reusit in Java, de ce te mai chinui sa faci in Pascal?!? 
Pascal is dead and buried... R.I.P. ...
Pascal is dead and buried... R.I.P. ...
Am de facut o tema .... 
Poate Borland Pascal e mort da' sa stii ca Pascalul ca limbaj de programare traieste. De Delphi ai auzit ?
Acum la problema cu arborii... Nu stiu exact ce vrei sa desenezi, dar daca ai probleme cu initializarea modului grafica si cu a desena niste linii si puncte atunci te pot ajuta.
Acum la problema cu arborii... Nu stiu exact ce vrei sa desenezi, dar daca ai probleme cu initializarea modului grafica si cu a desena niste linii si puncte atunci te pot ajuta.
Am auzit si de Delphi(are aceeasi sintaxa ca si pascalul).Nu stiu de unde sa iau sintaxa pentru grafica in Pascal.Stiam ceva insa nu mai imi aduc aminte.Daca ma poti ajuta trimite-mi un raspuns pe mail.
De ce sa trimit e-mail cand pot scrie aici pentru toata lumea
Asa.
Grafica in Borland Pascal se bazeaza pe Borland Graphic Interface (BGI).
Ca sa poti desena ceva trebuie sa initializezi mai intai modul grafic si cand termini cu el trebuie sa il inchizi.
Pentru asta:
Initializare: initgraph
Inchidere: closegraph
Dar inainte de asta trebuie sa ai grija sa incluzi unit-ul pentru grafica, adica Graph. Treaba asta se face cu uses Graph
si o bucata de cod:
Asa.
Grafica in Borland Pascal se bazeaza pe Borland Graphic Interface (BGI).
Ca sa poti desena ceva trebuie sa initializezi mai intai modul grafic si cand termini cu el trebuie sa il inchizi.
Pentru asta:
Initializare: initgraph
Inchidere: closegraph
Dar inainte de asta trebuie sa ai grija sa incluzi unit-ul pentru grafica, adica Graph. Treaba asta se face cu uses Graph
si o bucata de cod:
| CODE |
Program Grafica; Uses Crt,Graph; Var GraphicsDriver, GraphicsMode, ErrCode : Integer; Begin GraphicsDriver := Detect; InitGraph(GraphicsDriver, GraphicsMode,''); ErrCode := GraphResult; If GraphResult <> grOK then Begin ClrScr; Writeln('Eroare la initializare: ',GraphErrorMsg(ErrCode)); Readln; Halt(1); End Else Begin Randomize; SetColor(Random(15) + 1); OutTextXY(20,20,'Bla Bla. Grafica in Pascal'); Readln; End; CloseGraph; End. |
Atentie la InitGraph. Al treilea parametru e '' doar daca fisierele cu extensia *.BGI(cel mai probabil de EGAVGA.BGI o sa ai nevoie) e inclus corect de prin setari (pe undeva la DIrectories, nu mai tin minte sau daca e in directorul curent in care se afla programul. Daca e in alta parte trebuie sa scrii explicit directorul: InitGraph(GraphicsDriver, GraphicsMode,' 'C:\BP\BGI');
P.S. Iti vine sa crezi ca treaba asta am facut-o ultima oara acum vreo 7 ani ? Si inca mai tin mine....
Sau poti sa dai: www.google.com si sa scrii acolo: Pascal initgraph
| QUOTE (thext @ 5 Jun 2004, 02:30 PM) |
| Atentie la InitGraph. Al treilea parametru e '' doar daca fisierele cu extensia *.BGI(cel mai probabil de EGAVGA.BGI o sa ai nevoie) e inclus corect de prin setari (pe undeva la DIrectories, nu mai tin minte sau daca e in directorul curent in care se afla programul. Daca e in alta parte trebuie sa scrii explicit directorul: InitGraph(GraphicsDriver, GraphicsMode,' C:\BP\BGI'); |
Sau poti sa lasi ca parametru '' si sa copiezi fisierul cu pricina (EgaVga.Bgi) in directorul in care se va gasi executabilul.
Cat despre interfata simpla si manevrabila, daca vrei sa folosesti mouse-ul va trebui sa il initializezi tot cam in acelasi mod... :-/
Cat despre interfata simpla si manevrabila, daca vrei sa folosesti mouse-ul va trebui sa il initializezi tot cam in acelasi mod... :-/
Mdea... si cu mouseu' e o poveste mai delicata...
Practic e un unit pentru mouse, care fie vorba intre noi, e mai mult assembler decat pascal. Stiu ca m-am jucat si cu mouseul in Pascal "cand eram mai tanar"
Practic e un unit pentru mouse, care fie vorba intre noi, e mai mult assembler decat pascal. Stiu ca m-am jucat si cu mouseul in Pascal "cand eram mai tanar"
Nu ma interesa lucrul cu mouse-ul ci mai mult cum sa trag o linie intre niste coordonate si daca merge pus vreun buton.Oricum va multumesc pentru ajutor si pot sa spun ca m-a ajutat foarte mult.
Bine ai venit la Han, ecou! 
Multumesc ! E tare bine aici la han...Imi place .
Pt linie intre coordonate ai procedura line(x1,y1,x2,y2)... Cat despre buton, ii pui imaginea pe ecran si captezi fie mouse-ul fie tastatura ca sa vezi cand este "apelat".
Multumesc !
Aceasta este o versiune "Text-Only" a continutului acestui forum. Pentru a vizualiza versiunea completa, cu mai multe informatii, formatari si imagini,click aici.