| |
| |
|
| - page 1 - |
|
Rolf
Koch | suis un Stückchen weitergekommen.
Erstellt la fois une Button per ROC.
Dem Button un Tooltip zuordnen
allez dans den Subclassmanager
Aktiviert là Sous-classe pour %hwnd
cherchez den Eintrag: WM_NOTIFY
Anklicken et folgendes dans qui Si Abfrage écrivons:
imprimer %notifycode;
Sauver
Startet cet erstellte Dossier avec einer Profan avec Manifest et einmal sans Manifest.
avec Manifest volonté qui données fonctionnement. sans wird garnix angezeigt.
si là qui Wurm begraben liegt?
Rolf |
|
| |
| |
| |
|
| |
| |
| - page 2 - |
|
|
RGH | [quote-part:830c00dcca=Rolf Koch]Kleinigkeit ist encore là. si on geklickt hat, so bleibt qui Tip toujours jusqu'à pour einem Focuswechsel verschwunden. mais avec cela pourrait on oui vivre.[/quote-part:830c00dcca]
c'est malheureusement aucun Kleinigkeit, mais malheureusement exakt cela vieille Problem: il faut trop einem anderen Tooltip des gleichen Tooltipcontrols échanger, avec cela il pour einem Klick wieder erscheint. si on mais seulement une Button hat, ... 
je werde plus chercher ...
Salut
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 09.05.2006 ▲ |
|
| |
|
|
Rolf
Koch | [quote-part:fa196aaad7]si on mais seulement une Button hat[/quote-part:fa196aaad7]
Oja stimmt  |
|
| |
| |
| |
|
|
RGH | mais je crois, avec einem Trick habe je es maintenant doch geschafft: quoique qui Stil TTF_SUBCLASS chez den Tooltips angegeben ist et es daher pas nötig son soll (et jusqu'à Win 2000 aussi pas nötig ist) sende je eh bien chez Mausaktionen sicherheitshalber encore la fois un TTM_RELAYEVENT à cela Tooltip-Contrôle (j'ai dans XProfan maintenant aussi seulement encore une, qui beim ersten create(Tooltip,...) geschaffen wird). et eh bien klappt es aussi sous XP et qui Tooltips venons pour einem Klick wieder!
(c'est zwar pas wirklich qui reine Solution, mais un Workaround, qui funktioniert. mais quoi dans XProfan abgeht, peux dem Anwender oui eigentlich égal son. ;) )
Salut
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 09.05.2006 ▲ |
|
| |
|
|
Rolf
Koch | Wow hört sich oui richtig SUPER à 
Sorry veux oui pas nerven avec cela, mais denkst Du ensuite dans einem aussi à den Timeout? si qui Tip sans Klick verschwindet, ist il aussi malheureusement pfutsch. ou bien hat sich ensuite avec Deiner Methode aussi erledigt? *freu* |
|
| |
| |
| |
|
|
RGH | [quote-part:21e4a8f00f=Rolf Koch]mais denkst Du ensuite dans einem aussi à den Timeout? si qui Tip sans Klick verschwindet, ist il aussi malheureusement pfutsch. ou bien hat sich ensuite avec Deiner Methode aussi erledigt? *freu*[/quote-part:21e4a8f00f]
aussi qui TimeOut pouvoir aucun Probleme plus!
Salut
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 10.05.2006 ▲ |
|
| |
|
|
Frank
Abbing | |
| |
| |
| |
|
|
Georg
Hovenbitzer | allô zusammen,
entier ist qui faute mais encore pas avec cela behoben
Läßt on den Mauszeiger so longtemps sur dem Button jusqu'à qui Timeout greift, venez qui ToolTip pas wieder si on pas auparavant une anderen angezeigt bekommt.
mais pour peux on oui qui Timeout Zeit hochdrehen. |
|
| |
| Viele Grüsse, Georg Hovenbitzer(Windows XP Pro, XProfan 11.2, Profan2Cpp 1.6a) | 12.05.2006 ▲ |
|
| |
|
|
RGH | [quote-part:6b9f9cb681=Georg Hovenbitzer]allô zusammen, entier ist qui faute mais encore pas avec cela behoben[/quote-part:6b9f9cb681]
allô Georg,
mon Aussagen beziehen sich bereits sur qui prochain Subscriptionsversion! qui scheint sur meinem XP-Testrechner et beir Rolf sous XP parfait trop courir. s'il te plaît quelque chose patience. je denke, à diesem Wochenende ist es wieder soweit ...
Salut
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 12.05.2006 ▲ |
|
| |
|
|
Alfred
Wagner | allô gens!
ici un Beispielcode,funktioniert wunderbar.
de qui cela Original ist sais je pas,je hab ihn seulement quelque chose abgeändert et viel Glück kam cela raus
KompilierenMarqueSéparation $P+
SetErrorLevel 0
DEF GETSYSCOLOR(1) !"USER32","GetSysColor"
Declare Button&,Tooltip&
Declare ToolinfoButton#,RKText1#,SA%
Proc TTip
@Sendmessage(Tooltip&,$0403,$2,30000)Dauer des Tips
Parameters rkhwnd&,Handle&,RKText$,hwf&,txtf&,rkstil&,d%
@SendMessage(Tooltip&,1048,0,500)
@SendMessage(Tooltip&,1027,3,d%)
Tooltip& = @Create("Tooltip",%Hwnd,%Hwnd,"")Tooltip auf das Haupfenster
DELETEOBJECT Sa%
Dim ToolinfoButton#,40
Dim RKText1#,500
String RKText1#,0=RKText$
LONG ToolinfoButton#,0=40Strukturgroesse
LONG ToolinfoButton#,4=$11Flags
LONG ToolinfoButton#,8=Handle&
LONG ToolinfoButton#,12=Handle&
LONG ToolinfoButton#,36=RKText1#Text
@SendMessage(Tooltip&,$0404,0,ToolInfoButton#)
Dispose ToolinfoButton#
Dispose RKText1#
Return Tooltip&
EndProc
WINDOWSTYLE 31
WINDOWTITLE "Tooltip Fenster"
WINDOW SUB(DIV(%MAXX,2),DIV(370,2)),SUB(DIV(%MAXY,2),DIV(141,2))-370,141
SETTRUECOLOR 1
DECLARE ENDE%
CLS GETSYSCOLOR(15)
USEFONT "MS Sans Serif",13,0,0,0,0
SETDIALOGFONT 1
Button& = @Control("BUTTON","Ende",$50000001,130,50,100,22,%Hwnd,100,%Hinstance,$10000)
TTip %Hwnd,Button&,"
Ein Tooltip der sich immer wieder erneuert !
"
SETFOCUS(%HWND)
WHILENOT ENDE%
WAITINPUT
If @EQU(%KEY,2)
LET ENDE%= 1
ELSEIF @EQU(%KEY,4)
ELSEIF GETFOCUS(Button&)
ENDE%= 1
ENDIF
='./../../funktionsreferenzen/XProfan/Wend/'>WEND
Schönes Wochenende allen
Alfred avec la famille |
|
| |
| |
| |
|
|
Frank
Abbing | réellement. qui Code funktioniert dans cette forme einwandfrei, quoique il oui seulement léger de allen anderen Tooltip-Codes abweicht....
Hab Alfreds Code la fois de allem Nötigen befreit, ici:
KompilierenMarqueSéparationDEF GETSYSCOLOR(1) !"USER32","GetSysColor"
Declare button1&,button2&,tooltip&,tib#
Proc TTip
Parameters rkhwnd&,handle&,rktext$
tooltip&=@Create("Tooltip",0,rkhwnd&,"")
Dim tib#,40
Clear tib#
LONG tib#,0=40 Strukturgroesse
LONG tib#,4=$11 Flags
LONG tib#,8=handle&
LONG tib#,12=handle&
LONG tib#,36=Addr(RKText$)
@SendMessage(Tooltip&,$0404,0,tib#)
Dispose tib#
RETURN tooltip&
EndProc
WindowStyle 31
CLS GetSysColor(15)
UseFont "MS Sans Serif",13,0,0,0,0
SetDialogFont 1
button1& = @Create("Button",%hwnd,"Test 1",130,30,100,22)
TTip %Hwnd,button1&,"Ein Tooltip, der sich immer wieder erneuert!"
button2& = @Create("Button",%hwnd,"Test 2",130,60,100,22)
TTip %Hwnd,button2&,"Noch einer!"
While 1
WaitInput
Case %key=2:BREAK
EndWhile
Fin
|
|
| |
| |
| |
|
|
RGH | [quote-part:fe108e115f=Frank Abbing]réellement. qui Code funktioniert dans cette forme einwandfrei, quoique il oui seulement léger de allen anderen Tooltip-Codes abweicht....[/quote-part:fe108e115f]
avec quel XProfan-Version getestet? aussi avec qui 9?
Salut
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 13.05.2006 ▲ |
|
| |
|
|
Rolf
Koch | Hi gens,
stimmt klappt sogar sous 8.0
cet Présentation ist aus ROC, peux mais sur Anhieb maintenant wirklich keinen Unterschied (ausser omettre de wichtigen sendmessages et Standart Profan Tip anstatt Contrôle) trouver. quoi ist car ici anders? suis je blind?
Rolf |
|
| |
| |
| |
|
(770)
Deutsch
English
Français
Español
Italia