XProfan

Claus
Santa

Meintest Usted BubbleTooltip?
Sí? Schau veces en el API-Ayuda bajo Controls -> tooltip! Schau veces en el Downloadcentre. Hoffe lo hilft Usted más...

Snoozel,
[[StA/oXr]] // life is just'n bugfree, cos coding is life

28.10.2005 ▲

Jac
de
Lad

Ähhh, tener Yo No se ha encontrado???

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

29.10.2005 ▲

Rolf
Koch

Intento lo veces hiermit. Ab XProfan 8.0
Kompilieren Marca Separación

Def GetSysColor(1) !"USER32","GetSysColor"
Windowstyle 63
WINDOW 10,10-150,150
Windowtitle "TTIP"
Cls GetSysColor(15)
Usefont "MS SANS SERIF",13,0,0,0,0
Setdialogfont 1

PROC MAKETOOLTIP

    PARAMETERS HWD&,OBJ&,Tiptext$,STIL&
    declare ttip&
    let ttip& = Create("Tooltip",HWD&,OBJ&,TIPTEXT$)
    case stil&=0:setstyle ttip&,getstyle(ttip&)+$01
    case stil&=1:setstyle ttip&,$D000041
    case stil&=2:setstyle ttip&,$D022011
    case stil&=3:setstyle ttip&,$D000A01
    RETURN TTIP&

ENDPROC

declare btn&,btn2&,tip1&,tip2&,tip3&,btn3&
let btn& = Create("BUTTON",%hwnd,"Standart",10,10,100,20)
MAKETOOLTIP %HWND,BTN&,"Dies ist ein normaler Tooltip",0
tip1&=&(0)
let btn2& = Create("BUTTON",%hwnd,"Bubble",10,35,100,20)
MAKETOOLTIP %HWND,BTN2&,"Dies ist ein Bubbletooltip",1
tip2&=&(0)
let btn3& = Create("BUTTON",%hwnd,"Randlos",10,60,100,20)
MAKETOOLTIP %HWND,BTN3&,"Dies ist ein Tooltip ohne Rand",2
tip3&=&(0)
setfocus(%HWND)

while 1

    waitinput

wend

Soweit Yo weis, son el Bubbles bajo XP sólo aktiv, solange dieses Feature no abgeschaltet wurde.
Zum Ejemplo con XP-Antispy puede ser el Bubbletipps abschalten.

Rolf

29.10.2005 ▲

Hm Yo glaube MS es hier después de Respect users choice qué heissen se el el Bubbels siempre kommen - el Programmierer sin embargo en él achten debería si el User esta überhaupt sehen möchte.

Salve.

29.10.2005 ▲

Jac
de
Lad

Ahh, danke. Yo probiers!!!

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

30.10.2005 ▲

Jac
de
Lad

Klappt alles wunderbar. Kann me alguien aber sagen Yo una Tooltip erzwingen kann (como Balloontips en WinXP Neue Hardware gefunden... y así más)?

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

10.11.2005 ▲

Liegt el Betonung en erzwingen? - Wenn sí, qué media Usted así?

10.11.2005 ▲

Jac
de
Lad

Yo mi el Balloontips, el aufpoppen, sin dass I, con ratón drübergehe.

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

Michael
Wodrich

Sind el wirklich Tooltips?
Oder más OwnerDraw-Ventana el así tun como si...
El meisten son tan con uno Clic mich y yo starte una Programmteil Rutina hinterlegt.

Schöne Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

Hay baloons.

Rolf
Koch

.. y Michael, bedenke auch, dass Tooltips Controls son. Konnte uno sí schön en media Beispielen sehen, welche animierte Icons u.s.w beinhalten. Lo dürfte wesentlich mehr posible ser con esta Teilen.
Zum Ejemplo: Farbverlauf reinzaubern, propio Form gestalten y vieles mehr. Tootips son sólo bärenstarke Dinger *lol*
Wenn sólo no el bekannte Manifest Problematik bajo Profano bestünde.

Rolf