title image


Smiley Re: Formular always on top + Positon verändern (x,y)
HIwillst ein kleines Spass-Programm schreiben?? *fg* alla Klick michDa gibt es ne Api die so was kann.SetWindowPos Declare Function SetWindowPos Lib "user32" _ (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _ ByVal x As Long, ByVal Y As Long, ByVal cx As Long, _ ByVal cy As Long, ByVal wFlags As Long) As LongPublic Const SWP_NOMOVE = &H2Public Const SWP_NOSIZE = &H1Public Const SWP_SHOWWINDOW = &H40Public Const SWP_NOACTIVATE = &H10Public Const HWND_TOPMOST = -1Public Const HWND_NOTOPMOST = -2Public Sub FormOnTop(Handle As Long, OnTop As Boolean) Dim wFlags As Long, PosFlag As Long wFlags = SWP_NOMOVE Or SWP_NOSIZE Or _ SWP_SHOWWINDOW Or SWP_NOACTIVATE Select Case OnTop Case True PosFlag = HWND_TOPMOST Case False PosFlag = HWND_NOTOPMOST End Select SetWindowPos Handle, PosFlag, 0, 0, 0, 0, wFlagsEnd Subzum Bewegen kanns du ja einen Timer benutzen.dort: form1.move xneu, yneuGruss Klapperstorch
Gruss Klapperstorch
----------------------------------------------------
Aus Felern lernt man oder...
Edjucashon isnt woerking

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: