FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Fonctionnement du caret_x_position(N)
par Jack Hier à 20:36

» Problèmes en cours.
par Jack Hier à 20:31

» PanExpress : l'éditeur Panoramic avec création d'objet
par Minibug Hier à 19:55

» Exemple d'une nouvelle version d'un GRID
par Minibug Hier à 17:36

» Comment faire fonctionner \qj en RTF ?
par jjn4 Mer 12 Déc 2018 - 19:25

» Mais où est donc passé Klaus ?!
par Jicehel Mer 12 Déc 2018 - 13:38

» Problème avec SaveStringList.
par Klaus Mer 12 Déc 2018 - 12:14

» Je suis de retour !
par Klaus Mer 12 Déc 2018 - 12:10

» Connexion au forum
par mindstorm Mer 5 Déc 2018 - 19:09

» Version instantanée V 0.9.29i5 du 17/11/2018
par silverman Ven 30 Nov 2018 - 10:37

» imprimer avec Print.dll
par JL35 Jeu 29 Nov 2018 - 21:33

» Convertisseur Décimal ---> Binaire, Octal, Hexadécimal, ...
par Minibug Dim 25 Nov 2018 - 15:37

» Impression de documents
par JL35 Ven 23 Nov 2018 - 19:45

» Logiciel de soutien scolaire.
par Marc Jeu 22 Nov 2018 - 20:51

» Logiciel de soutien en langues.
par Marc Jeu 22 Nov 2018 - 19:39

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Décembre 2018
LunMarMerJeuVenSamDim
     12
3456789
10111213141516
17181920212223
24252627282930
31      
CalendrierCalendrier

Partagez | 
 

 MEMO_RICH

Aller en bas 
AuteurMessage
JL35



Nombre de messages : 6407
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: MEMO_RICH   Mer 3 Oct 2018 - 16:31

Je découvre par hasard cette commande qui me paraît bien intéressante, mais je ne vois absolument pas
comment la mettre en oeuvre.
La doc du mot-clé dit ceci:
Un MEMO_RICH est une zone où l'utilisateur peut entrer ou modifier des lignes multiples de texte
avec des styles et des couleurs.


Alors je crée un MEMO_RICH, je peux évidemment y saisir du texte (comme dans un MEMO classique),
mais je ne vois pas du tout comment y appliquer des styles et des couleurs variés !
La doc ne dit rien à ce sujet.

Quelqu'un a une idée de ce qui m'échappe ?
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

Nombre de messages : 5733
Age : 64
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: MEMO_RICH   Mer 3 Oct 2018 - 18:23

Salut JL35,

J'ai également tenté de m'en servir, mais je ne comprend pas comment ça marche.
Je pense que cet objet n'est pas terminé....

A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



Nombre de messages : 6407
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: MEMO_RICH   Mer 3 Oct 2018 - 19:52

Bonsoir Jean Claude,

Effectivement, c'est un peu mystérieux, je ne sais pas depuis combien de temps il est dans l'éditeur,
mais la documentation est plutôt floue, et le mode d'emploi inexistant.

Bon, eh bien, fausse joie jusqu'à preuve du contraire...
J'avais recherché avant sur le forum, mais rien à part une intervention de cosmos sur un RichEdit qu'il avant codé mais dans un autre langage apparemment (décembre 2011...):
http://panoramic.1fr1.net/t1864-un-memorich-greffe-sur-panoramic?highlight=MEMORICH
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Minibug

avatar

Nombre de messages : 3241
Age : 52
Localisation : Vienne (86)
Date d'inscription : 09/02/2012

MessageSujet: Re: MEMO_RICH   Mer 3 Oct 2018 - 20:02

Comme Jack est dans le coin, il pourrait peut être nous en dire un peu plus...

Il me semble qu'il avait mis un post là-dessus mais je n'arrive pas a le retrouver ! Mad
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://gpp.panoramic.free.fr
papydall

avatar

Nombre de messages : 6056
Age : 68
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: MEMO_RICH   Mer 3 Oct 2018 - 20:16

Je ne vois pas de différence entre MEMO et MEMO_RICH, mais peut-être que je me trompe!

Code:

memo 1 : color 1,0,0,255 : font_color 1,255,255,0 : font_underline 1
font_bold 1 : item_add 1,"MEMO" : item_add 1,"Salut tout le monde !"
item_add 1,"Quelle est ..." : item_add 1,"Je n'en vois ..."
memo_rich 2 : color 2,0,0,255 : font_color 2,255,255,0 : left 2,200 : font_underline 2
font_bold 2 : item_add 2,"MEMO_RICH" : item_add 2,"Salut tout le monde !"
item_add 2," ... la différence ?" : item_add 2,"... aucune"
item_add 1,"Mais peut-être ..." : item_add 2,"... que je me trompe !"


Dernière édition par papydall le Mer 3 Oct 2018 - 23:49, édité 1 fois (Raison : entre trombe et tornade je me suis trompé !)
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
JL35



Nombre de messages : 6407
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: MEMO_RICH   Mer 3 Oct 2018 - 21:34

Si tu te trombes tu vas déclencher une tempête !

Sinon c'est vrai, j'avais fait le même constat.
J'imagine que le but est de créer du texte enrichi, avec des balises de mise en forme, comme dans le format rtf entre autres.
Mais peut-être que moi aussi je me trombe...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 6056
Age : 68
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: MEMO_RICH   Mer 3 Oct 2018 - 23:52

@JL35
Ces derniers jours une trombe marine s’est manifestée aux larges de nos côtes et je viens d’expliquer le phénomène à un ami tout en écrivant mon message sans me douter que je me trombe et tornade trompe de destinataire. tongue
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Oscaribout



Nombre de messages : 214
Date d'inscription : 29/12/2016

MessageSujet: Re: MEMO_RICH   Jeu 4 Oct 2018 - 1:11

Bonsoir, tant-pis je donne mon idée.

Il y a plusieurs mois, j'ai fait la même constatation. J'ai fait l'essai de mettre du texte avec des styles différents dans WordPad, et de copier le texte dans le memo_rich. Cela fonctionne.

Il n'est pas évident de comprendre la conception du memo_rich, mais on doit pouvoir y arriver. J'avais pas le temps alors, et j'étais sur un autre programme, et moi aussi j'aimerai pouvoir faire marcher cet objet.

Aussi voila: dans WordPad, on met un texte mini stylé, on y met tous les styles qu'on veut utiliser, et on sauvegarde.

Apparemment il faut faire cette étape, WordPad sauvegarde tous les styles utilisés, et y met un N°. A l'instant je ne suis pas rentré  complètement dans le code. J'ignore si ce que je pense fonctionne réellement, je ne lâche pas mon programme en cours.
Cela demande réflexion sur mettre au point le programme.

Programme de départ:
Code:
' réflexion memo_rich
' on écrit sur WordPad un texte avec l'ensemble des styles.
' on copie le texte, et après lancement de ce programme, on le colle,
' puis sauvegarde.
label save  : dim f$
f$ = "Z:\memo_rich.rtf"    
width 0,screen_x:height 0,500

memo_rich 1   :width 1,400:height 1,400 : show 1 : top 1,30
   if file_exists(f$) = 1 then file_load 1,f$
button 2:caption 2,"save" : on_click 2,save
memo 3:left 3,410:width 3,width_client(0)-410:top 3,30:height 3,400
   if file_exists(f$) = 1 then file_load 3,f$
END
' ========================
save:
   if dir_exists("z:") = 1 then file_save 1,f$
return

Voici ce que cela donne en exemple:

exemple:
 

Je pense qu'on doit pouvoir mettre les codes dans un combo, qui se rajoute au texte sélectionné. C'est pas sûr mais il faut prendre le temps d'essayer.

Bonne chance!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



Nombre de messages : 6407
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: MEMO_RICH   Jeu 4 Oct 2018 - 13:58

Eh bien, Oscaribout, ça c'est une RICH idée !

Il fallait y penser ! charger un .rtf dans un MEMO_RICH, ce n'est mentionné nulle part dans la doc, mais ça marche !
Les enrichissements de texte sont bien pris en compte, et ça ouvre des horizons...

Et en plus, on peut écrire dans le MEMO_RICH et sauvegarder son contenu dans un fichier au format rtf
Génial, tu as tout trouvé !

Merci Oscaribout pour ton partage, très intéressant.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jack
Admin
avatar

Nombre de messages : 1955
Date d'inscription : 28/05/2007

MessageSujet: Re: MEMO_RICH   Jeu 4 Oct 2018 - 14:14

JL35 a écrit:
Je découvre par hasard cette commande qui me paraît bien intéressante, mais je ne vois absolument pas
comment la mettre en oeuvre.

Jean-Claude a écrit:
J'ai également tenté de m'en servir, mais je ne comprend pas comment ça marche.
Je pense que cet objet n'est pas terminé....

L'objet MEMO_RICH existe dans Panoramic depuis presque une dizaine d'année (depuis 2009). C'est vrai qu'au début, il n'était pas documenté.
Comme je n'ai jamais eu de demandes à son sujet, je n'ai pas développé ses possibilités, mais il est néanmoins capable d'un minimum de choses.
Pour faire simple, c'est l'équivalent de l'objet HVIEWER, mais pour les fichiers RTF.

HVIEWER accepte des fichiers au format HTML.
MEMO_RICH accepte des fichiers au format RTF (Rich Text Format).

Un fichier au format RTF peut être lu ou généré par la quasi-totalité des traitements de texte.
Il peut contenir du texte, des tableaux, des images et le texte peut être mis en forme (police, taille, couleur, etc).

Voici un petit exemple vite fait et très simple de son utilisation.
Un fichier RTF, contient un en-tête, des polices, des couleurs et un corps.
Dans l'en-tête, rtf1 est la version RTF utilisée, ansi est le jeu de caractères utilisés.
Dans la section police, f0 est l'identifiant de la police utilisée, fnil est la police par défaut, fcharset0 est le jeu de caractère dans la table de la police, etc, etc

Code:
DIM A$
MEMO_RICH 1
WIDTH 1,300
A$="{\rtf1\ansi{\fonttbl{\f0\fnil\fcharset0\fprq0\fttruetype Helvetica;}{\f1\fnil\fcharset0\fprq0\fttruetype Bitstream Charter;}}"
A$=A$+"{\f1\fs24 Ceci est un texte accentu\'e9}\par{\f0\fs24 avec des caract\'e8res {\b gras},}\par{\f1 des {\fs18 petits} et des {\fs32 gros}.}}"
TEXT 1,A$

_________________
username : panoramic@jack-panoramic password : panoramic123
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://panoramic.1fr1.net
JL35



Nombre de messages : 6407
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: MEMO_RICH   Jeu 4 Oct 2018 - 14:21

Merci Jack pour ces précisions.
Et pour ton exemple, bien parlant.

Je savais pour HVIEWER et Html, que j'utilise assez souvent, mais je n'avais pas percuté sur le MEMO_RICH, et je le regrette.
Ça va beaucoup me servir pour écrire du texte (de la doc ou de l'aide par exemple) avec mise en forme, à afficher dans un
programme Panoramic.
Comme tu dis, le rtf est universel, pour moi c'est beaucoup à partir de Wordpad, le plus simple à mon avis. Et pouvoir afficher
ça en Panoramic, super !

Merci.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jack
Admin
avatar

Nombre de messages : 1955
Date d'inscription : 28/05/2007

MessageSujet: Re: MEMO_RICH   Jeu 4 Oct 2018 - 14:28

Oui, il te suffit de créer un document au format RTF avec un traitement de texte et de le charger dans un MEMO_RICH pour le visualiser dans un programme:

Code:
MEMO_RICH 1
FILE_LOAD 1,"DOCUMENT.RTF"

_________________
username : panoramic@jack-panoramic password : panoramic123
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://panoramic.1fr1.net
JL35



Nombre de messages : 6407
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: MEMO_RICH   Jeu 4 Oct 2018 - 14:42

D'une part.
Et on peut également le créer dans le programme lui-même, au format rtf, dont tu as donné un exemple ci-dessus, pour l'afficher ensuite avec sa mise en forme dans le Memo_Rich, ce qui évite de faire appel à un fichier externe.

Par exemple:
Code:
DIM A$,rc$
WIDTH 0,300: HEIGHT 0,100
FORM 10: TOP 10,50: LEFT 10,100: WIDTH 10,340: HEIGHT 10,150: BORDER_HIDE 10
MEMO_RICH 11: PARENT 11,10: FULL_SPACE 11: ON_CLICK 11,Quit

rc$ = CHR$(13)+CHR$(10)
A$="{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 Bitstream Charter;}}"
A$=A$+rc$+"{\*\generator Msftedit 5.41.21.2510;}\viewkind4\uc1\pard\lang1036\ul\b\f0\fs24 MODE D'EMPLOI\par"
A$=A$+rc$+"\ulnone\b0\par"
A$=A$+rc$+"Ceci est le \i mode d'emploi \i0 du programme\par"
A$=A$+rc$+"A lire \b attentivement\b0  !\par"
A$=A$+rc$+"}"
' FILE_OPEN_WRITE 1,"Z:\Test2.rtf": FILE_WRITELN 1,A$: FILE_CLOSE 1: ' enregistrement
' file_load 11,"Z:\Test2.rtf"
TEXT 11,A$: ' ou affichage direct
END

@Jack
Pour le HVIEWER, il est bien précisé dans la doc:
Un HVIEWER visualise un fichier au format HTML avec la commande FILE_LOAD

Pour le MEMO_RICH, il n'est mentionné nulle part un rapport avec le format .RTF... c'est dommage
(mais je l'ai rajouté dans ma doc perso Very Happy )
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

Nombre de messages : 5733
Age : 64
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: MEMO_RICH   Jeu 4 Oct 2018 - 18:18

Intéressant cette nouvelle.
dans l'éditeur EPP MemoPanelAide% est un MEMO_RICH car je me doutais qu'un jour ou l'autre il y aurait une solution.
Maintenant que je sais que je peux faire mes texte d'aide au format RTF, je vais pouvoir embellir...

Merci Oscaribout pour la piste Wink

A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Minibug

avatar

Nombre de messages : 3241
Age : 52
Localisation : Vienne (86)
Date d'inscription : 09/02/2012

MessageSujet: Re: MEMO_RICH   Jeu 4 Oct 2018 - 18:25

Eh bien voilà ! On sait maintenant comment procéder...

Merci à Jack et à tous pour ces infos ! cheers
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://gpp.panoramic.free.fr
Oscaribout



Nombre de messages : 214
Date d'inscription : 29/12/2016

MessageSujet: Re: MEMO_RICH   Jeu 4 Oct 2018 - 23:26

Je vous remercie JL35 et Jean Claude pour votre réaction à mon égard.

Jack a écrit:
Comme je n'ai jamais eu de demandes à son sujet, je n'ai pas développé ses possibilités, mais il est néanmoins capable d'un minimum de choses.

Si je me souviens bien, il me semble que tu avais dis que tu reprendrais plus tard (quelque chose comme cela), c'est pareil pour Androïde. Personnellement je me suis retenu pour demander une suite sur ceux-ci. Vu les demandes que tu as eu, et ce que tu fais, pour un logiciel gratuit on peut pas demander l'impossible.

A te lire je me dis que tous les mois il faut te relancer pour que tu reprennes le memo_rich, et pour que Panoramic soit opérationnel sur Androïde. Les essais que j'ai fait sur ce dernier ne fonctionnent pas. Je me vois mal te relancer régulièrement. C'est pas dans mes habitudes. Pour l'instant je pense que ton travail est sur le compilateur. Je ne peux donc qu'attendre en espérant voir une suite sur ces sujets. Le fait de ne rien demandé ne signifie pas qu'on attend pas leurs venues.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 6056
Age : 68
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: MEMO_RICH   Ven 5 Oct 2018 - 4:12

Je teste MEMO_RICH.

Code:

rem ============================================================================
rem           Test avec MEMO_RICH
rem ============================================================================                                    

dim t$,p
p = 2000
memo_rich 10 : full_space 10 : bar_both 10

t$ = "{\rtf1\ansi\deff0 {\fonttbl {\f0 Times New Roman;}}\f0\fs60 Hello, World!}"
text 10,t$ : pause p
' ------------------------------------------------------------------------------
t$ = "{\rtf1\ansi\deff0 {\fonttbl {\f0 Monotype Corsiva;}}\f0\fs28 Hello, World!}"
text 10,t$ : pause p
' ------------------------------------------------------------------------------
t$ = "{\rtf1\ansi\deff0 {\fonttbl {\f0 Monotype Corsiva;}}\qc\f0\fs120\i\b Hello,\line World!}"
text 10,t$ : pause p
' ------------------------------------------------------------------------------
t$ = "{\rtf1\ansi\deff0 {\fonttbl {\f0 Times;}{\f1 Courier;}}\fs25 {\pard You know, {\f1 PANORAMIC} is my {\fs60 favorite} Programing Language!\par}}"
text 10,t$ : pause p
' ------------------------------------------------------------------------------
t$ = "{\rtf1\ansi\deff0 {\fonttbl {\f0\froman Times New Roman;}}\fs50{\pard{\i Je {\b suis {\scaps content {\plain et moins bête!}}}.}C'est papydall qui explore MEMO_RICH\par}}"
text 10,t$ : pause p
' ------------------------------------------------------------------------------
t$ = "{\rtf1\ansi "
t$ = t$ + "Voici du texte qui va passer en gras à partir d'\b ici. "
t$ = t$ + "Les espaces qui suivent\~sont\~insécables.\~Qu'est-ce\~cela\~donne\~?\~\b0(fin\~du\~gras).}"
text 10,t$ : pause p
' ------------------------------------------------------------------------------
t$ = "{\rtf1\ansi\deff0 "
t$ = t$ + "{\fonttbl "
t$ = t$ + "{\f0\fswiss\fprq2\fcharset0 Arial;} "
t$ = t$ + "{\f1\fnil\fcharset0 Times New Roman;} "
t$ = t$ + "{\f2\fswiss\fprq2\fcharset222 Tahoma;} "
t$ = t$ + "}"
t$ = t$ + "\f0 Voici de l'Arial.\par"
t$ = t$ + "\f1 Voici du Times.\par"
t$ = t$ + "\f2 Voici du Tahoma.\par"
t$ = t$ + "}"
text 10,t$ : pause p
' ------------------------------------------------------------------------------
t$ = "{\rtf1\ansi\deff0 "
t$ = t$ + "{\fonttbl"
t$ = t$ + "{\f0\fnil\fcharset0 Times New Roman;}"
t$ = t$ + "}"
t$ = t$ + "{\colortbl"
t$ = t$ + ";\red0\green0\blue255;\red255\green0\blue0;"
t$ = t$ + "}"
t$ = t$ + "\cf1\f0 Voici du bleu\par"
t$ = t$ + "\cf2 Voici du rouge\par"
t$ = t$ + "\cf0 Voici de l'automatique\par"
t$ = t$ + "}"
text 10,t$ : pause p
' ------------------------------------------------------------------------------
t$ = "{\rtf1\ansi\ \deff0"
t$ = t$ + "\trowd \trgaph108"
t$ = t$ + "\cellx3600"
t$ = t$ + "\pard\intbl Première cellule\cell"
t$ = t$ + "\cellx7200"
t$ = t$ + "Deuxième cellule\cell"
t$ = t$ + "{\row }"
t$ = t$ + "\trowd \trgaph108"
t$ = t$ + "\cellx3600"
t$ = t$ + "\pard\intbl Ligne suivante\cell"
t$ = t$ + "\cellx7200"
t$ = t$ + "Cellule en bas à droite\cell"
t$ = t$ + "{\row}"
t$ = t$ + "}"
text 10,t$ : pause p
' ------------------------------------------------------------------------------

end
rem ============================================================================
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
papydall

avatar

Nombre de messages : 6056
Age : 68
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: MEMO_RICH   Ven 5 Oct 2018 - 4:29

J’ai fais quelques recherches sur le RTF avec mon ami GOOGLE.
Je vous livre mon savoir fraîchement acquis.

Enregistrez (où vous voulez) le fichier texte suivant  sous Document_RTF.txt

Document_RTF.txt:
 


Puis exécutez le code Panoramic suivant.

Code:

rem ============================================================================
rem                    Syntaxe RTF
rem ============================================================================                                    
memo_rich 10 : full_space 10 : bar_both 10
file_load 10,"c:\users\acer\desktop\Document_RTF.txt" : ' Adapter le chemin
rem ============================================================================



Bonne lecture !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Jean Claude

avatar

Nombre de messages : 5733
Age : 64
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: MEMO_RICH   Ven 5 Oct 2018 - 8:35

Bravo Papydall pour la démonstration et la recherche.

Voilà de quoi s'amuser Very Happy

A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



Nombre de messages : 6407
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: MEMO_RICH   Ven 5 Oct 2018 - 9:30

Merci papydall, sympa la doc.

Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: MEMO_RICH   

Revenir en haut Aller en bas
 
MEMO_RICH
Revenir en haut 
Page 1 sur 1

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: A l'aide!-
Sauter vers: