Connexion
Vous n'avez pas encore de compte personnel ? Vous devriez en créer un. Une fois enregistré vous aurez certains avantages, comme pouvoir modifier l'aspect du site, ou poster des commentaires signés...
Support
Activité du Site

Pages vues depuis 06/01/2019 : 13 183 761

  • Nb. de membres 367
  • Nb. d'articles 2 846
  • Nb. de forums 24
  • Nb. de sujets 13
  • Nb. de critiques 0

Top 10  Statistiques

Index du forum »»  Développement »» [Résolu] - Problème avec FreePascal sous Morphos 2.7

[Résolu] - Problème avec FreePascal sous Morphos 2.7#761

2Contributeur(s)
pierrepFab
2 Modérateur(s)
PapiosaurBeWorld
pierrep pierrepicon_post
J'avais adapté Ã FPC un petit programme écrit en Turbo Pascal 4.0 en utilisant des procédures pour émuler les primitives graphiques et notamment celle-ci :

procedure gotoxy(x,y:Integer);
var
nx,ny:Integer;
begin
nx := 5*x;
ny := 10*y;
Move(myWindow^.RPort,nx,ny);
end;

Depuis que j'ai installé Morphos 2.7 ce programme se compile sans problème mais à l’exécution j'obtiens :
"*** application is meditating ***"
Après quelques tests je me suis apperçu que c'est après l’exécution de cette procédure gotoxy que le programme plante.

Le problème ne vient pas de FPC car j' ai essayé de compiler le programme avec la version 2.04 avec laquelle je j'avais écrit et le résultat est le même.

Quelqu'un aurait-il une explication ?

Merci
Fab Fabicon_post
On me fait signe que Move est une fonction de copy de données, et que si tu veux utiliser le Move de la graphics.library, il faudrait utiliser gfxMove(), ou qqch du genre.
voir http://wiki.freepascal.org/MorphOS#Naming_conventions
pierrep pierrepicon_post
Merci, en utilisant gfxMove le problème a été réglé. :-D