| |
| |
|
ByteAttack | ¡Hola! Sombrero irgendjemand ne Idea, Yo el Größe de c & d rausbekomme? (a & b es klar encima height y width)
Posesiones ya el halbe Web durchsucht, aber bin anscheinen a blöd para encontrar 
 |
|
| |
| |
| |
|
|
Frank
Abbing | Für c hay una Message, a gleiche Breite para cada Item a obtener. Dann Gesamtbreite geteilt por Anzahl Item.
d lässt se wohl al ehesten con el verwendeten Schrifthöhe ausmessen. |
|
| |
| |
| |
|
|
ByteAttack | Kann me Por favor, como veces alguien helfen?
Posesiones el commctrl.ph veces durchstöbert, y bin en TCM_GETITEMRECT gestoßen.
Weiß ahora pero no así bastante, el en XProfan umzusetzen.
Auzug MSDN:
TCM_GETITEMRECT Message
Retrieves the bounding rectangle for a tab en a tab control. You can send this mensaje explicitly or by using the TabCtrl_GetItemRect macro.
Syntax
To send this mensaje, call the SendMessage function as follows.
lResult = SendMessage( // returns LRESULT en lResult
(HWND) hWndControl, // handle to destination control
(UINT) TCM_GETITEMRECT, // mensaje ID
(WPARAM) wParam, // = (WPARAM) (int) iItem;
(LPARAM) lParam // = (LPARAM) (RECT*) prc;
);
Parámetros
iItem
Index of the tab.
prc
Pointer to a RECT structure that receives the bounding rectangle of the tab, en viewport coordinates.
Volver Value
Returns TRUE if successful, or FALSE otherwise.
Message Information
Encabezamientocommctrl |
|
| |
| |
| |
|
|
 | |
| |
| |
| |
|
|
ByteAttack | | Klappt Wunderbärchen. Dankeschön |
|
| |
| |
| |
|
|
| Gern geschehen!  |
|
| |
| |
| |
|
|
Thomas
Freier | Besteht beim TABCONTROL el Möglichkeit, neben el Reiter-Breite auch el Reiter-Höhe unabhängig de el Schrifthöhe vorzugeben?
KompilierenMarcaSeparaciónDeclare T&,TAB1&,TAB2&,TAB3&, lfont1&
cls
lfont1& = @Create("Font","MS Sans Serif",13,0,0,0,0)
T& = CREATE("TABCTRL",%HWND,"Mitglieder",0,1,%maxx-6,700)
TAB1&=@InsertTab(T&,1,"Haushalt")
TAB2&=@InsertTab(T&,2,"Bootsplätze")
TAB3&=@InsertTab(T&,3,"Inventarliste")
SetStyle T&,$54010600
SendMessage(T&,$1329,0,80) TAB-Breite
SetFont T&,lfont1&
WaitInput
Gruß Thomas
Windows XP SP2, XProfan X2 | 01.08.2008 ▲ | |
|
| |
|
|
Jörg
Sellmeyer | Hilft Usted el evtl. más:
Declarar T&,TAB1&,TAB2&,TAB3&, lfont1&
cls
Var IL& = Crear("ImageList",32,32)
lfont1& = @Crear("Font","MS Sans Serif",13,0,0,0,0)
T& = CREATE("TABCTRL",%HWND,"Mitglieder",0,1,%maxx-6,700)
SendMessage(T&,$01303,0,IL&)
TAB1&=@InsertTab(T&,1,"Haushalt")
TAB2&=@InsertTab(T&,2,"Bootsplätze")
TAB3&=@InsertTab(T&,3,"Inventarliste")
SetStyle T&,$54010600
SendMessage(T&,$1329,0,80)'TAB-Breite
SetFont T&,lfont1&
WaitInput
DeleteObject IL&
end
|
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 01.08.2008 ▲ |
|
| |
|
|
Thomas
Freier | @ Jörg : DANKE
In el Richtung gingen mi Gedanken auch ya, como Franco lo en el Listview para una definierte Zeilenhöhe einsetzt . Hatte hier aber nichts gefunden, como después de falschem Begriff (TAB) gesucht.
Como Crear("ImageList",32,32) bajo XProfan 10 unbekannt es, Yo más gesucht (Imagelist) y gefunden.
KompilierenMarcaSeparación $H commctrl.ph
Declare T&,TAB1&,TAB2&,TAB3&, lfont1&
cls
Var IL& = ~Imagelist_Create(42,42,~ILC_MASK | ~ILC_COLOR32,1,1)
lfont1& = @Create("Font","MS Sans Serif",13,0,0,0,0)
T& = CREATE("TABCTRL",%HWND,"Mitglieder",0,1,%maxx-6,700)
SendMessage(T&,$01303,0,IL&)
TAB1&=@InsertTab(T&,1,"Haushalt")
TAB2&=@InsertTab(T&,2,"Bootsplätze")
TAB3&=@InsertTab(T&,3,"Inventarliste")
SetStyle T&,$54010600
SendMessage(T&,$1329,0,80)TAB-Breite
SetFont T&,lfont1&
WaitInput
DeleteObject IL&
end
|
|
| |
| |
| |
|
|
Jörg
Sellmeyer | | Oh, sorry! Hab ahora ya así largo XProfan11, Yo como No encienda el pensamiento hatte. Aber schön, daß lo Su Richtung es. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 01.08.2008 ▲ |
|
| |
|
(1.112)
Deutsch
English
Français
Español
Italia