Diskuze: Změna směru přechodu
Tvůrce
Zobrazeno 8 zpráv z 8.
prosím vlož ten kód ještě jednou do těch značek pro zdrojový kód, takhle se to nedá číst. Je na to druhé tlačítko, hned vedle smajlíka.
Dim cDialog As New ColorDialog()
cDialog.Color = Button7.BackColor ' initial selection is current color.
If (cDialog.ShowDialog() = DialogResult.OK) Then
Button7.BackColor = cDialog.Color
Dim img As New Bitmap(Button9.Width, Button9.Height)
Dim brush As New Drawing.Drawing2D.LinearGradientBrush(New PointF(0, 0), New PointF(Button9.Width, Button9.Height), Button7.BackColor, Button1.BackColor)
Dim gr As Graphics = Graphics.FromImage(img)
gr.FillRectangle(brush, New RectangleF(0, 0, img.Width, img.Height))
Button9.BackgroundImage = img
End IfOmlouvám se
obrátit směr gradientu můžeš třeba jednoduše tak že prohodíš barvy, že. Nevím do jaké míry to umožňuje třeba tříbarevný gradient - tříbarevným bys vyřešil gradient od středu (barva1;barva2;barva1).
A jak vyřeším dvojbarevný gradient od středu?
Jenže při zadání těchto hodnot, je přechod z HORNÍHO LÉVÉHO ROHU do SPODNÍHO PRAVÉHO ROHU, jenže já chci přechod zleva středu - doprava na střed
Je to jen matematika
Dim brush As New Drawing.Drawing2D.LinearGradientBrush(New PointF(0, 0), New PointF(Button9.Width, Button9.Height), Button7.BackColor, Button1.BackColor)abys byl v levém středu tak ti stačí jen přepsat první bod z 0,0 na 0,Button9.Height/2 a to stejné i u druhého jen x posuneš o šířku tlačítka.
Promiň ale na takové otázky už nemá cenu odpovídat. Každý druhý den
tady vidím nějaký tvůj příspěvek na téma WPF/WF a to ještě stylem
"uděljte mi". Evidentně ani nemáš ponětí, co tvůj kód dělá. Potom je
jasné, že nevíš co s ním. Už od pohledu vidím, že přechod je určený
body - stačí tedy změnit souřadnice bodů.
Pokud to nezvládáš, dej si nižší laťku a dělej něco menšího, nebo si
technologii, se kterou máš v plánu pracovat, nastuduj, ale odmítám každý
druhý den odpovídat na triviální otázky, které lze s trochou inteligence a
Googlu vyřešit za pár sekund.
Zobrazeno 8 zpráv z 8.