Új hozzászólás Aktív témák

• [HUN]Zolee őstag

  #292

  #291 Diskcopy

  2005-10-11 15:54:40

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  [HUN]Zolee

  őstag

  #291 Diskcopy

  #291 Diskcopy

  Elméletileg pedig így kéne, no de én abszolut nem vagyok Vb expert, sőt nem szeretem a vbt(nagyon nem ) de azért nézz körül itt, hátha: Bővebben: link ha nem sikerül, akkor majd valaki más kisegít

  mindegy, ez nem olyan nagy gáz, csak kicsit zavar

• [HUN]Zolee őstag

  #290

  #289 Diskcopy

  2005-10-11 12:13:57

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  [HUN]Zolee

  őstag

  #289 Diskcopy

  #289 Diskcopy

  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.

  Nem így csináltam, mert amit te csináltál, az egy dinamikus rajzolás,, tehát a flipszis mérete függ a from nagyságától, ami nekem kéne, az meg hogy egy fix alagzat legyen az oldalon, tehát kb így :
  
  Dim gr As Graphics = Me.CreateGraphics()
  Dim ellipse_brush As New HatchBrush( _
  HatchStyle.BackwardDiagonal, _
  Color.Blue, Me.BackColor)
  Me.ClientSize.Width=200
  Me.ClientSize.Height=200
  gr.FillEllipse(ellipse_brush, 0, 0, _
  200, 200)
  Dim ellipse_pen As New Pen(Color.Red, 5)
  gr.DrawEllipse(ellipse_pen, 0, 0, _
  200, 200)
  
  
  És így se szélességre, se hosszúságra nem fér el (igaz én ezt tégalappal néztem meg, mert ott jobban llátszik a körvonal hiányából).
  

• [HUN]Zolee őstag

  #288

  #287 Diskcopy

  2005-10-10 22:36:20

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  [HUN]Zolee

  őstag

  #287 Diskcopy

  #287 Diskcopy

  Nincsmit.
  Nem igazán értem mire gondolsz.. Rajzolni akarsz a formra mondjuk?
  MSDNből kódrészlet:
  
  Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)
  Dim formGraphics as System.Drawing.Graphics
  formGraphics = Me.CreateGraphics()
  formGraphics.DrawLine(myPen, 0, 0, 200, 200)
  myPen.Dispose()
  formGraphics.Dispose()
  

  rajzolás az megy. Csak az a baj, hogy a rajzoló utasításoknál megadott adatok, nem pixeleket jelölnek. pl. ha csinálsz egy 200x200 pixeles fromot és rá egy 200x200 es négyzetet, akkor a négyzet kilóg a formról és cska egy 191x191 es négyzet fér el benne.

• [HUN]Zolee őstag

  #286

  #285 Diskcopy

  2005-10-10 18:23:27

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  [HUN]Zolee

  őstag

  #285 Diskcopy

  #285 Diskcopy

  System.Threading.Thread.Sleep(1000) 'Egy másodperces várakozás.

  kösz működik
  
  És arra nemtudod hogyan lehet .Net ben pixel alapúvá tenni a rajzfelületet? Vagyis hogy pixelkben lehessen megadni a koordinátákat?

• [HUN]Zolee őstag

  #283

  #282 Diskcopy

  2005-10-08 21:11:35

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  [HUN]Zolee

  őstag

  #282 Diskcopy

  #282 Diskcopy

  Na de errort kapsz, vagy csak simán nem tölt el időt?
  esetleg ha call-t is tennél elé? bár nem hiszem.
  
  Private Declare Sub Sleep Lib ''kernel32'' (ByVal dwMilliseconds As Long)
  
  Sub Command1_Click()
  Call Sleep(1000)
  End Sub

  Hmm, ez VB 6 os kód, úgynézki .Net be nem megy ez

• [HUN]Zolee őstag

  #281

  #280 Diskcopy

  2005-10-07 17:10:42

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  [HUN]Zolee

  őstag

  #280 Diskcopy

  #280 Diskcopy

  Hello!
  Bővebben: link itt elég jól kivesézik. Amúgy nem értem miért nem megy neked, semmi extra nincs benne.

  Valahogy negyon nem akar összejönni ez nekem pedig úgy csináltam mindent ahogy ott le van írva

• [HUN]Zolee őstag

  #279

  #278 Diskcopy

  2005-10-06 12:06:24

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  [HUN]Zolee

  őstag

  #278 Diskcopy

  #278 Diskcopy

  pedig úgy kell..
  

   Private Declare Sub Sleep Lib ''kernel32'' 
  (ByVal dwMilliseconds As Long)
  aztán meg  Sleep 1000 

  mondjuk...
  
  
  [Szerkesztve]

  Hy. Lécci ha tudsz keress meg majdvagy msn-en vagy küldj egy példaprogit a sleep parancs használatára, mert valahogy nem akar menni
  
  msn en csak este leszek.

• [HUN]Zolee őstag

  #205

  #204 Diskcopy

  2005-05-01 21:25:41

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  [HUN]Zolee

  őstag

  #204 Diskcopy

  #204 Diskcopy

  LOF: [/L]http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vblr7/html/vafctlof.asp[/L]
  
  másik esetleg így? Bővebben: link

  Köce sikerült.
  

Új hozzászólás Aktív témák