Von Udo am 21 April, 1998 um 20:11:56:
Antwort auf: Edits von HyperLone am 21 April, 1998 um 18:13:19:
Hallo HyperLone
Zu Edit:
Den 3D-Effekt erreichst Du über die Funktion SetWindowLong.
In Profan sieht das so aus:
Declare hEdit&
DEF SetWindowLong(3) !"USER32","SetWindowLongA"
'Funktion übernommen aus API-Fellow (Danke Thomas , Super Tool)
SetTrueColor 1
WindowStyle $1A
Cls $C0C0C0
Let hEdit& = CreateMultiEdit(%hWnd,"",0,0,0,0)
SetWindowLong(hEdit&,-20,$200)
SetWindowPos hEdit&=50,50-200,200
While 1
EndWhile
Das mit den Tooltips ist schon schwieriger.
Zuerst mußt Du mal ein ToolBarControl erzeugen.
Wie das in Profan geht weiß ich noch nicht. Ich arbeite aber daran.
In C++:
(Quelle: WIN32.HLP)
HWND CreateToolbarEx(
HWND hwnd,
DWORD ws,
UINT wID,
int nBitmaps,
HINSTANCE hBMInst,
UINT wBMID,
LPCTBBUTTON lpButtons,
int iNumButtons,
int dxButton,
int dyButton,
int dxBitmap,
int dyBitmap,
UINT uStructSize
);
Dann kannst Du einem ToolBarButton ein ToolTipControl zuweisen.
Das sieht auch nicht anders aus als der obige Text. Dazu kommt noch
das ein Teil der benötigten Parameter als Zeiger und Strukturen
übergeben werden müssen. Ich vertraue Thomas, daß er mit seinem WinFellow
schneller ist als ich mit dem lesen der Handbücher.
Udo