VB.NET 2003 endre opacity på fargen, er det mulig?

[Gjakmarrja]

Ja, det over:P

 

Skal lage et tegne program å lurer på om det går an å endre opacity på selve fargen eg parser til pennen som tegner.. ?

[GeirGrusom]

using System.Drawing;
protected void OnPaint(PaintEventArgs e)
{
 Graphics g = e.Graphics;
 Color new_col;
 
 g.Clear(this.BackColor);
 new_col = new Color(32, Color.Red);

 g.FillRectangle(new SolidBrush(new_col), new Rectangle(32, 32, 128, 128));
 g.DrawRectangle(Pens.Red, new Rectangle(32, 32, 128, 128));

 Pens p = new Pen(new_col);

 g.DrawLine(p, 32, 32, 128, 128);
}

 

Denne bruker fargen rød, og endrer alpha fra 255 til 32

og tegner en gjennomsiktig firkant med et omriss i klar rød,

og en gjennomsiktig strek over hele firkanten.

Du kan også bruke en overload hvor du spesifiserer alle 4 parameter på color

Det kan hende du kan endre Color.A også, men er ikke sikker.

 

Du kan ikke endre Pens fra System.Drawing.Pens eller System.Drawing.SystemPens, men må lage en ny pen.

[Gjakmarrja]

Gah... tror jeg klarer å kjenne det over igjen så C++ syntax noe jeg ikke kan

VB.NET gutten min ?

[ze5400]

Tror ikke det er C++

 

Tror det er C# (ikke det at jeg har peiling da )

 

En ting til, i visual studio, har du noen gang prøvd å trykke F1 der?

[Gjakmarrja]

Tror ikke det er C++

 

Tror det er C# (ikke det at jeg har peiling da )

 

En ting til, i visual studio, har du noen gang prøvd  å trykke F1 der?

5441338[/snapback]

 

Har ikke den hjelpen installert... derfor spør jeg

[Manfred]

Det er da ikke større forskjell på vb og C# enn at du klarer å forstå de på tvers av hverandre? Selv om vb dog har en mye mer jalla syntax.

 

{ og } indikerer et scope, noe som i vb endes med en "end". "String s" bruker såpass overflødig kode i VB som "Dim s As String", osv... uansett er logikken den samme, selv om syntaxen er ulik.

[ze5400]

enig med deg manfred i at C# Og VB.NET er så likt at man burde klare å tyde det ene når man kan det andre... Og til trådstarter:

www.justfuckinggoogleit.com

 

Husk: Gud skapte GOOGLE

 

EDIT: www.planetsourcecode.com er også laget av gud...

Endret 15. januar 2006 av ze5400

[alftore]

Husk at google hadde inneholdt lite svar om ingen hadde skrevet ned og spurt om ting. Med den mengden trafikk som er på disse delene av diskusjon.no så er det da heller ikke så vanskelig å svare på et enkelt spørsmål.

[GeirGrusom]

OK, så skal jeg skrive den i VB.NET, hvis det er så viktig for dere

 

Imports System.Drawing

Protected Override Sub OnPaint(PaintEventArgs e)
Dim g As Graphics = e.Graphics
Dim new_col As Color

g.Clear(Me.BackColor)
new_col = New Color(32, Color.Red)

g.FillRectangle(New SolidBrush(new_col), New Rectangle(32, 32, 128, 128))
g.DrawRectangle(Pens.Red, New Rectangle(32, 32, 128, 128))

Dim p As Pen = New Pen(new_col)

g.DrawLine(p, 32, 32, 128, 128)
End Sub

 

Direkte oversatt.

[GeirGrusom]

vent litt.... skrev jeg new Color? det heter ikke det, det heter Color.FromArgb...

 

Imports System.Drawing

Protected Override Sub OnPaint(PaintEventArgs e)
Dim g As Graphics = e.Graphics
Dim new_col As Color

g.Clear(Me.BackColor)
new_col = Color.FromArgb(32, Color.Red)

g.FillRectangle(New SolidBrush(new_col), New Rectangle(32, 32, 128, 128))
g.DrawRectangle(Pens.Red, New Rectangle(32, 32, 128, 128))

Dim p As Pen = New Pen(new_col)

g.DrawLine(p, 32, 32, 128, 128)
End Sub

 

Dette kan du kalle i funksjoner, uten å lage et Color objekt først

 

g.FillRectangle(New SolidBrush(Color.FromArgb(32, 32, 128, 255), 32, 32, 128, 128)