Registriert seit: 29. Mai 2002
37.621 Beiträge
Delphi 2006 Professional
|
Re: Neue Version des XP Usermanger ist fertig!
28. Apr 2005, 13:30
Zitat von Kevin:
Zitat:
Microsoft Windows XP Professional Service Pack 2 (Build 2600)
Nach "XP", "Professional" und "2" steht dieses Kästchen. Kann es sein, daß das Feld die Eigenschaft hat, lange Feldinhalte, die nicht komplett angezeigt werden, in Tooltips zu zeigen?
Das sollte eigentlich der Fall sein:
Code:
Wnd := CreateWindowEx(0, STATUSCLASSNAME, nil, WS_CHILD or WS_VISIBLE
or [b]SBT_TOOLTIPS[/b], 0, 0, 0, 0, hDlg, ID_STATBAR, hInstance, nil);
SendMessage(Wnd, SB_SETTEXT, 0, Integer(@GetCompName[1]));
[b]SendMessage(Wnd, SB_SETTIPTEXT, 0, Integer(@GetCompName[1]));[/b]
SendMessage(Wnd, SB_SETTEXT, 1, Integer(@GetCurrUserName[1]));
[b]SendMessage(Wnd, SB_SETTIPTEXT, 1, Integer(@GetCurrUserName[1]));[/b]
SendMessage(Wnd, SB_SETTEXT, 2, Integer(@GetOSVersionText[1]));
[b]SendMessage(Wnd, SB_SETTIPTEXT, 2, Integer(@GetOSVersionText[1]));[/b]
Michael Ein Teil meines Codes würde euch verunsichern.
|
|
Zitat
|