Hoppa till innehåll

Visual C#


JePPe9
 Dela

Rekommendera inlägg

Hej jag behöver hjälp om hur jag kan ändra hur skinnet ska se ut på min "Form1".

Nej, det går inte. Utseendet på applikationen anpassas till det tema du och alla andra som använder programmet använder i Windows. Det är heller ingen XP form, Windows Classic kallas det.

 

 

Redigerat av woody
Länk till kommentar
Dela på andra sajter

Skrivet (redigerat)

Det går visst med två Add-Ons till Visual Studio 2010 som heter DevExpress och DevComponents och där finns DefaultLookAndFeel som ska kunna ändra det men för mig gör det inte det. Jag måste ta andras source codes och göra egna program så.

 

Du menar som mitt skin ?

Bilden"Tryck här"

Ungefär så ja.

post-78591-1302286619_thumb.jpg

Redigerat av JePPe9
Länk till kommentar
Dela på andra sajter

Du går till form inställningarna Sen går du ner till du hittar form border style och ändrar till none. Sen så är det bara att göra ditt tema och lägga in det stänga av och minimera knappen lägger du en picture som är transparent du kan pm'a mig om du vill ha kod så temat funkar.

Länk till kommentar
Dela på andra sajter

Jag missförstod din fråga. Ändra Form1.FormBorderStyle till None och Form1.BackColor till White eller vilken färg du nu vill ha. Lägg till en ny Panel och ändra Panel1.Dock till Top så att den placeras överst. Ändra färg på den så att användaren kan se den tydligt. Sen är det bara att lägga till minimera, maximera och stäng knappar / Labels.

 

Källkod: (Visual Basic men du kan konvertera / översätta det lätt till C#)

Public Class Form1

Dim Point As New System.Drawing.Point()

Dim X, Y As Integer

 

Private Sub Main_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove

If e.Button = MouseButtons.Left Then

Point = Control.MousePosition

Point.X = Point.X - (X)

Point.Y = Point.Y - (Y)

Me.Location = Point

End If

End Sub

 

Private Sub Main_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown

X = Control.MousePosition.X - Me.Location.X

Y = Control.MousePosition.Y - Me.Location.Y

End Sub

 

End Class

Länk till kommentar
Dela på andra sajter

Gå med i konversationen

Du kan skriva nu och registrera dig senare. Om du har ett konto, logga in nu för att posta med ditt konto.

Gäst
Svara på det här ämnet...

×   Klistrade in som rich text.   Klistra in som vanlig text istället

  Endast 75 emojis är tillåtet.

×   Din länk har automatiskt inbäddats.   Visa som en länk istället

×   Ditt tidigare innehåll har återställts.   Rensa redigeraren

×   Du kan inte klistra in bilder direkt. Ladda upp eller infoga bilder från URL.

 Dela

×
  • Skapa ny...