Keresés: - Visual Basic - Mobilarena Hozzászólások

Legfrissebb anyagok

Mobilarena témák

PROHARDVER! témák

IT café témák

GAMEPOD témák

LOGOUT témák

Keresés

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

#297 [HUN]Zolee őstag

Új Válasz 2005-10-19 19:30:47 #297
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

fel
#296 [HUN]Zolee őstag sonar #294

Új Válasz 2005-10-15 23:14:50 #296
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz sonar #294 üzenetére

addig én is lejutottam, hogy fejléc is beleszámít, de hogy a scroll bar-t is amikor nincs is midnegy.
#295 [HUN]Zolee őstag

Új Válasz 2005-10-15 23:13:25 #295
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

Amikor ablakváltás van, akkor a graphics osztály áltaál használta fügvények eredményei eltűnnek a form-ról

Melyik tulajdonságot kell állítani?
#292 [HUN]Zolee őstag Diskcopy #291

Új Válasz 2005-10-11 15:54:40 #292
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Diskcopy #291 üzenetére

mindegy, ez nem olyan nagy gáz, csak kicsit zavar
#290 [HUN]Zolee őstag Diskcopy #289

Új Válasz 2005-10-11 12:13:57 #290
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Diskcopy #289 üzenetére

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).
#288 [HUN]Zolee őstag Diskcopy #287

Új Válasz 2005-10-10 22:36:20 #288
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Diskcopy #287 üzenetére

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.
#286 [HUN]Zolee őstag Diskcopy #285

Új Válasz 2005-10-10 18:23:27 #286
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Diskcopy #285 üzenetére

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?
#284 [HUN]Zolee őstag

Új Válasz 2005-10-10 09:57:16 #284
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

senkinek semmi ötlete?
#283 [HUN]Zolee őstag Diskcopy #282

Új Válasz 2005-10-08 21:11:35 #283
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Diskcopy #282 üzenetére

Hmm, ez VB 6 os kód, úgynézki .Net be nem megy ez
#281 [HUN]Zolee őstag Diskcopy #280

Új Válasz 2005-10-07 17:10:42 #281
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Diskcopy #280 üzenetére

Valahogy negyon nem akar összejönni ez nekem pedig úgy csináltam mindent ahogy ott le van írva
#279 [HUN]Zolee őstag Diskcopy #278

Új Válasz 2005-10-06 12:06:24 #279
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Diskcopy #278 üzenetére

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.
#277 [HUN]Zolee őstag lapa #275

Új Válasz 2005-10-06 06:12:31 #277
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz lapa #275 üzenetére

sajna egyik se hozott eredényt
#274 [HUN]Zolee őstag

Új Válasz 2005-10-05 11:21:29 #274
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

A pascalban használt delay(x) (várakozás,késleltetés) utasatásnak mi a megfelelője VB.net-ben vagy 6.0 ban?
#270 [HUN]Zolee őstag

Új Válasz 2005-09-23 20:24:17 #270
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

hogy lehet Vb. Net be grafikus képernyőr rábírni , hogy pixelbe számoljon?

találtam olyat, hogy GraphicsUnit.Pixel , de nemtom hogy használjam.

MSDN en se találtam
#237 [HUN]Zolee őstag F-ECT$ #235

Új Válasz 2005-05-19 20:47:59 #237
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz F-ECT$ #235 üzenetére

Köce. Műxik , igaz nem teljesen úgy ahogy gondoltam, de műxik
#234 [HUN]Zolee őstag muad_dib #233

Új Válasz 2005-05-18 16:56:41 #234
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz muad_dib #233 üzenetére

köce.

Mégeyg kérdés.
egér cursort hogy tok mozgatni?
#232 [HUN]Zolee őstag F-ECT$ #231

Új Válasz 2005-05-18 14:59:02 #232
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz F-ECT$ #231 üzenetére

A pascal féle recordra gondoltam.
#230 [HUN]Zolee őstag

Új Válasz 2005-05-17 16:11:10 #230
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

Hogy lehet record változót deklarálni?
#229 [HUN]Zolee őstag F-ECT$ #228

Új Válasz 2005-05-15 21:20:16 #229
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz F-ECT$ #228 üzenetére

Az output helyett Append el nyis meg a file-t és úgy folytatni fogja

[Szerkesztve]
#226 [HUN]Zolee őstag Apollo17hu #225

Új Válasz 2005-05-14 22:41:35 #226
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Apollo17hu #225 üzenetére

A Val fügvénynél a . (pont) a tizedesvesző a számoknál.
#224 [HUN]Zolee őstag Apollo17hu #222

Új Válasz 2005-05-14 17:50:38 #224
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Apollo17hu #222 üzenetére

szövegből számot csinál
Val(szöveges változó)
csak addig nézi amíg azámoz talál amit az első szövegkarakter megjelenik, abbahagya a számmá alakítást, és az addig talált számod adja vissza
#221 [HUN]Zolee őstag

Új Válasz 2005-05-14 13:20:28 #221
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

Hogyan lehet több listbox-ot egyszerre görgetni ?
#206 [HUN]Zolee őstag

Új Válasz 2005-05-05 18:55:14 #206
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

van egy procedúra amit ha meghívok mindig valami hibát ír ki :S

Public Sub beszur(besz1 As String, besz2 As Integer, besz3 As Integer)

hiba :
Compile error:
Expected: =

Ha utána egyelőségjelet + egy változóz írok, akkor elfogadja (nem futtattam le), de miért csinálja ezt? más procedúráknál nem csinálja

És lehet rekord típust deklarálni? és ha igen hogyan?

[Szerkesztve]
#205 [HUN]Zolee őstag Diskcopy #204

Új Válasz 2005-05-01 21:25:41 #205
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Diskcopy #204 üzenetére

Köce sikerült.
#203 [HUN]Zolee őstag Victorius #202

Új Válasz 2005-05-01 19:07:35 #203
Ú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
Privát üzenet küldése

[HUN]Zolee

őstag

válasz Victorius #202 üzenetére

8 kötőjelet fűz hozzá a füzér végéhez és levág a füzért 8 karakter husszúra. Azért kell a 8 kötöjel, hogy biztos 8 karakternél hosszabb legyen.

Egy kérdés

Fáljt akarok visszaolvastatni, de a bevitt elemeket egyszerre 1 sorba adja vissza, és nem csoprtonként. A könyvben azt találtam hogy input(lof(1),#1). Mit takar a LOF ? És hogy lehet betitt sorrendben egymás után kiolvasni úgy hogy ne 1 karakterláncnak vegye az egész szöveget?

[Szerkesztve]

#197

[HUN]Zolee őstag

2005-04-24 18:32:50 #197

[HUN]Zolee

őstag

A progi belemegy egy végtelen ciklusba, de nemtudom mért? Bővebben: link itt a teljes pogram.

Option Explicit
Dim s(15), i, j, cap As Integer

Private Sub Command3_Click()
For i = 0 To 15
 s(i) = 0
Next
i = 0
j = 0
For j = 1 To 15

Me.Print j, cap
'cikl:
Randomize
    s(1) = j
    cap = (Rnd * 14) + 1
     For i = 1 To 15
     'Me.Print i, cap
       If s(i) = cap Then
        'GoTo cikl
        s(j) = 0
      Else
       s(j) = cap
      End If
    Next
Next
For i = 1 To 15

 Command1(i - 1).Caption = s(i)
 Next
End Sub