FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  RechercherRechercher  Dernières imagesDernières images  S'enregistrerS'enregistrer  MembresMembres  Connexion  
Derniers sujets
» Logiciel de planétarium.
KGF_dll - nouvelles versions - Page 23 Emptypar Pedro Aujourd'hui à 10:37

» Un autre pense-bête...
KGF_dll - nouvelles versions - Page 23 Emptypar Froggy One Jeu 21 Nov 2024 - 15:54

» Récupération du contenu d'une page html.
KGF_dll - nouvelles versions - Page 23 Emptypar Pedro Sam 16 Nov 2024 - 14:04

» Décompilation
KGF_dll - nouvelles versions - Page 23 Emptypar JL35 Mar 12 Nov 2024 - 19:57

» Un album photos comme du temps des grands-mères
KGF_dll - nouvelles versions - Page 23 Emptypar jjn4 Mar 12 Nov 2024 - 17:23

» traitement d'une feuille excel
KGF_dll - nouvelles versions - Page 23 Emptypar jjn4 Jeu 7 Nov 2024 - 3:52

» Aide-mémoire mensuel
KGF_dll - nouvelles versions - Page 23 Emptypar jjn4 Lun 4 Nov 2024 - 18:56

» Des incomprèhension avec Timer
KGF_dll - nouvelles versions - Page 23 Emptypar Klaus Mer 30 Oct 2024 - 18:26

» KGF_dll - nouvelles versions
KGF_dll - nouvelles versions - Page 23 Emptypar Klaus Mar 29 Oct 2024 - 17:58

» instructions panoramic
KGF_dll - nouvelles versions - Page 23 Emptypar maelilou Lun 28 Oct 2024 - 19:51

» Figures fractales
KGF_dll - nouvelles versions - Page 23 Emptypar Marc Ven 25 Oct 2024 - 12:18

» Panoramic et Scanette
KGF_dll - nouvelles versions - Page 23 Emptypar Yannick Mer 25 Sep 2024 - 22:16

» Editeur d étiquette avec QR évolutif
KGF_dll - nouvelles versions - Page 23 Emptypar JL35 Lun 23 Sep 2024 - 22:40

» BUG QR Code DelphiZXingQRCode
KGF_dll - nouvelles versions - Page 23 Emptypar Yannick Dim 22 Sep 2024 - 11:40

» fichier.exe
KGF_dll - nouvelles versions - Page 23 Emptypar leclode Ven 20 Sep 2024 - 19:02

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Novembre 2024
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
252627282930 
CalendrierCalendrier
Le Deal du moment :
Code promo Nike : -25% dès 50€ ...
Voir le deal

 

 KGF_dll - nouvelles versions

Aller en bas 
+12
JL35
Oscaribout
bignono
Pedro
pascal10000
silverman
Jicehel
papydall
Minibug
Marc
Yannick
Klaus
16 participants
Aller à la page : Précédent  1 ... 13 ... 22, 23, 24 ... 31 ... 40  Suivant
AuteurMessage
JL35




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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptySam 30 Déc 2017 - 13:23

J'ai eu également ce problème avec KGF.chm, (je ne l'ai plus après un dernier téléchargement).
Mais c'est bizarre quand même Marc cette histoire de blocage de sécurité, avec affichage du sommaire mais pas des rubriques... ça aurait dû bloquer le tout ?
Revenir en haut Aller en bas
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptySam 30 Déc 2017 - 13:24

Un grand MERCI à toi, Maître Jedi ! Ta maîtrise de la Force ouvre la voie aux autres Panoramicens...
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Minibug

Minibug


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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptySam 30 Déc 2017 - 13:31

Le problème n'est pas le même pour moi !

J'ai réussi à accéder au fichier en décochant la croix en bas de la fenêtre :

  ' Toujours demander avant d'ouvrir ce fichier '

KGF_dll - nouvelles versions - Page 23 Sans_t17

Et après tout s'affiche correctement.

J'ai testé plusieurs fois...
Revenir en haut Aller en bas
http://gpp.panoramic.free.fr
pascal10000

pascal10000


Nombre de messages : 812
Localisation : Troyes
Date d'inscription : 05/02/2011

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptySam 30 Déc 2017 - 14:46



lorsque vous téléchargez kgf.chm .il faut également télécharger le fichier
kgf.chw qui lui est un fichier qui joint avec .chm
il représente la hiérarchie des index de chm
Revenir en haut Aller en bas
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptySam 30 Déc 2017 - 15:07

Inutile, Pascal10000. Celui du WebDav est ancien (il date de 2016...) et je l'ai supprimé. Il sera recréé automatiquement en lançant KGF.chm, suivant l'ouverture de l'indexe, de la recherche etc. Au moins, il sera à jour.
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Oscaribout




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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptySam 30 Déc 2017 - 21:41

Bravo! les maitres ont parlés. Tout est ok.
Revenir en haut Aller en bas
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyDim 31 Déc 2017 - 10:32

Nouvelle version:
KGF.dll V8.23 du 31/12/2017

Nouveautés:
- nouveau paramètre pour les fonctions StartSelectedScanner et StartScannerWithDialog

Modules modifiés:
KGF.dll
KGF.chm


La doc et les sources sont à jour.

Ce nouveau paramètre permet d'activer la possiblité de redresser automatiquement une image scannée qui n'aurait pas été placée correctement dans les repères orthogonales, en effectuant la rotation nécessaire pour retrouver les lignes verticales et horizontales.
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Oscaribout




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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyDim 31 Déc 2017 - 13:15

Bonjour à tous, et mes meilleurs voeux pour 2018.

J'essaye lorsque j'ai un peu de temps, de tester le RichEdit pendant que c'est d'actualité.
J'ai du mal à saisir. Lorsqu'on lance les tabulations, cela efface ce qui se trouve dans la fenêtre. Autre problème, et je ne compprend pas: On charge une image, et alors le moindre clic nous retire du richEdit, c'est comme si on cliquait sur la touche TAB.

Oui apparemment cela vient du chargement de l'image. Dès qu'elle est chargée, les clics deviennent des tabulations. Question Question Question
Revenir en haut Aller en bas
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyDim 31 Déc 2017 - 15:51

Je vais regarder ça, mais seulement l'année prochaine Laughing Laughing Laughing

Bonne année à vous tous !
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyLun 1 Jan 2018 - 18:09

Nouvelle version:
KGF.dll V8.24 du 31/12/2017

Nouveautés:
- nouvelle fonction: CreateSpecialObjectMover pour ALPHA et PICTURE

Modules modifiés:
KGF.dll
KGF.chm


La doc et les sources sont à jour.

Avec cette fonction, le champ d'applciation de ObjectMover englobe maintenant tous les objets visibles de Panoramic et sera facilement extensible à d'autres objets à venir éventuellement. L'utilisation de l'ObjectMover est exactement identique, mais cette nouvelle fonction était nécessaire pour pouvoir gérer des objets "non fenêtrées" qui n'ont pas de handle.

Voici la démo:
Code:
' demo_ObjectMover.bas

label clic1, clic21, user, click40, click50
dim res% : ' valeur retour des fonctions de la DLL
dim OM1%, OM20%, OM40%, OM50% : ' objets ObjectMover
dim type% : ' valeur passant de façon cyclique de 0 à 4 pour déterminer l'emplacement de OM1%
dim EventData%(3) : ' tableau de 4 valeurs rempli par les objets OM1% et OM20% lors d'un USER_EVENT

dll_on "KGF.dll"

' Valable pour tout ce qui a un handle et peut recevoir un clic:
form 1 : top 1,60 : left 1,700 : on_click 1,clic1
' edit 1 : top 1,100 : left 1,200 : on_click 1,clic1
' spin 1 : top 1,100 : left 1,200 : on_click 1,clic1
' container 1 : top 1,100 : left 1,200 : on_click 1,clic1
' panel 1 : top 1,100 : left 1,200 : on_click 1,clic1
' ...

button 2 : caption 2,"Créer" : on_click 2,clic1
picture 3 : top 3,40 : left 3,10 : width 3,30 : height 3,30 : color 3,0,255,255
picture 31 : top 31,40 : left 31,40 : width 31,30 : height 31,30 : color 31,255,255,0


form 20 : border_hide 20 : top 20,300 : left 20,600
clipboard_copy 3
OM20% = dll_call6("CreateObjectMover",handle(20),1,0,0,width_client(20),22)
res% = dll_call5("SetObjectMoverImage",OM20%,0,0,0,0)
res% = dll_call2("SetObjectMoverUserEvent",OM20%,adr(EventData%))
button 21 : height 21,20 : top 21,1 : left 21,10 : caption 21,"Cliquez-moi" : on_click 21,clic21
parent 21,20

picture 40 : top 40,70 : left 40,200 : width 40,300 :height 40,200 : on_click 40,click40
alpha 50 : top 50,330 : left 50,10 : caption 50,"Label à déplacer - cliquer ici" : on_click 50,click50
 
color 3,255,0,0
alpha 4 : top 4,90 : left 4,10 : caption 4,"Icône interne:"
spin 5 : top 5,110 : left 5,10 : width 5,50 : min 5,0 : max 5,362 : position 5,362    : ' numéro de l'icône "état normal" pour OM1% !

alpha 6 : top 6,150 : left 6,10 : caption 6,"Largeur:"
spin 7 : top 7,170 : left 7,10 : width 7,50 : min 7,0 : max 7,width_client(1) : position 7,0
alpha 8 : top 8,200 : left 8,10 : caption 8,"Hauteur:"
spin 9 : top 9,220 : left 9,10 : width 9,50 : min 9,0 : max 9,height_client(1) : position 9,0

alpha 10 : top 10,260 : left 10,10 : caption 10,"User event:"
edit 11 : top 11,280 : left 11,10 : width 11,600

on_user_event user
gosub clic1

end

clic1:
  if OM1%=0
    OM1% = dll_call6("CreateObjectMover",handle(1),type%,int(width_client(1)/2)-15,int(height_client(1)/2)-15,position(7),position(9))
    res% = dll_call2("SetObjectMoverUserEvent",OM1%,adr(EventData%))
    type% = type% + 1
    if type%=5 then type% = 0
    if object_type(1)=7 then to_foreground 1
    if position(5)=0
      clipboard_copy 3
      res% = dll_call5("SetObjectMoverImage",OM1%,1,0,0,0)
      clipboard_copy 31
      res% = dll_call5("SetObjectMoverImage",OM1%,0,0,1,0)
    else
      res% = dll_call5("SetObjectMoverImage",OM1%,2,position(5),1,0)
    end_if
    caption 2,"Supprimer"
  else
    OM1% = dll_call1("DeleteObjectMover",OM1%)
    caption 2,"Créer"
    if object_type(1)=7 then to_foreground 1
  end_if
  return
 
clic21:
  message "Je sais - vous avez voulu essayer..."
  return
 
user:
  if OM1%<>0
    if user_event_WParam=OM1%
      text 11,"Objet="+hex$(OM1%)+": wparam="+hex$(user_event_wparam)+"  lparam="+hex$(user_event_lparam)+"        EventData: x="+str$(EventData%(0))+" y="+str$(EventData%(1)) + " lparam="+hex$(EventData%(2))+" objet="+hex$(EventData%(3))
      return
    end_if
  end_if
  if OM20%<>0
    if user_event_WParam=OM20%
      text 11,"Objet="+hex$(OM20%)+": wparam="+hex$(user_event_wparam)+"  lparam="+hex$(user_event_lparam)+"        EventData: x="+str$(EventData%(0))+" y="+str$(EventData%(1)) + " lparam="+hex$(EventData%(2))+" objet="+hex$(EventData%(3))
      return
    end_if
  end_if
  if OM40%<>0
    if user_event_WParam=OM40%
      text 11,"Objet="+hex$(OM40%)+": wparam="+hex$(user_event_wparam)+"  lparam="+hex$(user_event_lparam)+"        EventData: x="+str$(EventData%(0))+" y="+str$(EventData%(1)) + " lparam="+hex$(EventData%(2))+" objet="+hex$(EventData%(3))
      return
    end_if
  end_if
  if OM50%<>0
    if user_event_WParam=OM50%
      text 11,"Objet="+hex$(OM50%)+": wparam="+hex$(user_event_wparam)+"  lparam="+hex$(user_event_lparam)+"        EventData: x="+str$(EventData%(0))+" y="+str$(EventData%(1)) + " lparam="+hex$(EventData%(2))+" objet="+hex$(EventData%(3))
      return
    end_if
  end_if
'  text 11,"Oups..."
  text 11,"Oups wparam="+hex$(user_event_wparam)+"  lparam="+hex$(user_event_lparam)+"        EventData: x="+str$(EventData%(0))+" y="+str$(EventData%(1)) + " lparam="+hex$(EventData%(2))+" objet="+hex$(EventData%(3))
  return

click40:
  if OM40%=0
    OM40% = dll_call6("CreateSpecialObjectMover",handle(0),object_internal(40),0,0,16,16)
    res% = dll_call2("SetObjectMoverUserEvent",OM40%,adr(EventData%))
    if position(5)=0
      clipboard_copy 3
      res% = dll_call5("SetObjectMoverImage",OM40%,1,0,0,0)
      clipboard_copy 31
      res% = dll_call5("SetObjectMoverImage",OM40%,0,0,1,0)
    else
      res% = dll_call5("SetObjectMoverImage",OM40%,2,362,2,364)
    end_if
  else 
    OM40% = dll_call1("DeleteObjectMover",OM40%)
  end_if
  return
 
click50:
  if OM50%=0
    OM50% = dll_call6("CreateSpecialObjectMover",handle(0),object_internal(50),0,0,16,16)
    res% = dll_call2("SetObjectMoverUserEvent",OM50%,adr(EventData%))
    if position(5)=0
      clipboard_copy 3
      res% = dll_call5("SetObjectMoverImage",OM50%,1,0,0,0)
      clipboard_copy 31
      res% = dll_call5("SetObjectMoverImage",OM50%,0,0,1,0)
    else
      res% = dll_call5("SetObjectMoverImage",OM50%,2,362,2,364)
    end_if
  else 
    OM50% = dll_call1("DeleteObjectMover",OM50%)
  end_if
  return
 
Il y a un picture et un alpha qu'on peut déplacer aussi, maintenant.
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyLun 1 Jan 2018 - 18:11

@Oscaribout:
As-tu un petit code à montrer pour que je puisse reproduire le problème chez moi ?
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Minibug

Minibug


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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyLun 1 Jan 2018 - 18:40

Bonsoir Klaus !

je viens de tester le code sur le déplacement des objets.
Cela mérite encore quelques ajustements mais l'idée est là...

Je trouve l'idée de la petite icône assez sympa pour la déplacement.
Du coup comme on utilise déjà la fonction DESIGNER dans KGF pourquoi ne pas compléter et adapter avec cette fonction...

Je m'explique, On sélectionne un objet et on a le cadre du DESIGNER qui apparait et pourquoi ne pas rajouter l’icône de déplacement en plein milieu et comme cela on fait d'une pierre 2 coup :
Sélection et déplacement en même temps...


Dernière édition par Minibug le Lun 1 Jan 2018 - 18:44, édité 1 fois
Revenir en haut Aller en bas
http://gpp.panoramic.free.fr
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyLun 1 Jan 2018 - 18:43

Citation :
Je m'explique, On sélectionne un objet et on a le cadre du DESIGNER qui apparait et pourquoi ne pas rajouter l’icône de déplacement en plein milieu et comme cela on fait d'une pierre 2 coup :
Sélection et déplacement en même temps...
Tiens, c'est une idée intéressante ! Je vais regarder cela.
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Minibug

Minibug


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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyLun 1 Jan 2018 - 18:49

Si tu regarde le DESIGNER, pourrais tu stp regarder la taille des carrés d'angle.
Car ils sont vraiment petits et manque de lisibilité pour modifier la taille de l'objet.
Sous réserve des possibilité technique bien sûr... Wink
Revenir en haut Aller en bas
http://gpp.panoramic.free.fr
Oscaribout




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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyLun 1 Jan 2018 - 18:57

Bonsoir Klaus

Le code en question, c'est le tien.

Code:
' test_RichEditBmpLoad.bas

label close0, charger, URLon, URLoff, dimensions
dim Largeur%, Hauteur%
dim res%, RE%, WB%, f$, RTF$, HTML$, URL$, ncar%

on_close 0,close0
full_space 0
dll_on "KGF.dll"

dim vers$, vers%  : vers$ = string$(25," ")
vers% = DLL_call1("KGFdllVersion", adr(vers$))
'  version 821

open_dialog 1 : filter 1,"Images (BMP,JPG,PNG,GIF)|*.bmp;*.jpg;*.png;*.gif"

alpha 21 : top 21,40 : left 21,10 : caption 21,"RichEdit"
alpha 22 : top 22,40 : left 22,420 : caption 22,"WebBrowser"
alpha 23 : top 23,40 : left 23,830 : caption 23,"HVIEWER"
RE% = dll_call1("RichEditCreate",handle(0))
res% = dll_call5("RichEditGeometry",RE%,10,60,400,300)

RTF$ = "MonDocument.rtf"
res% = dll_call2("RichEditFileLoad",RE%,adr(RTF$))

' if 1=2        : ' <============ mettre cette ligne en commentaire pour tester les tabulatins

ncar% = dll_call2("RichEditGetInformation",RE%,1)
res% = dll_call3("SelectRichEditText",RE%,ncar%,0)

dim tabs%(4),justif%(4)
tabs%(0) = 57
tabs%(1) = 140
tabs%(2) = 210
tabs%(3) = 250
tabs%(4) = 310
justif%(0) = 0
justif%(1) = 1
justif%(2) = 2
justif%(3) = 0
justif%(4) = 1

res% = dll_call4("RichEditSetColumns",RE%,5,adr(tabs%),adr(justif%))
url$ = "1"+chr$(9)+"2"+chr$(9)+"3"+chr$(9)+"4"+chr$(9)+"5"+chr$(9)+"6"+chr$(13)+chr$(10)
' res% = dll_call2("RichEditStringLoad",RE%,adr(url$))
res% = dll_call2("RichEditStringAppend",RE%,adr(url$))

url$ = "111"+chr$(9)+"222"+chr$(9)+"333"+chr$(9)+"444"+chr$(9)+"555"+chr$(9)+"666"+chr$(13)+chr$(10)
res% = dll_call2("RichEditStringAppend",RE%,adr(url$))
' end_if        : ' <============ mettre cette ligne en commentaire pour tester les tabulatins

button 10 : caption 10,"Image" : on_click 10,charger
button 11 : left 11,width(10) : caption 11,"URL on" : on_click 11,URLon
button 12 : left 12,left(11)+width(11) : caption 12,"URL off" : on_click 12,URLoff
button 13 : left 13,left(12)+width(12) : caption 13,"Dimensions" : on_click 13,dimensions

WB% = dll_call1("WB_Create",handle(0))
res% = dll_call5("WB_Locate",WB%,420,60,400,300)
URL$ = "file:///C:\Users\klausgunther\Documents\Mes projets\Mes projets Delphi\KGF\MonDocument.html"
res% = dll_call2("WB_Url",WB%,adr(url$))

hviewer 99 : top 99,60 : left 99,830 : width 99,400 : height 99,300

HTML$ = "MonDocument.html"
' file_load 99,HTML$  
end
' @@@@@@@@@@@@@@@@@@@@@@@@@
close0:
  res% = dll_call1("RichEditDelete",RE%)
  return

charger:
  f$ = file_name$(1)
  if f$="_" then return
  res% = dll_call3("RichEditImageLoad",RE%,0,adr(f$))  : ' image taille fixe
'  res% = dll_call3("RichEditImageLoad",RE%,1,adr(f$))  : ' image modifiable
return
  
URLon:
  res% = dll_call3("RichEditFunction",RE%,15,1)
return
  
URLoff:
  res% = dll_call3("RichEditFunction",RE%,15,0)
return
  
dimensions:
  res% = dll_call4("RichEditGetTextSizes",RE%,handle(99),adr(Largeur%),adr(Hauteur%))
  message "Résultat reçu: adr(Largeur%)="+str$(adr(Largeur%))+"  Largeur="+str$(Largeur%)+"  Hauteur="+str$(Hauteur%)
return

Bien je viens de refaire des essais. Pour rajouter du texte après avoir ajouter une image, il faut faire [ctrl fin].

Mais si on clique sur l'image on est dévié sur un autre objet.

J'ai regardé l'ensemble des attributs, Cela me semble complet, sauf que je n'ai rien trouvé concernant le background d'un texte.

J'ajoute qu'en ce qui me concerne, il n'y a pas d'urgence. L'utilisation finale n'est pas pour maintenant. J'ai seulement profité de tes nouvelles fonctions pour voir la faisabilité d'un idée.

Merci pour tout.

Ah il y a aussi le fait que l'on de l'utilisation des tabulations, le texte chargé avant a disparu.
Revenir en haut Aller en bas
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyLun 1 Jan 2018 - 20:47

Merci, je comprends mieux comme ça. Je vais voir ça.
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyMer 3 Jan 2018 - 11:51

Rapport d'étape:
Je suis en train d'implémenter l'idée de Minibug: intégrer un ObjectMover dans le Designer. C'est plus compliqué que prévu, et je suis contraint d'en réécrire une partie pour que ces deux objets puissent cohabiter et se synchroniser mutuellement. Mais j'ai passé le cap le plus difficile, et ça marche maintenant totalement pour tous les objets "normaux" - ceux qui ont un handle. Il me restent les ALPHA et PICTURE à faire.
Et j'ai bien noté ta suggestion d'agrandir les poignés du désigner. Ce sera pris en compte.
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Minibug

Minibug


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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyMer 3 Jan 2018 - 19:22

Merci Klaus ! cheers

Et bon courage pour la suite... Wink
Revenir en haut Aller en bas
http://gpp.panoramic.free.fr
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyMer 3 Jan 2018 - 19:38

Nouvelle version:
KGF.dll V8.25 du 03/01/2018

Nouveautés:
- Designer: intégration automatique d'un objet ObjectMover dans lme Designer
- Designer: agrandissement des poignées


Modules modifiés:
KGF.dll
KGF.chm


La doc et les sources sont à jour.

Voici le programme de démo, adapté à cet effet:
Code:
' pb_designer.bas

label click, fin, CT, desel, chg, change, aligner, dump

dim res%, parent%, n%, s$, selmode%, p%, obj%, i%, temp%, typ%

full_space 0 : width 0,width(0) - 200
button 1 : width 1,100 : caption 1,"Container_tab"  : on_click 1,CT
button 2 : width 2,100 : caption 2,"Stop"  : on_click 2,fin : left 2,100
combo  3 : width 3,150 : left 3,210
  item_add 3,"Cadre intérieur"
  item_add 3,"Cadre extérieur"
combo 4  : width 4,150 : left 4,370 : on_click 4,chg
  item_add 4,"Un objet seul"
  item_add 4,"Sélection d'objets"
alpha 5  : left 5,540 : caption 5,"Largeur de grille magnétique:"
spin 6 : left 6,690 : width 6,40 : min 6,1 : max 6,20 : position 6,1
combo 7 : left 7,750 : width 7,180
  item_add 7,"Aucun alignement"
  item_add 7,"Alignement à gauche"
  item_add 7,"Alignement en haut"
  item_add 7,"Alignement à droite"
  item_add 7,"Alignement en bas"
  item_add 7,"Alignement en largeur"
  item_add 7,"Alignement en hauteur"
  item_add 7,"Alignement en largeur et hauteur"
  text 7,item_read$(7,1)
button 8 : left 8,940 : caption 8,"Aligner" : on_click 8,aligner


' les 3 objets suivants pourront être déplacés et/ou redimensionnés
memo 10 : top 10,40 : on_click 10,click
alpha 11 : top 11,40 : left 11,200 : caption 11,"Libellé" : on_click 11,click
button 12 : top 12,70 : left 12,200 : caption 12,"Test" : on_click 12,click
picture 13 : top 13,400 : left 13,400 : on_click 13,click

container 30 : top 30,150 : left 30,10 : caption 30,"Mon container"
  width 30,300 : height 30,200 : on_click 30,click
list 31 : parent 31,30 : top 31,20 : left 31,10 : on_click 31,click
  item_add 31,"Cliquer ici"

container_tab 40 : top 40,40 : left 40,320 : width 40,400 : height 40,300
tab 41 : parent 41,40 : caption 41,"Premier onglet"
tab 42 : parent 42,40 : caption 42,"Deuxième onglet"
tab 43 : parent 43,40 : caption 43,"Troisième onglet"

alpha 44 : parent 44,41 : top 44,20 : left 44,20 : caption 44,"AAAA" : on_click 44,click
alpha 45 : parent 45,42 : top 45,20 : left 45,20 : caption 45,"BBBB" : on_click 45,click
alpha 46 : parent 46,43 : top 46,20 : left 46,20 : caption 46,"CCCC" : on_click 46,click

form 100 : left 100,width(0)+1 : height 100,height(0) : width 100,200
  caption 100,"Objets sélectionnés"
list 101 : parent 101,100 : full_space 101 : on_click 101,desel
memo 102 : top 102,400 : left 102,20 : width 102,300 : height 102,100
  bar_both 102
  on_change 102,change : ' hide 102

dll_on "KGF.dll"
res% = dll_call2("SelectComboBoxItem",handle(3),2)
res% = dll_call2("SelectComboBoxItem",handle(4),1)
selmode% = item_index(4)


' gosub dump

end
 
dump:
memo 177 : full_space 177 : bar_both 177
left 12,1234
top 12,2345
width 12,432
height 12,321
res% = dll_call3("DumpPanoramic",handle(177),object_internal(13),150)
' item_add 177,"handle=$"+hex$(handle(13))+"="+str$(handle(13))
return


change:
  for i%=1 to count(102)
    s$ = trim$(item_read$(102,i%))
    if s$="" then return
    p% = instr(s$,",")
    obj% = val(left$(s$,p%-1))
    s$ = mid$(s$,p%+1,100)
    p% = instr(s$,",")
    left obj%,val(left$(s$,p%-1))
    s$ = mid$(s$,p%+1,100)
    p% = instr(s$,",")
     top obj%,val(left$(s$,p%-1))
    s$ = mid$(s$,p%+1,100)
    p% = instr(s$,",")
    width obj%,val(left$(s$,p%-1))
    s$ = mid$(s$,p%+1,100)
    height obj%,val(s$)
  next i%
  return

CT:
  obj% = 40
  parent% = parent(40)
  select item_index(4)
    case 1: res% = dll_call5("RegisterObjectForDesigner",40,handle(parent%),handle(102),object_internal(40), item_index(3)-1)
    case 2: res% = dll_call6("DesignerFunction",1,40,handle(parent%),handle(102),object_internal(40), item_index(3)-1)
  end_select
  res% = dll_call6("DesignerFunction",3,40,handle(101),handle(102),0,0)
  res% = dll_call6("DesignerFunction",5,40,handle(101),handle(102),0,position(6))
  return

click:
'  res% = dll_call1("TestKGF",object_internal(number_click))
'  return

  obj% = number_click
  parent% = parent(obj%)
  select item_index(4)
    case 1: res% = dll_call5("RegisterObjectForDesigner",obj%,handle(parent%),handle(102),object_internal(obj%),item_index(3)-1)
    case 2: res% = dll_call6("DesignerFunction",1,obj%,handle(parent%),handle(102),object_internal(obj%),item_index(3)-1)
  end_select
  res% = dll_call6("DesignerFunction",3,obj%,handle(101),handle(102),0,0)
  res% = dll_call6("DesignerFunction",5,obj%,handle(101),handle(102),0,position(6))
  return

fin:
  select item_index(4)
    case 1: res% = dll_call0("UnregisterObjectFromDesigner") : ' libérer l'objet capturé
    case 2: res% = dll_call6("DesignerFunction",0,0,0,0,0,0)
  end_select
  res% = dll_call6("DesignerFunction",3,obj%,handle(101),handle(102),0,0)
  return

desel:
  s$ = item_read$(101,item_index(101))
  n% = val(s$)
  res% = dll_call6("DesignerFunction",2,obj%,handle(parent%),handle(102),n%,0)
  res% = dll_call6("DesignerFunction",3,obj%,handle(101),handle(102),0,0)
  return

chg:
  select selmode%
    case 1: res% = dll_call0("UnregisterObjectFromDesigner") : ' libérer l'objet capturé
    case 2: res% = dll_call6("DesignerFunction",0,0,0,0,0,0)
  end_select
  res% = dll_call6("DesignerFunction",3,obj%,handle(101),handle(102),0,0)
  selmode% = item_index(4)
  return
  
aligner:
  res% = dll_call6("DesignerFunction",6,obj%,handle(101),handle(102),0,item_index(7)-1)
  return
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Minibug

Minibug


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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyMer 3 Jan 2018 - 19:52

je viens de tester et c'est vraiment super !
BRAVO Klaus ! cheers

Par contre j'ai des problèmes avec la petite icône de déplacement en haut à gauche...
Il lui arrive de quitter l'objet et elle part 'dans la nature' à travers l'écran Exclamation Question

je n'ai pas approfondi le test car je pense qu'il te reste peut être quelques petites choses à voir.
Sinon dis moi et je te décris avec précision le problème... Wink
Revenir en haut Aller en bas
http://gpp.panoramic.free.fr
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyMer 3 Jan 2018 - 20:43

Oui, je me doute que ce n'est pas encore tout à fait étanche. C'était un gros travail, avec la réécriture d'environ 50 % de chacun des deux composants, pour pouvoir implémenter une stratégie permettant de les marier. Si tu peux me décrire une manipulation qui provoque une anomalie, ça me permettra de pister le problème.

Est-ce que les poignées sont suffisantes, maintenant ?
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Minibug

Minibug


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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyMer 3 Jan 2018 - 21:08

La première chose c'est les parties noires qui apparaissent sur la sélection jaune lors des agrandissements.

KGF_dll - nouvelles versions - Page 23 Sans_t18


ensuite lors de la modification de la largeur de la grille magnétique à 10 l'icone se sauve.

KGF_dll - nouvelles versions - Page 23 Sans_t21

Voila pour le moment. bon courage... drunken
Revenir en haut Aller en bas
http://gpp.panoramic.free.fr
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyMer 3 Jan 2018 - 23:55

Bien, je vais voir ça...
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Oscaribout




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

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyJeu 4 Jan 2018 - 0:49

Bonsoir Klaus.

Il n'y a pas d'urgence, mais comme j'ai constaté quelques problèmes, je préfère en parler maintenant, car je vais maintenant sur autre chose, et je risque d'oublier.

plusieurs remarques:

1) Le RichEdit fonctionne comme q'il y avait un tampon. On charge un ficher, et on est vite arrêté par le nombre de caractères à insérer. Il faut en enlever plus haut pour en rajouter autant, quelque soit la grandeur du fichier chargé.

2) Je ne vois pas de possibilité de sauvegarder ou de lire une ligne en
format texte sans le formatage. Normalement pour la sauvegarde d'un fichier rtf, en changeant l'extension en "txt", on a une sauvegarde sans formatage (de ce que je me rappel)

3) Il manque la possibilité de mettre une couleur de surlignage, mais ça c'est peut-être moins important quoique?.

4) Ah oui! je constate aussi que le déplacement dans le texte avec les flèches, fait sortir le focus du RichEdit, et se comporte comme des tabulations. Mais peut-être en résolvant les problèmes cités ailleurs, cela répondra à ce problème.

J'ai pas essayé toutes les fonctions, je vois pas en quoi les autres répondront aux problèmes cités, mais peut-être ai-je tord. Je manque de temps.

Je me lève de très bonne heure, donc Sleep Sleep
Revenir en haut Aller en bas
Klaus

Klaus


Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009

KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 EmptyJeu 4 Jan 2018 - 2:09

Nouvelle version:
KGF.dll V8.26 du 04/01/2018

Nouveautés:
- Designer: correction du problème du ObjectMover évanescent
- Designer: correction du problème de traces noires après agrandissement


Modules modifiés:
KGF.dll

La doc est inchangée. Les sources seront à jour prochainement.

Contrairement à ce que je pensais, le problème du ObjectMover était assez simple à résoudre, mais les traces noires dans la bordure sont plus difficiles à prévenir. Je travaille dessus. Mais le problème bloquant est résolu.

Les deux problèmes signalés sont résolus. Lorsqu'on relâche le bouton gauche de la souris après agrandissement, le cadre est redessiné proprement, sans ces traces. Et l'ObjectMouver reste maintenant bien à sa place.
Revenir en haut Aller en bas
http://klauspanoramic.comxa.com/index.html
Contenu sponsorisé





KGF_dll - nouvelles versions - Page 23 Empty
MessageSujet: Re: KGF_dll - nouvelles versions   KGF_dll - nouvelles versions - Page 23 Empty

Revenir en haut Aller en bas
 
KGF_dll - nouvelles versions
Revenir en haut 
Page 23 sur 40Aller à la page : Précédent  1 ... 13 ... 22, 23, 24 ... 31 ... 40  Suivant
 Sujets similaires
-
» KGF_dll - nouvelles versions
» KGF_dll - nouvelles versions
» KGF_dll - nouvelles versions
» Synedit_Editor - nouvelles versions
» version instantanée PANORAMIC V 0.9.25i6 du 14/12/2013

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: Activité des sites créés par les Panoramiciens. :: Le site de Klaus-
Sauter vers: