Anonymní profil Honza – Programujte.com

Ahoj, prosím o radu.

Mám pole proměnných o deseti proměnných a každá proměnná musí nabývat náhodné hodnoty.

Neznáte někdo elegantní řešení jak ošetřit, aby generátor náhodných čísel generoval vždy unikátní hodnoty v rozmezí 1 až deset? Zkrátka aby každá proměnná v tom poli měla jedinečnou hodnotu? Díky Honza

Ahoj,

mám stupidní dotaz ohledně hwnd a sice s kurzorem v Textboxu. O hwnd vím jenom to že je to nějaký komplexní nástroj s Handly Windows.

Našel jsem kódy, jak skrýt a zobrazit Caret v textboxu i jak vytvořit vlastní. Funguje to výborně, mám vlastní Caret jako načtený obrázek, ale jakmile mojí aplikaci překryje jiné okno, caret se změní na původní Windowsovský. Na událost Form_GotFocus to nijak nereaguje.

Prosím o pomoc, díky, Honza

příklad mého kódu:  

Private Declare Function CreateCaret Lib "user32" (ByVal hwnd As Long, _
ByVal hBitmap As Long, ByVal nWidth As Long, ByVal nHeight As Long) As Long 
Private Declare Function LoadBitmapA Lib "user32" (ByVal hInstance&, ByVal ResID&) As Long
Private Declare Function ShowCaret Lib "user32" (ByVal hwnd As Long) As Long 
Private Declare Function HideCaret Lib "user32" (ByVal hwnd As Long) As Long 


použití:
CreateCaret txtServer.hwnd, imlImages.ListImages(5).Picture, 8, 13
ShowCaret txtServer.hwnd