Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Gömt med Hide?True/False?

Postades av 2005-11-16 11:01:42 - Berne Nielsen, i forum visual basic - allmänt, Tråden har 4 Kommentarer och lästs av 688 personer

Hur kan man kontrollera om ett MDI-fönster är gömt med Hide?

tack på förhand!


Svara

Sv: Gömt med Hide?True/False?

Postades av 2005-11-16 15:15:13 - Sven Åke Persson

Det enda jag kommer på i skrivande stund är att du anropar MDI Formen
på något vis. Tex med Visible = True

Om den då är Hide så får du Error som du tar hand om.


Svara

Sv:Gömt med Hide?True/False?

Postades av 2005-11-17 09:54:11 - Berne Nielsen

Fick inget error när jag körde Visible=True på en "Hide:ad" Frm däremot blev den synlig... märkte att efter man kört Hide så sätts Visible=False, så då snickrade jag ihop följande som jag tror hanterar alla fall som kan påverka om en frm är synlig eller inte.

Public Function IsOpen(Frm As String) As Boolean
    Dim frmForm As Form
    For Each frmForm In Forms
        If frmForm.Name = Frm Then
            'frm är öppen eller gömd med Hide
            If frmForm.Visible = True Then
                IsOpen = True 'frm är synlig
            End If
            Exit For
        End If
    Next
End Function


Svara

Sv: Gömt med Hide?True/False?

Postades av 2005-11-17 10:18:46 - Sven Åke Persson

Bra jobbat, hade inte störtkoll. Snygg kod.
Tillsammans knäcker Vi det mesta.

Vad händer om jag försöker sätta den Hide:ade Formen BackColor = (samma som den redan har)


Svara

Sv: Gömt med Hide?True/False?

Postades av 2005-11-17 22:45:17 - Andreas Hillqvist

JAg skulle använda objektinstansen. Vilket ger koden möjlighet att kolla en instans:

Public Function IsOpen(Frm As Form) As Boolean
    Dim frmForm As Form
    For Each frmForm In Forms
        If frmForm Is Frm Then
            'frm är öppen eller gömd med Hide
            If frmForm.Visible Then
                IsOpen = True 'frm är synlig
            End If
            Exit For
        End If
    Next
End Function


Anropas istället:

    If IsOpen(Form1) Then
    Else
    End If


Svara

Nyligen

  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper
  • 16:36 Allt du behöver veta om keramiskt
  • 16:14 Vem anlitar man egentligen när tak

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 722
27 958
271 751
395
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies