Új hozzászólás Aktív témák
-
Diskcopy
tag
válasz
[HUN]Zolee
#288
üzenetére
hello!
Lehet hülye kérdés, de Me.ClientSize.Width, Me.ClientSize.Height -et használsz ugye?
Ollóztam egy kódot netről:
Dim gr As Graphics = Me.CreateGraphics()
Dim ellipse_brush As New HatchBrush( _
HatchStyle.BackwardDiagonal, _
Color.Blue, Me.BackColor)
gr.FillEllipse(ellipse_brush, 0, 0, _
Me.ClientSize.Width, Me.ClientSize.Height)
Dim ellipse_pen As New Pen(Color.Red, 5)
gr.DrawEllipse(ellipse_pen, 0, 0, _
Me.ClientSize.Width, Me.ClientSize.Height)
hasonlóképp csinálod? Mert VB6ban volt az, hogy nem pixel alapú a dolog, .netben áttértek a formnál+contoloknál is pixel alapra ha jólttudom.
Új hozzászólás Aktív témák
- Androidos tablet topic
- Milyen TV-t vegyek?
- Gumi és felni topik
- Allegro vélemények - tapasztalatok
- Analóg fényképezés
- AMD Ryzen 9 / 7 / 5 / 3 3***(X) "Zen 2" (AM4)
- Mibe tegyem a megtakarításaimat?
- Asustor NAS
- Motorola Moto G06 Power – nagyfater új zakót vett
- Milyen billentyűzetet vegyek?
- További aktív témák...
- HP EliteBook 840R G4, 14" FHD, i5-8350 CPU, 8-16GB DDR4, 128GB - 1TB SSD, 4G/LTE W11, Számla, 1 év g
- GARIS / ITX méregzsák - AMD Ryzen 9 7900 / 32GB DDR5 / RTX 5070 / stb...
- HP Z240 munkaállomás (több darab) (Intel Core I7-6700, 8GB DDR4)
- Precision 5560 15.6" FHD+ IPS i7-11850H RTX A2000 32GB 512GB NVMe magyar vbill gar
- Samsung Galaxy A55 - 256 GB - kék (311) Újszerű, 10000 Ft kiegészítő ajándék, Garancia
- ASUS TUF A14 Gaming Notebook! Ryzen AI HX 370 / RTX 4050 / 16GB DDR5 / 1TB NVMe! BeszámítOK!
- Sapphire Nitro+ RX 5700 XT 8GB
- Apple iPhone 13 128GB, Kártyafüggetlen, 1 Év Garanciával
- SanDisk Extreme Portable 8TB (SDSSDE61-8T00-G25) (utolsó darab)
- BESZÁMÍTÁS! Intel Core i5 8500 6 mag 6 szál processzor garanciával hibátlan működéssel
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
