Pohybování s formulářem bez titulku
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Pohybování s formulářem bez titulkuPohybování s formulářem bez titulku

 
Hledat
Moderní platforma pro vytvoření vašeho nového webu – Wix.com.
Nyní už můžete mít web zdarma.
Vybavení pro Laser Game
Spuštěn Filmový magazín
Laser Game Brno
Laser Game Ostrava

Pohybování s formulářem bez titulku

Google       Google       19. 9. 2005       8 881×

V tomto díle seriálu Visual Basicu se podíváme na to, jak přesouvat formulář bez titulku. Tzn. bez té horní (většinou modré) lišty, na které je nadpis okna a tlačítka na vypnutí, minimalizování a tak...

Reklama
Reklama

Budeme využívat dvou API funkcí a události formuláře MouseMove. Celý kód potom bude vypadat následovně:


Private Declare Function SendMessage Lib "User32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Sub ReleaseCapture Lib "User32" ()

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    ReleaseCapture
    SendMessage Form1.hWnd, 161, 2, 0
End Sub

To je tak vše, už jen to vyzkoušet a využít. Jo a nezapomeňte si dát na formulář něco, čím ho vypnete, protože nemá křížek ;)

×Odeslání článku na tvůj Kindle

Zadej svůj Kindle e-mail a my ti pošleme článek na tvůj Kindle.
Musíš mít povolený příjem obsahu do svého Kindle z naší e-mailové adresy kindle@programujte.com.

E-mailová adresa (např. novak@kindle.com):

TIP: Pokud chceš dostávat naše články každé ráno do svého Kindle, koukni do sekce Články do Kindle.

2 názory  —  2 nové  
Hlasování bylo ukončeno    
0 hlasů
Google
(fotka) Jiří ChytilAutor programuje ve VB, zajímá se o elektrotechniku, studuje na SOŠ Elektrotechnické - obor číslicová technika.
Web    

Nové články

Obrázek ke článku Webnode: Popularita blogů v Česku strmě stoupá

Webnode: Popularita blogů v Česku strmě stoupá

Statistiky společnosti Webnode, tvůrce nástroje pro tvorbu webových stránek, potvrzují, že Češi blogy milují. V České republice jich za prvních šest měsíců letošního roku přibylo jen na platformě Webnode přes 12 500, ve světě celkově pak na této platformě přes 210 000. Meziroční nárůst ve srovnání se stejným obdobím loňského roku je 18 %. 

Reklama
Reklama
Obrázek ke článku Lepší hosting chrání i vaše data

Lepší hosting chrání i vaše data

Kybernetických útoků na webové stránky rok od roku přibývá, jsou čím dál důmyslnější a páchají stále větší škody. Možná si říkáte, že vás se to netýká, opak je ale pravdou. Jeden z nejčastějších typů útoku využívá zranitelnosti samotných webových stránek a spočívá v umístění škodlivé části programového kódu (tzv. malware) přímo do jejich těla. 

Obrázek ke článku Spotřebitelé důvěřují novým technologiím při péči o seniory, ale správu financí by jim nesvěřili

Spotřebitelé důvěřují novým technologiím při péči o seniory, ale správu financí by jim nesvěřili

 71 % vítá nové technologie ke sledování zdravotního stavu postarších příbuzných, které jim umožňují žít déle doma

 Pouhých 7 % by svěřilo správu svých financí umělé inteligenci, i kdyby to znamenalo rychleji naspořit prostředky na pořízení bydlení

 64 % respondentů nemá dojem, že firmy a stát dostatečně informují o tom, jaké technologie a jak užívají

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032019 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý