COLOR DEPTH

Συζητήσεις για τις γλώσσες του dot Net και για του Visual Studio της Microsoft

Συντονιστές: WebDev Moderators, Super-Moderators

Απάντηση
STEFANOS
Δημοσιεύσεις: 4
Εγγραφή: 23 Φεβ 2003 09:35

COLOR DEPTH

Δημοσίευση από STEFANOS » 23 Φεβ 2003 09:45

πως θα αλλάξω το βάθος χρώματος σε 32 bit και την ανάλυση σε 800χ600
Πως θα κρύβω το TASKBAR.Θέλω να εξαφανίζεται όταν ξεκινάει η εφαρμογή μου.

Άβαταρ μέλους
cordis
Administrator, [F|H]ounder, [C|S]EO
Δημοσιεύσεις: 27617
Εγγραφή: 09 Οκτ 1999 03:00
Τοποθεσία: Greece
Επικοινωνία:

COLOR DEPTH

Δημοσίευση από cordis » 23 Φεβ 2003 15:43

Create a new Standard EXE project. Form1 is created by default.
Add a CommandButton to Form1.
Paste the following code into Form1's code window:

Κώδικας: Επιλογή όλων

      Private Sub Command1_Click()
         Dim cx As Long
         Dim cy As Long
         Dim RetVal As Long

         ' Determine if screen is already maximized.
         If Me.WindowState = vbMaximized Then
            ' Set window to normal size
            Me.WindowState = vbNormal
         End If

         ' Get full screen width.
         cx = GetSystemMetrics(SM_CXSCREEN)

         ' Get full screen height.
         cy = GetSystemMetrics(SM_CYSCREEN)

         ' Call API to set new size of window.
         RetVal = SetWindowPos(Me.hwnd, HWND_TOP, 0, 0, cx, cy, _
            SWP_SHOWWINDOW)
      End Sub
Add a standard module to the Project menu.
Paste the following code into the module:

Κώδικας: Επιλογή όλων

      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

      Declare Function GetSystemMetrics Lib "user32" _
         (ByVal nIndex As Long) As Long

      Public Const SM_CXSCREEN = 0
      Public Const SM_CYSCREEN = 1
      Public Const HWND_TOP = 0
      Public Const SWP_SHOWWINDOW = &H40
Run the project.
Click the CommandButton.
Δεν απαντάω σε προσωπικά μηνύματα με ερωτήσεις που καλύπτονται από τις ενότητες του forum. Για ο,τι άλλο είμαι εδώ για εσάς.
- follow me @twitter

Απάντηση

Επιστροφή στο “dot Net και Visual Studio”

Μέλη σε σύνδεση

Μέλη σε αυτήν τη Δ. Συζήτηση: Δεν υπάρχουν εγγεγραμμένα μέλη και 0 επισκέπτες