Page 1 sur 2
recherche de ville francaise
Publié : mar. 27/avr./2004 9:17
par Flype
coucou à tous ceux que je connais et autres
je developpe en ce moment pour ma boite un progiciel qui n'est censé servir qu'aux gens qui partage actuellement mon métier ( la monétique )
mais une fonction pourrait peut etre vous interesser !
j'ai inclus dans le prog de quoi rechercher une ville par son nom ou par son code postal. il y a aussi les prefectures, les departements, les regions...
A qui puis-je balancer un zip pour que vous puissiez y jeter un oeil ?
-----------
Merci au Soldat Inconnu pour l'hebergement sur son serveur des ScreenShots et de l'archive :
http://perso.wanadoo.fr/lesoldatinconnu ... panel1.jpg
http://perso.wanadoo.fr/lesoldatinconnu ... panel2.jpg
et le fichier zip :
http://perso.wanadoo.fr/lesoldatinconnu ... uerite.zip (500ko)
Publié : mar. 27/avr./2004 10:06
par Le Soldat Inconnu
salut Flype,
ça fait plaisir de te voir
tu peux me l'envoyer, je le mettrai sur mon ftp
Publié : mar. 27/avr./2004 10:10
par Flype
ha, regis, quelqu'un sur qui on peut compter
ok envoyé
Publié : mar. 27/avr./2004 10:20
par Anonyme2
Salut Flype !
Content, très content de te relire sur le Forum !

Publié : mar. 27/avr./2004 10:24
par Flype
oui moi aussi...
ya des choses qui changent pas, je suis toujours aussi mordu de pb
mais parfois g internet parfois pas alors je me suis peu a peu detaché du forum d'autant qu'il y a (eu) des hauts et des bas.
mais c pas grave zetes toujours mes pb user favoris

en tout cas merci denis pour ta lib listicon qui ne m'a jamais autant servit que dans ce prog qui fait la joie de mes collegues et de mon patron...
Publié : mar. 27/avr./2004 10:45
par Anonyme2
Merci,
la version 1.31 a encore un bug sur la gestion des couleur des lignes/colonnes/cellules lorque on utilise plusieurs ListIcon, et dans des cas particuliers, corrigé avec la prochaine version mais vraiment, les thèmes XP me font c... et j'ai quelques problèmes avec la taille du header.
Normalement la prochaine version permettra d'utiliser les polices dans les cellules sauf que de la manière dont c'est fait, les lignes ne sont pas redimensionnées

ainsi que des commandes pour mettre des images/icônes dans les en-têtes de colonnes avec la gestion de la transparence (j'ai beaucoup ramé pour arriver à un truc qui à l'air d'aller et qui utilise les commandes Catchimage et loadimage de PB et je pense que celà doit marcher avec la gestion des autres formats utilisé par la librairie de El_Choni, mais faut que je fasse encore des tests et j'ai laissé tombé car les problèmes avec les thèmes XP m'ont fatigué...)
Et puis il y a la doc, c'est longgggggggggggggg
Publié : mar. 27/avr./2004 10:57
par Flype
j'avais remarqué un bug sur XP mais sans thème et concernant la colorisation des items : lorsque le ListIconGadget est imbriqué dans un splitter la colorisation ne faisait pas. genant j'avais du laisser tomber.
pas grave m'en suis sorti autrement
Publié : mar. 27/avr./2004 11:01
par Anonyme2
Merci de l'info,
je vais regarder si je trouve ce qui ne va pas.
Publié : mar. 27/avr./2004 11:47
par Flype
je viens d'essayer et ca marche la preuve avec ce bout de code.
n'empeche avant ca marchait pas. c'est peut etre grace à pb 3.90
Code : Tout sélectionner
OpenWindow(0,50,50,500,500,#pb_window_systemmenu |# PB_Window_SizeGadget,"ListIcon")
CreateGadgetList(WindowID())
ListIconGadget(0,5,5,490,490,"Col1",80,#PB_ListIcon_FullRowSelect | #PB_ListIcon_HeaderDragDrop | #PB_ListIcon_AlwaysShowSelection)
AddGadgetColumn(0,1,"Col2",80)
AddGadgetColumn(0,2,"Col3",80)
ligne$ = "a"+Chr(10)+"b"+Chr(10)+"c"
AddGadgetItem(0,-1,ligne$)
AddGadgetItem(0,-1,ligne$)
AddGadgetItem(0,-1,ligne$)
AddGadgetItem(0,-1,ligne$)
SetColumnColor(0,1,$88FFFF,$AAAAAA)
SetItemColor(0,1,1,$000000,$88FFFF)
TextGadget(1,0,0,0,0,"Essai",#PB_Text_Center|#PB_Text_Border)
SplitterGadget(2,5,5,490,490,0,1)
Procedure CB(WindowID,Message,wParam,lParam)
result = #PB_ProcessPureBasicEvents
If Message=#WM_SIZE
ResizeGadget(2,5,5,WindowWidth()-10,WindowHeight()-10)
EndIf
ProcedureReturn result
EndProcedure
SetWindowCallback(@CB())
Repeat : Until WaitWindowEvent()=#pb_event_closewindow
Publié : mar. 27/avr./2004 13:17
par Anonyme2
Ouf, ca marche,
car ça voulait dire que les événements gérés dans la callback n'étaitent pas interceptés !
Publié : mar. 27/avr./2004 15:02
par Le Soldat Inconnu
Publié : mar. 27/avr./2004 15:10
par Flype
merci regis
dites moi juste si la partie "france" vous interesse...
parceque pour le reste cà ne concernera presque personne
si oui j'en ferais un prog à part

Publié : mar. 27/avr./2004 15:16
par Anonyme2
J'aime beaucoup les couleurs, ça change des fenêtres grises si tristes.
Sinon le boutons couleurs, tu fais comment ? car moi j'utilise un code de François Weil (il est de retour sur le forum Anglais) avec des commandes 2D.
Je ne me suis pas encore penché sur une librairie pour la couleur des boutons mais j'aimerais bien en faire une petite.
Publié : mar. 27/avr./2004 15:20
par Anonyme2
Je prend et même le source si t'es d'accord.
Publié : mar. 27/avr./2004 16:04
par Flype
franchement si tu savais...
pour les boutons du bas ( nouveau, imprimer, ... ) se sont simplement des ButtonImageGadget() LOL et oui pareil, je dessine à la volée des imagettes avec les fonctions 2d
par contre les TextGadget ( en noir dans mon prog ) sont basé sur qqchose que tu doit bien connaitre :
Code : Tout sélectionner
Global FOND_NOIR.l
FOND_NOIR = CreateSolidBrush_($000000)
Procedure APP_CallBack(WindowID,Message,wParam,lParam)
result = #PB_ProcessPureBasicEvents
Select Message
Case #WM_CTLCOLORSTATIC
If lParam=GadgetID(0)
SetBkMode_(wParam,#TRANSPARENT)
SetTextColor_(wParam,$FFFFFF)
SetBkColor_(wParam,$000000)
result=FOND_NOIR
EndIf
EndSelect
ProcedureReturn result
EndProcedure
l'important etant de retourner la "brush" qu'on peut ensuite effacer grace à DeleteObject_()
j'utilise le meme principe pour les ComboBox() et les EditorGadget() grace aux Evenements :
#WM_CTLCOLORLISTBOX
#WM_CTLCOLOREDIT
bon j espere ne pas avoir fait de faute - je viens de tapez çà à la volée...