Turbo pascal unité graph

Fermé

Sonsam - 24 juil. 2008 à 14:54
Archi-dessin Messages postés 270 Date d'inscription samedi 19 avril 2008 Statut Membre Dernière intervention 28 décembre 2009 - 30 juil. 2008 à 03:13

Bonjour,j'ai essayer un example du menu help en mode graph je compile pas d'erreurs mais run n'affiche rien .j'ai écrit readln; avant END.,mais toujours rien. J'avais précédament erreur not found graph in TPU et je suis allé dans menu>file>charge dir et configuré driver>c:\program~\tp7\units et l'erreur ne s'affiche plus mais run n'execute pas.que faire

A voir également:

Turbo pascal unité graph
Turbo pascal download - Télécharger - Édition & Programmation
My pascal - Télécharger - Édition & Programmation
Turbo sim inconvénient - Forum iPhone
Factoriel casio graph 35+e ✓ - Forum Autres périphériques et appareils
Unité audio mp3 - Forum Audio

9 réponses

Réponse 1 / 9

sonsam
29 juil. 2008 à 01:14

merci pour le coup de main, mais ça marche pas. je vais changer de compilateur voir!

Réponse 2 / 9

Archi-dessin Messages postés 270 Date d'inscription samedi 19 avril 2008 Statut Membre Dernière intervention 28 décembre 2009 25
24 juil. 2008 à 18:29

salut,
le problème est d'intreprétation graphique
verifie que le fichier graph.tpu exit danle répertoire bin

sonsam
25 juil. 2008 à 21:32

Merci Archi!
Dans BIN le fichier graph tpu n'existait pas, alors je uis allé copier les deux fichiers graph.tpu qui existaient
dans le repertoir UNITS et coller dans le repertoire BIN mais le problème n'a pas changé. run n'execute toujours pas.

Réponse 3 / 9

Archi-dessin Messages postés 270 Date d'inscription samedi 19 avril 2008 Statut Membre Dernière intervention 28 décembre 2009 25
26 juil. 2008 à 04:54

salut,
Quelles sont les unités que vous avez dans le programme
pour savoir plus sur votre programme

sonsam
28 juil. 2008 à 01:36

Salut! voici un example essayé mais qui ne marche pas avec mon tp7.

Program coquille ;
Uses Graph ;
Var r, a, mode, pilote : Integer ;
BEGIN
mode := Detect ;
InitGraph(mode, pilote, 'c:\bp\bgi') ;
SetColor(14) ;
r := 0 ;
Repeat
Inc(r, 8) ;
Arc(GetMaxX Div 3, GetMaxY Div 2, 0, r, 180-(r Div 2)) ;
Until r>360 ;
ReadLn ;
CloseGraph ;
END.

Avez-vous d'autres à me proposer? je pourrai les essayer.

KX Messages postés 16752 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 31 août 2024 3 019 > sonsam
28 juil. 2008 à 01:40

Essaye ce code :

Program coquille ;
Uses Graph ;
Var r, mode, pilote : SmallInt;
BEGIN
mode := Detect ;
InitGraph(mode, pilote, 'c:\bp\bgi') ;
SetColor(14) ;
r := 0 ;
Repeat
Inc(r, 8) ;
Arc(GetMaxX Div 3, GetMaxY Div 2, 0, r, 180-(r Div 2)) ;
Until r>=360 ;
ReadLn ;
CloseGraph ;
END.

--
La confiance n'exclut pas le contrôle

watou Messages postés 199 Date d'inscription vendredi 27 juin 2008 Statut Membre Dernière intervention 19 avril 2013 28 > sonsam
28 juil. 2008 à 01:56

salut

essaie de faire " mode,plote:smallint "
et " initgraph(mode,pilote,'c:\\') "

Réponse 4 / 9

Archi-dessin Messages postés 270 Date d'inscription samedi 19 avril 2008 Statut Membre Dernière intervention 28 décembre 2009 25
28 juil. 2008 à 02:09

salut ,
InitGraph(mode, pilote, 'c:\.......\bgi')
tu dois indique partidu répertoire (......) ou se trouve le repertoire BGI
exemple si le répertoire est TP7 donc
InitGraph(mode, pilote, 'c:\TP7\bgi')

watou Messages postés 199 Date d'inscription vendredi 27 juin 2008 Statut Membre Dernière intervention 19 avril 2013 28
28 juil. 2008 à 02:25

j'ai essayé " InitGraph(mode, pilote, 'c:\\') " et ça marche !

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 9

Archi-dessin Messages postés 270 Date d'inscription samedi 19 avril 2008 Statut Membre Dernière intervention 28 décembre 2009 25
28 juil. 2008 à 02:27

fait ça
InitGraph(mode, pilote, 'c:\TP7\bgi')
vous allez voir

Réponse 6 / 9

Archi-dessin Messages postés 270 Date d'inscription samedi 19 avril 2008 Statut Membre Dernière intervention 28 décembre 2009 25
28 juil. 2008 à 02:29

ce que vous propsé ne marche pas tjrs dans tous les cas

sonsam
30 juil. 2008 à 00:32

meci archi j'ai essayer InitGraph(mode, pilote, 'c:\TP7\bgi')
et ça marche!

Réponse 7 / 9

KX Messages postés 16752 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 31 août 2024 3 019
29 juil. 2008 à 12:03

Tu essayais de le faire marcher sur ton Mac OS X, ou sur ton Windows XP 2 ? Cela vient peut-être de là aussi...

Réponse 8 / 9

sonsam
30 juil. 2008 à 00:26

finalement j'ai essayer ceci :InitGraph(mode, pilote, 'c:\TP7\bgi'); et ça marche

Réponse 9 / 9

Archi-dessin Messages postés 270 Date d'inscription samedi 19 avril 2008 Statut Membre Dernière intervention 28 décembre 2009 25
30 juil. 2008 à 03:13

bon chance

Discussions similaires

turbi sim ou débloquage officielle ?

les avantages et inconvenient des modeles

unité de taille pour un fichier audio au format MP3

"Erreur d'argument" de la casio 35+

Décomposition facteur premier casio 35+ Ell