| |
| |
|
| - Seite 1 - |
|
Jac
de
Lad | | Hat schon jemand Erfahrung mit Rebar-Controls? Ich hab das Windows-SDK, aber irgendwie fehlt mir da der Anfang...und Hintergrundwissen. |
|
| |
| 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 | 28.10.2006 ▲ |
|
| |
|
| |
| |
| - Seite 2 - |
|
|
Detlef
Jagolski | Hallo Jac!
Vielleicht so?
Hier ein einfaches Beispiel
KompilierenMarkierenSeparieren $P+
SetErrorLevel 0
$H WINDOWS.PH
$H MESSAGES.PH
$H SHELLAPI.PH
$H STRUCTS.PH
$H COMMCTRL.PH
$I COOLBAR.INC
Declare appexit%
Declare RB#
Declare Edit&
SetTrueColor 1
WindowStyle $003F
WindowTitle "ReBar"
Window Add(%maxX,5),114 - 498,415
Cls ~GetSysColor(15)
UseFont "MS Sans Serif",13,0,0,0,0
SetDialogFont 1
Edit&=CreateEdit(%hwnd,"",155,77,121,21)
RB# = New(CoolBar,%hwnd,0,0,width(%Hwnd),40,2000)
RB#.RBClear()
RB#.RBSetfMask($00000831)
RB#.RBSetfStyle($00000284)
RB#.RBSethwndChild(Edit&)
RB#.RBSetcxMinChild(600)
RB#.RBSetcyMinChild(24)
RB#.RBSetcxHeader(10)
RB#.RBSetcyMaxChild(160)
RB#.RBInsert()
SetWindowPos %hwnd = 207,114 - 498,415;0
WhileNot appexit%
WaitInput
If Equ(%key,2)
Let appexit%=1
ElseIf Equ(%key,4)
Fenstergröße
SetWindowPos RB#.RBGetHandle()=0,0-0,0;0
ElseIf Equ(%key,5)
Hilfe
EndIf
Wend
Gruß
Detlef |
|
| |
| XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 01.11.2006 ▲ |
|
| |
|
|
Jac
de
Lad | | Mein Englisch ist gut, aber ich blicke da trotzdem nicht überall durch. Ich probiere beide Sachen mal aus, aber komme wahrscheinlich nicht mehr heute dazu... |
|
| |
| 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 | 01.11.2006 ▲ |
|
| |
|
|
Jac
de
Lad | @D. Jagolski: Dein Quelltext stürzt leider ab. Er lief auch überhaupt erst an, als ich InitCommnControlsEx in InitCommonControls geändert habe.
@Pascal: Der Quelltext geht, vielleicht kann ich daraus lernen, danke!
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 | 01.11.2006 ▲ |
|
| |
|
|
Detlef
Jagolski | Hallo Jac!
1. In meinem Quelltext steht kein InitCommonControlsEx.
2. Quelltext auf 4 Rechnern getestet ohne Probleme.
Gruß
Detlef |
|
| |
| XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 01.11.2006 ▲ |
|
| |
|
|
Jac
de
Lad | | Die Coolbar.inc (oben als zweites oder drittes Post) enthält das aber. Welche Coolbar.inc nutzt du? |
|
| |
| 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 | 02.11.2006 ▲ |
|
| |
|
|
Jac
de
Lad | Ich komme mit dem Teil nicht klar, ich gebs auf und bleibe bei den guten, alten Toolbars. Danke für die Mühe!
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 | 02.11.2006 ▲ |
|
| |
|
|
Uwe
''Pascal''
Niemeier | Hallo Jac!
Was willst du denn erreichen bzw. wie soll das Ergebnis aussehen?
SeeYou
Pascal |
|
| |
| |
| |
|
|
Jac
de
Lad | | Ich wollte eine Inc oder PCU basteln, wie ichs schon für Progressbars und Trackbars gemacht habe. Aber das Rebar-Control überfordert mich völlig. |
|
| |
| 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 | 04.11.2006 ▲ |
|
| |
|
|
Ralph
Theobald | Hallo,
habe aus dem ersten Quellcode eine flexible Toolbar gebastelt.
Vielleicht kanns einer gebrauchen.Wäre auch im XProfEd - Projekt
gut zu gebrauchen .
Gruß Ralph |
|
| |
| |
| |
|
|
Ralph
Theobald | Hallo,
hier noch eine Rebar vertikal mit kurzer Bedienungsanleitung.
War eine gute Idee von Jakob Listbox oder Multiedit in das Rebar zu setzen.
Gruß Ralph |
|
| |
| |
| |
|
|
 | | Funktioniert super und erklärt auch schön wie das Control zu nutzen ist... |
|
| |
| |
| |
|
|
Jac
de
Lad | JACOB!!!
Ich glaube, du willst mir da was anhängen, dass nicht von mir ist. Jedenfalls habe ich immer noch keine Rebars hingekriegt, auch nicht mit Listboxen und so...  |
|
| |
| 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 | 03.02.2007 ▲ |
|
| |
|
(850)
Deutsch
English
Français
Español
Italia