Page 1 sur 1
EditorGadget ReadOnly
Publié : dim. 01/août/2004 22:27
par Aranoth
Bonsoir,
j'ai un petit problemo (encore ?
)
Cette fois ci avec EditorGadget, j'aimerais faire qu'on ne puisse rien écrire dedans sans SetGadgetText.
J'ai essayé de le remplacer par StringGadget avec Multiline et ReadOnly, mais Chr(10) faisait un carré noir et pas un saut de ligne
Si vous savez comment empecher l'écriture dans un EditorGadget je suis preneur
Merci
Publié : dim. 01/août/2004 22:49
par Oliv
Publié : dim. 01/août/2004 23:01
par Aranoth
merci beaucoup
mais...avec la lib ToolTip du Soldat Inconnu (pour skinner les boutons) ca plante
je verrais mieux demain, encore merci de ton aide !
Publié : dim. 01/août/2004 23:22
par Oliv
de rien, sinon si le fait d'avoir un éditorgadget tout gris ne te dérange pas,fait une recherche sur le musée.
Publié : lun. 02/août/2004 7:58
par Heis Spiter
Vite fait avant mon départ
:
Pour plus d'infos, voir les sources de Bird Chat : ClientInclude.pb
Publié : lun. 02/août/2004 12:28
par Aranoth
Aah ! le code de Heis fonctionne parfaitement avec la lib ToolTip, merci à vous deux
Publié : mer. 04/août/2004 20:08
par Flype
sinon ya ca aussi :
Code : Tout sélectionner
OpenWindow(0,0,0,320,240,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"EditorGadget()")
CreateGadgetList(WindowID())
Frame3DGadget(0,10,10,300,190,"En lecture seule")
EditorGadget(1,20,30,280,160)
ButtonGadget(2,190,208,120,24,"Fermer",#PB_Button_Default)
For i=0 To 50 : AddGadgetItem(1,i,"ligne de test "+Str(i)) : Next
; Méthode (1)
SendMessage_(GadgetID(1),#EM_SETOPTIONS,#ECOOP_OR,#ECO_READONLY)
SendMessage_(GadgetID(1),#EM_SETOPTIONS,#ECOOP_OR,1)
; Méthode (2)
;SendMessage_(GadgetID(1),#EM_SETREADONLY,#TRUE,0)
Repeat
Select WaitWindowEvent()
Case #PB_EventCloseWindow : Break
Case #PB_EventGadget
Select EventGadgetID()
Case 2 : Break
EndSelect
EndSelect
ForEver