Obsah fóra
PravidláRegistrovaťPrihlásenie




Odpovedať na tému [ Príspevkov: 18 ] 
AutorSpráva
Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 13.02.07
Prihlásený: 10.10.07
Príspevky: 24
Témy: 3
Príspevok NapísalOffline : 09.10.2007 14:56

mam len taky maly problem ze ked chcem spustit nieco v pascale z grafiky nabehne mi len cierna obrazovka a nic to neroby . na inom pc my to ide ale ja to potrebujem aby mi to aslo aj doma.
prosim ozvyte sa niekto plz :shock:


Offline

Užívateľ
Užívateľ
pascal  preco mi to nejde pomozte plz

Registrovaný: 16.05.07
Prihlásený: 01.08.17
Príspevky: 837
Témy: 6
Príspevok NapísalOffline : 09.10.2007 15:30

podla vsetkeho mas nastavenu zlu cestu ku grafike ale takto si to nepredstavuj ze budeme hadat hod sem ten zdrojak.







_________________
getch();?{readkey;?} na konci? !A naco! Riesenie je (Alt+F5)
99% pochopí a shaggy je druhá kategória
Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 13.02.07
Prihlásený: 10.10.07
Príspevky: 24
Témy: 3
Príspevok Napísal autor témyOffline : 09.10.2007 17:28

neviem aky zdrojak ale cestu mam urcite dobru som si to niekolko krat kontrolovala


Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 21.07.07
Prihlásený: 09.10.07
Príspevky: 3
Témy: 0
Príspevok NapísalOffline : 09.10.2007 17:35

NIKITA, vies robit v PASCALY?


Offline

Užívateľ
Užívateľ
pascal  preco mi to nejde pomozte plz

Registrovaný: 12.10.06
Prihlásený: 17.04.24
Príspevky: 20302
Témy: 79
Bydlisko: Banska Byst...
Príspevok NapísalOffline : 09.10.2007 17:43

Najprv by mala zacat s vyucbou gramatiky, a az potom pascalu. Hrubica dobreze nie v kazdom slove...A ocividne ani nevie co je to zdrojak...no amen :lol:

A navyse nenapise nic o tom, ze co a ako to robi - ci je to klasicky DOSovsky pascal, alebo dake Delphi alebo...







_________________
Ryzen 7 3700X | SilentiumPC Fera 3 | Asrock X570M Pro4 | Patriot Viper 4 Blackout 16GB DDR4-3600 CL17 | Gainward RTX4060 Ti Pegasus 8GB | Samsung 970evo Plus 250GB NVMe | Corsair MP510 1TB NVMe | Samsung 980 Pro 2TB NVMe | Corsair RM550x | 24" BenQ GW2470H | 3x Noctua NF-S12B redux 1200 PWM
Xiaomi Mi 9 Lite 64GB
Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 13.02.07
Prihlásený: 10.10.07
Príspevky: 24
Témy: 3
Príspevok Napísal autor témyOffline : 09.10.2007 18:00

no takze je to klasicky turbo pascal 7 a ked spustim grafiku tak len cierna obrazovka tak neviem a programovat celkom asi viem ale nejak si nemapetamtake nejake nazvy a na gramatiku sa nestazuj lebo no kaslat na to


Offline

Čestný člen
Čestný člen
pascal  preco mi to nejde pomozte plz

Registrovaný: 09.05.05
Prihlásený: 07.12.16
Príspevky: 1294
Témy: 69
Bydlisko: - - -
Príspevok NapísalOffline : 09.10.2007 18:28

Tú cestu ku grafike má určite správnu, lebo inač by to hodilo eror a program by sa nespustil ani do tej čiernej obrazovky, to tak btw...

nikita, nevieme aký program sa snažíš pustiť, či už niečo veľké, alebo len základy, trocha popísať.. Skušala si skopírovať celý ten TP7 z toho počítača kde ti to funguje ?

Nasledujúci kód ti tiež len vyhodí čiernu obrazovku ?
Kód:
USES CRT, GRAPH;

VAR

GD, GM : INTEGER;

BEGIN
    InitGraph(GD,GM, '..\BGI');
    Line(50,50,100,100);
    readln;
    Line(50,50,100,50);
    readln;
    Line(100,50,100,100);
    readln;
    CloseGraph;
END.
 


Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 13.02.07
Prihlásený: 10.10.07
Príspevky: 24
Témy: 3
Príspevok Napísal autor témyOffline : 09.10.2007 18:35

no tak ked som to tam dala napisalo mi ze turbo pascal version 7.0 copyright (c) 1983,92 borland internacional


Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 13.02.07
Prihlásený: 10.10.07
Príspevky: 24
Témy: 3
Príspevok Napísal autor témyOffline : 09.10.2007 18:37

no a neskusala som to skopyrovat pretoze je to v skole a je to tam vsetko chranene a tie programy ktore robim si velmi jednoduch napr nakreslit terc aby menil farby alebo domcek alebo napisat techt a ten aby chodil po obrazovke ako titulky takze jednoduche


Offline

Užívateľ
Užívateľ
pascal  preco mi to nejde pomozte plz

Registrovaný: 16.05.07
Prihlásený: 01.08.17
Príspevky: 837
Témy: 6
Príspevok NapísalOffline : 10.10.2007 13:15

ak nevies co to je zdrojak tak, vies aspon co je to zdrojovy kod? source code? to je cely obsah toho programu tak to sem hod a uz nas neirituj.







_________________
getch();?{readkey;?} na konci? !A naco! Riesenie je (Alt+F5)
99% pochopí a shaggy je druhá kategória
Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 13.02.07
Prihlásený: 10.10.07
Príspevky: 24
Témy: 3
Príspevok Napísal autor témyOffline : 10.10.2007 14:16

no tak napriklad toto

program vyplnkruznica;
uses graph;
var gd,gm:integer;
i:integer;
procedure vyplnaj (farba_vyplne,x,y,farba_hranice:integer);
begin
setfillstyle (1,farba_vyplne);
floodfill (x,y,farba_vyplne);
end;
begin
initgraph(gd,gm,'d:\student\2.a');

{for i:=16 downto 1 do
begin
setcolor(i);
circle (300,250,5*i);
setfillstyle (1,i);
floodfill (300,250,i);
end; }

for i:=16 downto 1 do
begin
setcolor(i);
circle (300,250,5*i);
vyplnaj (i,300,250,50);
end;

readln;
end.


Offline

Užívateľ
Užívateľ
pascal  preco mi to nejde pomozte plz

Registrovaný: 16.05.07
Prihlásený: 01.08.17
Príspevky: 837
Témy: 6
Príspevok NapísalOffline : 10.10.2007 14:57

a co te premenne gd, a gm sak jasne ze nemas nastavenu cestu ku grafike ked ti cyhbaju ich hodnoty pred initgraph by sa mala dat funkcia detectgraph(gd,gm); a az nebodaj je tam nastavene nieco take ako ze to berie farby len do hodnoty 16 no tak to by mohol byt dalsi problem.







_________________
getch();?{readkey;?} na konci? !A naco! Riesenie je (Alt+F5)
99% pochopí a shaggy je druhá kategória
Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 13.02.07
Prihlásený: 10.10.07
Príspevky: 24
Témy: 3
Príspevok Napísal autor témyOffline : 10.10.2007 16:04

no aj ked som to zmenila nic nerobi no vlastne to iste ale este pise ze nepozna graph


Offline

Užívateľ
Užívateľ
pascal  preco mi to nejde pomozte plz

Registrovaný: 16.05.07
Prihlásený: 01.08.17
Príspevky: 837
Témy: 6
Príspevok NapísalOffline : 10.10.2007 17:58

tak teraz staci opravit tu cestu v initgraph() daj tam radsej absolutnu cestu adresara bgi ktory mas niekde v pascali.







_________________
getch();?{readkey;?} na konci? !A naco! Riesenie je (Alt+F5)
99% pochopí a shaggy je druhá kategória
Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 13.02.07
Prihlásený: 10.10.07
Príspevky: 24
Témy: 3
Príspevok Napísal autor témyOffline : 10.10.2007 18:03

tak mi to skus napisat ako to ma presne vizerat lebo ja som to uz skusala a nejak to stale nejde pascal mam na c program files a TP


Offline

Užívateľ
Užívateľ
pascal  preco mi to nejde pomozte plz

Registrovaný: 16.05.07
Prihlásený: 01.08.17
Príspevky: 837
Témy: 6
Príspevok NapísalOffline : 10.10.2007 21:29

otvor si normalny explorer v suborovom vyhladavaci (normalne dvojklik na nejaky adresar) teda az mas windows. preklikaj sa do toho adresara s pascalom a potom na tej vyhladavacej liste kde mas cestu k danemu adresa tak tu istu napis do initgraph(gd,gm,'sem');
az to mas nejak tak potom by to mohlo vyzerat asi takto nejak:
Kód:
detectgraph(gd,gm);
bud initgraph(gd,gm,'C:\program files\tp\bgi');
alebo tento initgraph(gd,gm,'..\bgi');
no lenze tym program files som si nie isty ci to nebere len 8znakove adresare v tom pripade by to mohlo byt progra~1







_________________
getch();?{readkey;?} na konci? !A naco! Riesenie je (Alt+F5)
99% pochopí a shaggy je druhá kategória
Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 13.02.07
Prihlásený: 10.10.07
Príspevky: 24
Témy: 3
Príspevok Napísal autor témyOffline : 14.10.2007 13:39

no bere a teraz neviem ako napisem to no tu vlnovku


Offline

Užívateľ
Užívateľ
pascal  preco mi to nejde pomozte plz

Registrovaný: 16.05.07
Prihlásený: 01.08.17
Príspevky: 837
Témy: 6
Príspevok NapísalOffline : 14.10.2007 16:45

bud si prepnes na anglicku klavesnicu shift + (klaves nad Tab)
alebo pomocou ascii kodu Alt + 126;
alebo.skus ten druhy.
proste si pozri options->directories. a podla toho to nasmeruj do bgi adresara.
'..\' je o adresar spat.
initgraph(gd,gm,'cesta\bgi');







_________________
getch();?{readkey;?} na konci? !A naco! Riesenie je (Alt+F5)
99% pochopí a shaggy je druhá kategória
Odpovedať na tému [ Príspevkov: 18 ] 


Podobné témy

 Témy  Odpovede  Zobrazenia  Posledný príspevok 
V tomto fóre nie sú ďalšie neprečítané témy. plz ludia pomôžte mi s pár lahkými príkladmi na pascal

v Assembler, C, C++, Pascal, Java

0

729

02.05.2007 14:56

nikita Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Preco mi nejde spustit pascal vo Windows 7 ?

v Assembler, C, C++, Pascal, Java

2

1953

21.06.2010 20:42

Martin Macy Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. PLZ Pomozte

v Operačné systémy Microsoft

3

604

18.04.2006 11:33

p2p Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. PRECO NEJDE?

v nVidia grafické karty

12

924

22.04.2008 20:41

prandof Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Prečo to nejde?

v Pevné disky a radiče

8

530

11.04.2010 23:06

Durinko Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. prečo mi nejde mikrofon????

v Audio programy

8

1487

22.02.2009 16:52

HallOfFame Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. preco mi to nejde?

v PHP, ASP

27

1122

07.09.2007 19:16

Flety Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Preco nejde while? help

v PHP, ASP

4

520

29.07.2007 16:19

TECHNODROME Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. nejde otvorit pascal

v Assembler, C, C++, Pascal, Java

10

532

08.06.2012 22:40

Fico Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. WL-5460AP prečo nejde Internet???

v Siete

14

2284

21.03.2010 17:43

AReYco Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. preco mi nejde zosilnit mikrofon?

v Zvuk

0

654

05.05.2008 19:33

sOsek Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. 3 Ventilátory, jeden nejde, prečo?

v Chladiče a všetky druhy chladenia

2

563

07.10.2015 12:16

martinius96 Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Preco mi nejde sietovy kabel?

v Siete

4

2444

14.01.2007 14:59

mimkork Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Preco mi nejde spustit hra

v Počítačové hry

20

1269

17.07.2014 15:15

Rastulinqo1 Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. preco to nejde v mozille?

v JavaScript, VBScript, Ajax

7

508

08.09.2012 16:28

Ďuri Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. nejde mi zvuk.......pomozte

[ Choď na stránku:Choď na stránku: 1, 2 ]

v Audio programy

43

1524

20.11.2009 20:51

prandof Zobrazenie posledných príspevkov


Nemôžete zakladať nové témy v tomto fóre
Nemôžete odpovedať na témy v tomto fóre
Nemôžete upravovať svoje príspevky v tomto fóre
Nemôžete mazať svoje príspevky v tomto fóre

Skočiť na:  

Powered by phpBB Jarvis © 2005 - 2024 PCforum, webhosting by WebSupport, secured by GeoTrust, edited by JanoF
Ako väčšina webových stránok aj my používame cookies. Zotrvaním na webovej stránke súhlasíte, že ich môžeme používať.
Všeobecné podmienky, spracovanie osobných údajov a pravidlá fóra