MediaPlayer sender sig selv til Front

Måske en alwayes on top på din form1, ved ikke om det er det, men jeg kan da lige paste koden.....

Option Explicit
Private 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 Long
Const conHwndTopmost = -1
Const conHwndNoTopmost = -2
Const conSwpNoActivate = &H10
Const conSwpShowWindow = &H40
Private Sub Form_Load()
SetWindowPos hwnd, conHwndTopmost, X1, Y1, X2, Y2, _
        conSwpNoActivate Or conSwpShowWindow
End Sub


Jeg mener x1 og y1 er start position på 0,0 på formen og x2 og y2 er slut posistionen altså formens størelse...

/Tubber

Label er et "tomt" (kan ikke huske det rigtige navn) object - en label ligger derfor altid under "ikke-tomme" objecter.

Hvis du fx placerer en label og en command kan du heller ikke få label'en til at lægge øverts.

Du kan løse problemet ved at bruge en textbox - bare sæt "BorderStyle" = 0 (enten i design eller runtime), så ligner den...

Tjaa'...
Idéen er da god nook, men jeg vil gerne kunne se min MediaPlayer bagved og mig bekendt kan man ikke gøre en TextBox Transperent! Hvis du kan så svar!!

Til tubber:

  Jeg prøvede at Paste din kode. Jeg kan ikke finde et sted hvor der står noget med Label eller andet som kunne få mit Label øverst. Jeg prøvede, men den meldte bare fejl! Hvis det er mig der er dum her så giv et mere detaljeret svar for jeg har aldrig set den kode før og kan ikke forstå logikken i det!

Følgende er en dekleration:

Private 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 Long

Efterfølgende er konstanter:

Const conHwndTopmost = -1
Const conHwndNoTopmost = -2
Const conSwpNoActivate = &H10
Const conSwpShowWindow = &H40

Og det sidste er hvor du sætter windowspositionen....:

Private Sub Form_Load()
SetWindowPos hwnd, conHwndTopmost, X1, Y1, X2, Y2, _
        conSwpNoActivate Or conSwpShowWindow
End Sub

det eneste jeg ændre på er conHwndTopmost : står den til conHwndNoTopmost så er den ikke alwayes ontop.....

Det er det jeg kender til den, men den virker hos mig......

Jeg er ikke sikker på at du har forstået spørgsmålet!

Jeg indsætter en MediaPlayer i VB! Jeg vil så have en Label foran som er Transperant. Når man så trykker på denne skal den hoppe til form2.

ooh så er jeg med.....

hvad med at sætte focus på din label efter den handling der sætter mediaplayern forest ?

altså :

Mplayer1.Play
Label1.SetFocus


noget andet er: jeg prøvede lige at lave en mplayer og en label....min label er ALTID øverst uden noget specielt.....har du lavet din label eller mediaplayer først ?

Jeg lavede mediaplayer først.....

Label1.SetFocus kan ikke gennemføres:
  Method or Datamember not found!

Du har chekket du har sat din på efter mediaplayer ?

Gider du lige omformulere din sidste sætning tubber? Den giver ligesom ikke ret meget mening!

Du har chekket du har sat din label oven på mediaplayer ? altså du har sat mediaplayer på formen først og så lablen ind over bagefter ``

Selvfølgelig! Jeg har selvfølgelig også sat mit Label til Front!

Har du mediaplayer til det også ?

du kan evt sende dit projekt til smolf@krog-frandsen.dk

så skal jeg se på det :O)

Gerne zip eller rar

Er sendt som .rar format!

hmmm


Har lige fået en ide, tester den lige når jeg kommer hjem hvis det er....men hvis du kommer først så kan du jo lige sige om det er det....

Har du alwayes on top på din mediaplayer ? For det kunne måske (lidt langt ude) være det ?

Nå det var ikke det....

Har du prøvet at højreklikke på din mplayer og sige send to back ?

>> tubber <<

Selvfølgelig har jeg trykket "Send to back"!! Jeg checkede der igennem flere 1000 gange før jeg spurgte her!!

ok......

Så kan jeg nok ikke hjælpe.....

Beklager! Ingen har kunnet svare så jeg lukker spørgsmålet!!