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

• [HUN]Zolee őstag

  #1097

  #1096 zabomate

  2009-02-21 21:33:54

  Ú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

  #1096 zabomate

  #1096 zabomate

  Kösz a választ!
  Lenne még 1 kérdésem. Ha én megszeretnék hívni egy másik programot. Például timerrel megcsinálom azt hogy 4 óra múlva indítsa el az adott elérési útvonalon a programot melyik parancsot használjam ehhez?
  parancs D:\eztakaromelindítani.exe
  Előre is köszi.

  ha jól emlékszem akkor shell() vagy valami ilyesmi a parancs és strningként meg megy az elérési útvonal

• [HUN]Zolee őstag

  #1081

  #1080 [HUN]Zolee

  2009-01-13 10:33:31

  Ú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

  #1080 [HUN]Zolee

  #1080 [HUN]Zolee

  Meg tudja valaki mondani, miért nem viszi át a textbox tartalmát, csak amit alapértelmezetten írok be? [link]

  Megoldottam. Hiba: Az átadást arra a formra kell írni amelyiken az átadást kezdeményező esemény található.

• [HUN]Zolee őstag

  #1080 2009-01-13 10:18:39

  Ú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

  Meg tudja valaki mondani, miért nem viszi át a textbox tartalmát, csak amit alapértelmezetten írok be? [link]

• [HUN]Zolee őstag

  #1079 2009-01-09 14:12:45

  Ú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

  Üdv.

  hogy lehet egy új objektumnak aminek a nevét egy tömbbe tároljuk eseménykezelést csinálni?

• [HUN]Zolee őstag

  #1016

  #1015 Boolash

  2008-09-25 18:59:59

  Ú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

  #1015 Boolash

  #1015 Boolash

  Áhh.. Megvan..
  Kicsit túllőttem a célon... Sok volt az 1000 oszlop.
  Esetleg azt nem tudod, hogy hogy lehet megnézni, hogy az adott sorban/oszlopban hol van az utolsó elem? Ne kellejen feleslegesen hiába végignézni sok-sok cellát...
  Köszi!

  Nemtudom. De én úgy szoktam megtudnia a parancsokat, hogy elindítok egy makró rögzítést és megadom a függvényt ami kell nekem beépítetből, így szépen lementi a mscro verzióját.

• [HUN]Zolee őstag

  #1014

  #1013 Boolash

  2008-09-25 18:48:55

  Ú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

  #1013 Boolash

  #1013 Boolash

  Sziasztok!
  Fontos lenne!
  Ezzel mi lehet a hiba?

  Sub elso()
  
  Dim i, j As Integer
  
  For i = 1 To 65536
  For j = 1 To 1000
  If Munka1.Cells(i, j).Value = Munka2.Cells(i, j).Value Then
  
  Else
  Munka1.Cells(i, j).Interior.ColorIndex = 27
  
  End If
  Next j, i
  
  End Sub

  Ez a sor nem jó: If Munka1.Cells(i, j).Value = Munka2.Cells(i, j).Value Then
  merthogy application/object defined error....
  De miért?
  Hogy kellene?

  Egyébként azt csinálja, hogy 2 munkalapot összehasonlít, és ahol különbözik a kettő, azt sárgával megjelöli.

  Köszi!

  Hát nem tudom hogy amiatt reklamál-e hogy az else és a then között nincs semmilyen utasítás.

• [HUN]Zolee őstag

  #1007

  #1006 KrAt

  2008-09-21 14:35:14

  Ú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

  #1006 KrAt

  #1006 KrAt

  Azért gondoltam, hogy egymás után vizsgálja a feltételeket, és ha vmelyiken megbukik, akkor hibaüzit ad.. De vmiért továbblép

  ArchElf: így is továbblép Vhol máshol lesz a hiba..

  De attól még hogy kiadja a hibaüzenetet, a többi feltételt is megvizsgálja, és kiértékeli, pedíg azokat már nem is kell megnéznie ilyenkor.

• [HUN]Zolee őstag

  #1004

  #1003 KrAt

  2008-09-21 14:26: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

  #1003 KrAt

  #1003 KrAt

  Nagyon kezdő vagyok még (ma kezdtem) de vki segítene?

  Miért lép tovább akkor, ha az egyik (akármelyik) textbox-ba (x2, x, cons) semmit nem írok, pedig ott van, ha a textlenght = 0, akkor írjon hibaüzenetet..

  Kód:

  If x2.TextLength = 0 Then
  adathiany.Show()
  End If
  
  If x.TextLength = 0 Then
  adathiany.Show()
  End If
  
  If cons.TextLength = 0 Then
  adathiany.Show()
  End If
  
  If x2.Text = 0 Then
  x2biztos.Show()
  x2igen.Show()
  End If
  
  If x.Text = 0 Then
  xbiztos.Show()
  xigen.Show()
  End If
  
  If cons.Text = 0 Then
  consbiztos.Show()
  consigen.Show()
  End If

  Mit rontottam el? Pedig az alsó 3 kódrészlet működik (ha az érték 0, akkor kérdezzen rá)

  Azért nem jó ez így, mert egyik feltétel sem kapcsolódik a másikhoz.

  If x2.TextLength = 0 or x.TextLength = 0 or cons.TextLength=0 Then
  adathiany.Show()
  else {
  If x2.Text = 0 Then
  x2biztos.Show()
  x2igen.Show()
  End If
  
  If x.Text = 0 Then
  xbiztos.Show()
  xigen.Show()
  End If
  
  If cons.Text = 0 Then
  consbiztos.Show()
  consigen.Show()
  End If
  }
  End If

  Valahogy így kellene kinézni, de én már régóta nem programoztam VB-ben

• [HUN]Zolee őstag

  #923

  #922 sonar

  2007-10-07 16:41:12

  Ú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

  #922 sonar

  #922 sonar

  Jha, hogy egy teljes dimenziót szeretnél átadni?

  Más winapi leirása nincs vkinek? Illetve egy jó webcíme?

  igen, az tömb összes elemét/dimenzióját/ szerettem volna átadni

• [HUN]Zolee őstag

  #921

  #920 sonar

  2007-10-06 22:14:30

  Ú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

  #920 sonar

  #920 sonar

  Szerintem jó az elképzelésed. Bár ezt az egyszerre az egészet nem értem. Be kell rakni egy ciklusba (ahány eleműre lett definiálva a tömb) és annyiszor kell elvégeztetni.

  Üdv

  Akkor marad inkábba fapados megoldás. Pedíg reménykedtem hogy át tudom adni az egészet így

• [HUN]Zolee őstag

  #919 2007-10-03 22:13:21

  Ú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

  Üdv.

  Hogy tudok egy függvénynek megadni egy 2 dimenziós tömböt /egyszerre az egészet/ , majd a függvény értéke is egy tömb legyen?

  Function fuggv (x(,)) As Array (,)
  műveletek
  End Function
  
  Public Sub main()
  
  Dim a(2,2) as Integer
  a(,)=fuggv(a(,))
  
  End Sub

  valami ilyesmi kellene hogy legyen, de nem tudom pontosan.

• [HUN]Zolee őstag

  #845

  #844 sonar

  2007-03-31 22:25:30

  Ú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

  #844 sonar

  #844 sonar

  No most fejből nyomom, szal ha hibás lesz akkor debugolni kell.
  ha vki már egyszer programozást tanul akkor vakarja meg azt a kis buksiját és kezdjen el gondolkodni ha meg nem akkor ne is jelenkezzen programozónak, a f@szom kivan hogy mindig tróger emberek miatt kell a cégnél is többlet munkát végeznem.
  Most is jött egy frissdiplomás aztán egy shell scriptet kellett volna módosítania, de megfeküdt vele. Én meg egy másik sráccal akik életünkben nem linuxoztunk megcsinálltuk.
  
  Itt van, a többit meg egyszerü logikával ki lehet találni.
  
  sub text1 keypress(keyascii as integer)
  if keyascii< asc(''0'') or keyascii > asc(''9'') then
  keyascii=0
  end if
  end sub
  

  Az infótanárom mondta :'' A programozni vágyó emberek 90% nem alkalmas programozónak''
  És ezzel én nagyon egyet is értek,és látom te is osztod a véleményünk.

• [HUN]Zolee őstag

  #843

  #842 KissTboy

  2007-03-31 08:21:09

  Ú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

  #842 KissTboy

  #842 KissTboy

  Zolee vmi nem okés!!!sorba dobálja ki a hibaüzeneteket.
  Azt nem irtam h én vb 6.0 nyomom.Amit irtál példát az nem VB.NET -es példa?Mert nagyon nem akar összejönni.
  PLS segitsetek!köcce!!

  Ja. Hogy VB 6. Azt elfelejtettedmegemlíteni, vagy én csusszantam el eme infó felette.
  VB 6 os kodba sonar biztos tud segíteni, ő biztos hogy még most is abba dogozik. de azért majd ah lesz időm akkor szétnézek msdn-en, a textbox metódusai körül.

• [HUN]Zolee őstag

  #840

  #838 KissTboy

  2007-03-30 23:14:06

  Ú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

  #838 KissTboy

  #838 KissTboy

  Csumi!!!
  
  Köszi szépen a segítséget jó arcok vtok !!!
  Zolee azt h minden gomb lenyomásánál vizsgáljam az te a text_change eljátársr értetted v van vmi más modszer?Mert ha a change eljáráshoz irom akkor ugybár már vmit be kell irnom h lefusson és akkor már bent van egy karakter ami nem biztos h szám!
  Sonar a válaszom az h ötöd éven vok egy progamozói szakon!!
  
  Nah még 1* köszi a segitséget mindenkinek és még várom a jobbnál jobb tippeket!!

  nah elővettem a könyvet és találtam egy ilyen pédát pont erre, hogy csak számokat lehetsen beírni:
  
  
  Private Sub TextBox1_KeyPress(ByVal sender As Object, _
  ByVal e As System.Windows.Forms.KeyPressEventArgs) _
  Handles TExtbox1.KeyPress
  If (e.KeyChar < ''0'' Or e.KeyChar > ''9'') Then
  e.Handled=True
  End If
  
  End Sub
  
  
  Ha így nem íródna be, akkor meg az e.Handled=True -t cseréld ki erre TextBox1.Text=TextBox.Text+e.KeyChar
  
  Remélem érthető volt bár itt csak számokat lehet beírni! De kibővíteni nem olyan nehéz

• [HUN]Zolee őstag

  #839

  #838 KissTboy

  2007-03-30 22:50:15

  Ú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

  #838 KissTboy

  #838 KissTboy

  Csumi!!!
  
  Köszi szépen a segítséget jó arcok vtok !!!
  Zolee azt h minden gomb lenyomásánál vizsgáljam az te a text_change eljátársr értetted v van vmi más modszer?Mert ha a change eljáráshoz irom akkor ugybár már vmit be kell irnom h lefusson és akkor már bent van egy karakter ami nem biztos h szám!
  Sonar a válaszom az h ötöd éven vok egy progamozói szakon!!
  
  Nah még 1* köszi a segitséget mindenkinek és még várom a jobbnál jobb tippeket!!

  najó, a kedvedért felteszem a gépre a VB-t és összhozok valamit.
  De azért ötödéven egy ilyen dolognak nemkéne problémát okozni szerintem

• [HUN]Zolee őstag

  #836

  #835 sonar

  2007-03-30 20:20:22

  Ú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

  #835 sonar

  #835 sonar

  Én még annyival egészíteném ki Zolee-t hogy a backspace-t + entert is célszerű beletenni
  Amugy had kérdezzem meg milyen szakon?
  
  [Szerkesztve]

  én meg még a pontal meg a deletével is kiegészíteném a tiedet, hogy teljes legyen a sor.
  Amúgy 6-ba írtam számológépet. Ott asszem úgy csináltam, hogy zároltam a textboxot, és a gomb lenyomás eseméynre írtam meg az elágazást, hogy csak a megadott karaktereknél írja hozzá a karaktereket. Bár ez nem biztos hogy jó neki, de egy kipróbált módszer
  

• [HUN]Zolee őstag

  #834

  #833 KissTboy

  2007-03-30 10:35:18

  Ú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

  #833 KissTboy

  #833 KissTboy

  Csumi!!
  
  Új vok.Lenne egy kérdésem ami a szakdogámhoz kell!Eléggé szükös már a határidő !Ha tudtok lécci segitsetek!!
  nah szóvala porbléma:
  kellene egy példaprogram arra h egy textbox-ba csa k számot tudjak irni mást karaktert ne fogadjon el.
  
  Lécci aki tud segítsen!!! Elöre is THX!!

  a leg fapadosabb megoldás, hogy minden gomb lenyomásánál megvizsgálod hogy szám-e és ha igen, akkor hozzáfűzöd a textbox text jéhetz
  

• [HUN]Zolee őstag

  #824

  #823 Polyák

  2007-03-13 20:39: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

  #823 Polyák

  #823 Polyák

  Framework az csak .NET-hez vagy VB6-hoz is van? Vagy valami hasonló van VB6-hoz?
  Unom a sima WinXP stílusú ablakot, ezen akarok válztoztatni.

  A Framework csak a .net és az afeletti verziók használják

• [HUN]Zolee őstag

  #821

  #818 sonar

  2007-03-12 17:54:21

  Ú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

  #818 sonar

  #818 sonar

  Ma olyat szivok amilyet még ember nem látott.
  IDE-n belül simán futtatom a progit, de ha le akarom fordítani akkor ad egy üres hiba ablakot és leáll.
  Egy sima ablak piros x el benne és nincs ott semmi szöveg!
  Csak egy Ok meg sugó.
  Természetesen sugóra nem jön be semmi
  Ok-ra meg nem csinál semmit.
  Ilyennel már találkozott vki?
  

  Ez hasonlít a Firmwork .net hibára

• [HUN]Zolee őstag

  #803

  #802 Jester01

  2007-02-18 16:17:19

  Ú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

  #802 Jester01

  #802 Jester01

  Rekurzív megoldás: egyszerûen kitörlöd a stringbõl.
  Hatékonyabb megoldás: csinálsz egy boolean tömböt
  

  Yah. Vágom

• [HUN]Zolee őstag

  #800

  #799 Jester01

  2007-02-16 20:35:13

  Ú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

  #799 Jester01

  #799 Jester01

  Az sem sokkal bonyolultabb (viszont sokkal jobb) ha mindig csak akkora véletlenszámot generálsz ahány betű még van. Így pontosan n-1 darab véletlenszámra lesz szükséged.

  őőő, nem teljesen világos a módszered.
  
  hogy szűröd ki azokat a betűket amiket már kiválasztottál?
  
  

• [HUN]Zolee őstag

  #798

  #794 Polyák

  2007-02-16 17:15:58

  Ú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

  #794 Polyák

  #794 Polyák

  köszi! én is hasonlóra gondoltam csak nem tudom hogy hogyan csináljam azt hogy kétszer ne dobja ugyan azt a random. Te tudod esteleg? Nem külömbözik sztem olyan sokba a vb6 és a 7.

  úgy a legegyszerűbb megoldani, hogy letárolod az eddíg generált számokat, és mindíg amikor generálja az új számot, akkor megnézed, hogy volt-e már ilyen szám, ha volt akkor újrageneráltatsz vele egy számot, mindaddíg amíg olyan számot nem ad, ami még nem volt.
  
  igaz ez rengeteg számolást igényel a gép részéről, de nem hiszem hogy olyan hosszú szavakat fogsz használni, ami észrevehetően lassan állítana elő.
  
  amúgy a VB7 elég sokmindenbe kölünbözik, bár itt csak az elméletről beszélünk, szóval ha tudod a megfelelő parancsokat, akkor ugyan úgy megoldható abba is

• [HUN]Zolee őstag

  #793

  #792 Polyák

  2007-02-15 23:54:07

  Ú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

  #792 Polyák

  #792 Polyák

  Hali!
  Azt hogyan tudom megoldani hogy az ''a'' változóban lévő szó karaktereit összekeverjem?
  
  a = ''ablak''
  ...
  ... = b (b-be már összekeverve kellene!)
  
  Hogyan tudnám megoldani hogy össze legyenek keverve?
  
  Előre is köszi!

  hirtelen ez jutott eszembe (bár én 7 be gondolkodok nem 6 ba)
  
  tömbe felosztod a szót karakterekre, majd random számgenerátorral(paraméterként a szó hosszát megadva) és kikötésbe beleteszed hogy a random nem dobhat azonos számot.
  
  kicsit macerás, de elvbe jó

• [HUN]Zolee őstag

  #745

  #744 Polyák

  2007-01-01 05:44:58

  Ú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

  #744 Polyák

  #744 Polyák

  Köszi!
  
  Hát nem igazán értem, de majd kibogozom. Ha jó vb6 ba, akkor meg is fogom érteni. Talán.
  
  Amugy köszi.
  Kéne valami példarpgi hogyan is kell ezt alkalmazni.

  7 be így néz ki
  
  
  Dim elemek(3) As Object
  
  Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  elemek(1) = Label1
  elemek(2) = Button1
  elemek(3) = TextBox1
  End Sub
  
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  If elemek(1).text = ''AK'' Then
  elemek(1).text = ''ASdf''
  elemek(2).text = ''Gomb''
  elemek(3).text = ''Doboz''
  End If
  End Sub
  
  ez csak az hogy hogyan gondoltam, a ciklus meg a beolvasás nincs benne, de gondolom az menni fog
  
  (7 be a label nek caption helyett text-je van már.)
  
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #743

  #742 Polyák

  2006-12-31 12:37:26

  Ú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

  #742 Polyák

  #742 Polyák

  Hali sonar!
  
  Köszi! Még jól jöhet!
  
  Lenne egy kérdésem is:
  
  A legtöbb programban lehet nyelvet válsztani. Ezt sok ugy csinlálja hogy van egy pl. hungarian.ini fájl és abban vannak a szavak. Valahogy így:
  
  [Form1]
  SpeedButton4=Beállítás ''L''
  SpeedButton5=Réteg előnézet ''K''
  SpeedButton6=Render ''J''
  SpeedButton11=100
  SpeedButton12=OK
  Label13=100%
  SpeedButton14=Stop
  SpeedButton15=Kijelölés eleje ''F''
  SpeedButton16=Kijelölés vége ''T''
  CheckBox1=Auto előnézet ''U''
  CheckBox3=Auto render
  CheckBox6=Nagyít
  TabSheet1=Effekt
  Label1=Szín:
  Label2=Vastagság 1:
  Label3=Vastagság 2:
  SpeedButton1=...
  Label7=Fényesség:
  Label10=Penge:
  SpeedButton2=...
  Label11=Üres
  Label12=Üres
  Label14=0 ms
  Label25=Elmosás:
  Label26=Ív:
  Label27=Elmosás:
  Label28=Ív:
  CheckBox10=
  CheckBox11=
  ...
  
  Ezt egy program magyar.ini állományából másoltam ki.
  
  Hogyan tudok hivatkozni ezekre a cimkékre? Először ugy probáltam ahogy régebben mondtad nekem.
  Line Input #filenum, sor
  De ez egy sort olvas be. Ha mondjuk a 213.sort akarom előhívni akkor 213x kell előhívnom a parancsot. De ez nem igazán praktikus.
  Hogyan tunék én ezekre a cimkékre hivatkozni?
  
  Remélem te tudod, vagy valaki tudja.
  
  A választ előre is köszi!
  
  [Szerkesztve]

  Üdv. pl egy jó megoldás, ha minden egyes objektumot beleszórsz egy nagy tömbbe beleteszed az összes objektumot, és akkor a beolvasott fáljban lévő neveket könnyen át lehet állítani
  
  
  objektumok : object
  
  beolvasás :
  nyelv(X,2) : szöveg
  ciklus eof(file)
  i+=1
  nyelv(1,1)=cimkenév
  nyelv(1,2)=magyar szöveg
  ciklus vége
  
  magyarítás:
  
  for i=1 to X
  for j=1 to X
  ha objektumok(i)=nyelv(j,1) akkor
  objektumok(i).text/value = nyelv(j,2)
  elágazás vége
  ciklus vége
  ciklus vége
  
  asszem ennyi az elméletem
  remélem érted.
  7 be működik, 6 om nincs fent
  
  
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #740

  #739 sonar

  2006-12-27 15:06:51

  Ú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

  #739 sonar

  #739 sonar

  pl csinálsz egy ilyet
  Dim sor as string
  sor= str(id) & '','' & nev...
  aztán
  open ''file'' for output as #1
  output (sor, #1)
  close #1
  és ezt az egészet egy for ciklusba
  vissza olvasni meg inputra nyitod meg a fájlt és szétdarabolod a stringet.
  

  Egész jó ötlet. meglássuk hogy tudom összehozni 7 be
  kösz

• [HUN]Zolee őstag

  #738 2006-12-26 14:12:53

  Ú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

  van egy ilyen típusu tömböm :
  Structure ttipus
  Dim id As Integer
  Dim nev As String
  Dim aber As Integer
  Dim tber As Integer
  Dim tszam As Integer
  End Structure
  
  ezt hogy tudom fáljba menteni, és visszaolvasni?
  VB 7 be kell megoldani.
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #735

  #734 Polyák

  2006-12-21 16:01:46

  Ú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

  #734 Polyák

  #734 Polyák

  Hali!
  
  Van egy gondom!
  Ha rajzolok PictureBox-ba, nem folyamatosan húzza a vonalat hanem pöttyöket rajzol. Főleg ha gyorsan rajzolok. Ennek biztos hogy így kell működni? Vagy valamit már megint nem értek?
  
  A formon csak egy PictureBox van, a neve kep
  
  Private Sub Form_Load()
  kep.DrawWidth = 5 'vonalvastagság
  End Sub
  
  Private Sub kep_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  If Button = 1 Then
  kep.PSet (X, Y)
  End If
  End Sub
  
  Hogy tudom ezt megoldani?
  
  Előre is köszi!

  Ezt úgyoldottam meg, hogy egy poligont rajzoltatok ki mindíg ,csa hozzáveszem az új képpontot.
  VB7 be kb így néz ki :
  e = egér esemény
  korivp1 = a pontokat tartalmazó tömb, amelynek elemszam nagyságú
  
  Dim p As New Point(e.X, e.Y)
  
  pont = p
  korok()
  
  ReDim Preserve korivp1(elemszam)
  
  korivp1(elemszam) = p
  elemszam += 1
  g.DrawArc(pens.Red,
  
  volt = True
  If elemszam >= 2 Then
  g.DrawLines(Pens.Red, korivp1)
  End If
  

• [HUN]Zolee őstag

  #729

  #728 Polyák

  2006-12-18 08:45:17

  Ú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

  #728 Polyák

  #728 Polyák

  Köszi de az a gond hogy én VB6-ot használok, ezek meg VB.NET-esek ha jól látom. Az meg nincs meg nekem.
  Amugy Köszi rendes vagy! Majd kiderítem hogyan tudok rajzolni!

  6-ba könnyebb rajzolni , majd teszek fel netre leírást, ha megtalálom otthon.

• [HUN]Zolee őstag

  #727

  #726 Polyák

  2006-12-17 22:00: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

  #726 Polyák

  #726 Polyák

  És Form-ra hogy lehet?

  [link]
  tettem fel pár progit, van közte olyan is, amit a VB könyvhöz kaptam.

• [HUN]Zolee őstag

  #725

  #724 Polyák

  2006-12-17 17:46:07

  Ú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

  #724 Polyák

  #724 Polyák

  Köszi. A gyökvönásra majd rájövök.
  
  De rajzolni hogy tudok PictureBox-ba?

  oda még nem próbáltam rajzolni csak simán a form-ra.

• [HUN]Zolee őstag

  #723

  #721 Polyák

  2006-12-17 16:47:59

  Ú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

  #721 Polyák

  #721 Polyák

  Most is egy nagyot fogok kérdezni!
  Hogyan kell hatványozni, gyököt vonni, ill köbgyököt vonni??

  hatványozni a ^ jellel lehet pl. x^5
  egyéb fügvények a system.math oszályba találsz

• [HUN]Zolee őstag

  #696

  #695 Apollo17hu

  2006-11-27 06:21:14

  Ú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

  #695 Apollo17hu

  #695 Apollo17hu

  Így próbáltam, de hibaüzenettel leállt a makró.
  Valószínűleg át kell majd írnom az egész kódot...
  Kösz a segítséget.

  mi volt a hibaüzenet, és mi volt a feltételed?

• [HUN]Zolee őstag

  #692

  #691 Apollo17hu

  2006-11-26 09:03:29

  Ú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

  #691 Apollo17hu

  #691 Apollo17hu

  Hali!
  
  Hogyan oldható meg az a probléma legegyszerűbben, ha egy Do ... Loop Until ciklusban az Until után 2 különböző feltételt szeretnék megadni?

  ha mindkét feltátelnek telejesülnie kell, akkor And el kapcsolod össze, ha csak az egyiknek akkor Or -al.

• [HUN]Zolee őstag

  #625

  #624 Polyák

  2006-09-08 08:09:05

  Ú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

  #624 Polyák

  #624 Polyák

  Kéne egy kis segítség!
  
  Van egy képnézegető progim. Társítva vannak hozzá a jpg formátumú képek. Tehát ha megnyitok egy képet ezzel a progivan indul. Ez müxik.
  A progi ablaka alján van egy Drive egy Paht egy File list. Amikor futtatom a progit itt tudom keresni a képeket és megnyitni. Azt szeretném hogy amikor képet nyitok meg (kep = command ; kepmegj.Picture = LoadPicture(kep) - érted.) akkor a Drive, Path és File elemen a kép útvanala legyen.
  Pl.: A kép útvaonala ''e:\kepek\vegyes\uj.jpg''. A Drive1.Drive legyen ''e'', a Path1.path legyen ''e:\kepek\vegyes'', és a File1.path is ugyan így.
  Nos ezt hogy lehetne megoldani? Nagyon fontos lenne!
  
  Előre is köszi!
  
  [Szerkesztve]

  Hy.Ha szépen megkérlek, átküldenéd nekem a programodat? szeretnék belőle tanulni egy kicsit.e-mail címemre jöhet. köszi

• [HUN]Zolee őstag

  #609

  #608 sonar

  2006-08-05 23:00:58

  Ú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

  #608 sonar

  #608 sonar

  Ez csak egy elméleti fogós kérdés. De ha gondolod összedobok egy programrészt.
  
  Jövőhéten jön meg a haverom a nyaralásból és nekiállunk a VB portálnak

  Ya. Majd ha lesz időd akkor dobj össze egy ilyen programrészt, azt megnézem.

• [HUN]Zolee őstag

  #607

  #606 sonar

  2006-08-04 23:45: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

  #606 sonar

  #606 sonar

  Egy újabb fogós kérdés:
  ha a focus a button-on van, hogyan érem el, hogy csak a space billentyűre cselekedjen?

  Hy.
  Ha eljuttatod hozzám a programot/részt akkor megnézem, hátha kitudok hozni belőle valamit

• [HUN]Zolee őstag

  #603

  #602 sonar

  2006-08-02 20:07:09

  Ú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

  #602 sonar

  #602 sonar

  Hát nem jött össze, de nem is érdekel. space-val müxik jól
  
  A class-ra tudsz mondani vmit?

  upsz, mostvettem észre hogy rosszat másoltam nem 10 hanem 13 , de mindegy, ugaz én textboxnál ellenőriztem.
  sajna 6-ba nemvagyok otthon

• [HUN]Zolee őstag

  #601

  #600 sonar

  2006-08-02 08:35:04

  Ú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

  #600 sonar

  #600 sonar

  Mi a különbség a KeyAscii és a KeyCode között?

  csak tippleni tudok énis.
  
  Keyascii az adott billentyű ascii kódjával dolgozik a Keycode,meg a VB-ben definiált kód alapján.

• [HUN]Zolee őstag

  #599

  #598 sonar

  2006-08-01 13:13:47

  Ú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

  #598 sonar

  #598 sonar

  Hiába. Azért raktam az elejére a msgbox-ot hogy kitaláljam milyen ascii kódot vesz be, de semmilyet. Inkább áttettem a space-re azt minden gond nélkül megeszi

  a keyascii helyett használd a keycode -ot, úgy műxik
  
  If KeyCode = 10 Then

• [HUN]Zolee őstag

  #597

  #595 sonar

  2006-08-01 08:52:19

  Ú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

  #595 sonar

  #595 sonar

  Azt mondja meg vki hogy ha Enter-t nyomok miért nem történik semmi?
  De shift+enterrel meg müxik
  
  Private Sub cmdBe_KeyPress(KeyAscii As Integer)
  MsgBox KeyAscii
  If KeyAscii = 13 Then
  cmdBe.BackColor = vbWhite
  txtMer.SetFocus
  End If
  
  End Sub

  ' If KeyAscii = 10 Then '
  
  így próbáld

• [HUN]Zolee őstag

  #571

  #569 sonar

  2006-07-13 11:59:36

  Ú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

  #569 sonar

  #569 sonar

  Esetleg kit érdekelne egy VB portál?Letölthető Forráskódokkal,program részletekkel.
  Mert ha lenne igény rá (azaz nem csak én updatelnék) akkor belevágnák

  van néhány forráskódom amit a köz javára közkinycsé teszek Meg ha mondjátok mire van szükség, akkor megirogatom, ráérő időmbe.

• [HUN]Zolee őstag

  #567

  #566 sonar

  2006-07-12 21:26:39

  Ú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

  #566 sonar

  #566 sonar

  Meg lehet csinálni de ennek abszolut semmi értelme. vagy én vagyok hülye

  Ha úgy vesszük télleg, semmi értelme, de egyik kedves barátommal egy közös elméket idézünk majd fel ezáltal.

• [HUN]Zolee őstag

  #565

  #564 sonar

  2006-07-11 11:36:52

  Ú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

  #564 sonar

  #564 sonar

  És hogyan? appendoljam hozzá? vagy hozzak létre mindig egy új fájlt? Bár ez hülyeségnek hangzik.
  sok értelmét nem látom, de megtudom csinálni.
  
  [Szerkesztve]

  Azt megutdod csinálni, hogy a beírt szöveget az aktuális dátum legyen a neve? A betöltésnél meg egy openfiledialog-jönne fel ahol kiválaszthatnám hogy melyik file-t akarom megnyitni. Ha így nemmegy(mármint az openfiledialog, a dátumnév nem fontos), akkor írja mindíg felül az aktuális file-t.

• [HUN]Zolee őstag

  #563

  #562 sonar

  2006-07-11 09:34:51

  Ú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

  #562 sonar

  #562 sonar

  De akkor a fájlba írás kell?

  igen, a fáljbaírás kell.
  Hagyd bent a te megoldásod is.

• [HUN]Zolee őstag

  #561

  #560 sonar

  2006-07-11 07:45:51

  Ú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

  #560 sonar

  #560 sonar

  Elvileg megvan a béta csak otthon hagytam a penemet így nem tudom belinkelni.
  Meg tudom csinálni a beirogatós részt is, de sztem hülyeség.
  Ja van kérdésem is:
  milyen sorrendben kell rajzolni az akasztófát? Egy paintes (v akármilyen) skiccet nem tudsz küldeni?

  Hy.
  Tudom hogy a beirogatós rész hülyeségnek tűnik, de nálam fontos szerepet kap majd, de nehéz lenne elmagyarázni, miért.
  sorrend : [link]
  

• [HUN]Zolee őstag

  #559

  #557 sonar

  2006-07-10 17:21:51

  Ú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

  #557 sonar

  #557 sonar

  Már félig kész van. (Mondjuk ha nincs 7végén balesetem akkor nem )
  Úgy csinálom, hogy lesz egy fájl amibe eddig 200 szót lehet beírni és abból random kiválaszt
  egyet feladványnak. Sztem így jobb mint midig beírni

  Kira. De ha nem nagy kérés tedd vissza bele a beirogatós részt (is) , mert szándékosan úgy csináltam meg .
  
  Köszi.

• [HUN]Zolee őstag

  #555

  #553 sonar

  2006-07-07 21:27:16

  Ú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

  #553 sonar

  #553 sonar

  Tegnap este belenéztem, meglesz ha szánok rá pár órácskát.

  Hálám örökké üldözni fog

• [HUN]Zolee őstag

  #548

  #547 sonar

  2006-07-05 10:44: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

  #547 sonar

  #547 sonar

  Hát ránéztem tegnap meccs közbe, de igen kusza a dolog.
  egyszer nézd át a mixer.bas ba a hangerő részt. Ott egy csomó komponens van ami nincs is. És ott ha jól emléxem vmi más scrollbar-t használsz mint a frm-on. Ha azt megnézed szerintem jó lesz, mert ott állítja a balancot.
  Aztán így ennyire tellett.
  No megha kikommentezed akkor magad is rájössz a hibákra. Én legalábbis úgy szoktam a hibáimat keresni.
  
  [Szerkesztve]

  Hy. siekrült vlamit alakítani az akasztófa programommal?

• [HUN]Zolee őstag

  #544

  #543 Polyák

  2006-07-02 10:50:01

  Ú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

  #543 Polyák

  #543 Polyák

  Tud nekem segítenivalaki?
  [HUN]Zolee, sonar, senki sem tud?
  Lécci!
  
  Előre is köszi!

  Sajna VB6 ba nemvagyok otthon

• [HUN]Zolee őstag

  #541

  #540 sonar

  2006-06-28 10:00:44

  Ú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

  #540 sonar

  #540 sonar

  nem nagyon igazodok ki abban az msdn-ben de ha te mondod

  igaz, kicsit nehézkes kiigazodni, de asszem akkor ez kell neked [link]

• [HUN]Zolee őstag

  #539

  #538 sonar

  2006-06-27 19:22:30

  Ú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

  #538 sonar

  #538 sonar

  ez .NET ! és sajnos egy két dolog nem megy vb6-ban
  mint például a bit shift '>>' vagy '<<'
  

  ya neked 6 kell, az is ott van, csak keress rá a Visual Basic 6 -ra

• [HUN]Zolee őstag

  #535

  #534 sonar

  2006-06-23 19:40:52

  Ú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

  #534 sonar

  #534 sonar

  Nekem a súgó nem megy
  de közbe rájöttem
  Dim TestComp as integer
  TestComp = StrComp(string1,string2, vbTextCompare)
  Jó az = is de ha nem jutott eszembe
  

  [link] tessék itt a Help

• [HUN]Zolee őstag

  #526

  #525 L3zl13

  2006-06-18 14:21:21

  Ú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

  #525 L3zl13

  #525 L3zl13

  Igen, de a .NET felpakol egy pár VB* nevű fájlt, tehát szvsz csak máshogy hívják, de ugyanúgy szükség van valamilyen dll-re a futtatáshoz.
  
  Nálam pl D:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\Microsoft.VisualBasic.dll ami az infója szerint Visual Basic Runtime Library. (És itt semmilyen VB fejlesztői környezet nincs feltéve.)

  igen, de az már a Framework .NET , ami nem csak a VB-hez kell (sajnos).
  De abban valóban igazad van, hogy vannak szükséges dll fájlok a VB7 program futtatásához. A Framework.NET ről teljesen megfeledkeztem.

• [HUN]Zolee őstag

  #524

  #523 L3zl13

  2006-06-18 14:10:14

  Ú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

  #523 L3zl13

  #523 L3zl13

  Szvsz neked a Microsoft.NET mappában van a megfelelője. Szóval ugyanaz a helyzet.
  
  [Szerkesztve]

  Az egész rendszermeghajtón ( erre van feltelepítve a VB is) kerestem de a kereső nem találja a *vbrun*.dll fált. (Rejtett fájlok közt is keres) .

• [HUN]Zolee őstag

  #522

  #521 Polyák

  2006-06-18 11:26:06

  Ú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

  #521 Polyák

  #521 Polyák

  A VB6 hoz kell a SP2?

  Csak a VB 8 nak kell (ezekszerint) az SP2 korábbi verziókhoz nem.

• [HUN]Zolee őstag

  #519

  #518 Polyák

  2006-06-14 11:31: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

  #518 Polyák

  #518 Polyák

  
  Hmm.... Megéri?
  
  A VB7-ben kell ilyen DLL a programom futtatásához:
  VB1 : vbrun100.dll
  VB3 : vbrun300.dll
  VB4 : vbrun432.dll , vbrun416.dll
  
  Kicsit idegesítő h csak akkor indul el ha ez a fájl az alkalmazás mellet, vagy a System mappában van! Főleg ha valakinek elviszem és neki nincs meg a VB.
  
  [Szerkesztve]

  Nagy valószínűsége annak hogy nemkell neki dll , mivel az én gépemen sincs a system mappába se a VB mappájába.

• [HUN]Zolee őstag

  #517

  #516 Polyák

  2006-06-14 09:29:13

  Ú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

  #516 Polyák

  #516 Polyák

  Köszi!
  Hány MB körül van a telepítője? (Visual Basic . NET (2003))
  Nem akarok már ebben a hónapban nagy adatforgalmat! A VB 2005 Express 500MB volt!
  
  [Szerkesztve]

  1,4GB MSDN nélkül

• [HUN]Zolee őstag

  #514

  #513 Polyák

  2006-06-14 09:08: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

  #513 Polyák

  #513 Polyák

  A Visual Basic 2005 Express telepítésénél kiírja h a gépemen nincs SP2 ézért nem telepíthető!
  
  Neked melyik VB van meg hogy fut SP1-en?
  
  [Szerkesztve]

  Visual Basic . NET (2003)

• [HUN]Zolee őstag

  #512

  #511 Polyák

  2006-06-13 17:57:07

  Ú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

  #511 Polyák

  #511 Polyák

  THNX!
  Még nem próbáltam ki, de jó a VB1-hez?
  Feltettem a SP2-t és nem indult el a gépem. Maradok akkor a VB1-nél. (Egy darabig.)

  mi köze az SP2-nek a VB hez?
  Nekem SP1 van fent.
  
  sonar köszi. Most amit tudok azt megírom vb6-ba. majdmegy mail-be a forráskód meg ami még kell.
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #509 2006-06-11 20:11:30

  Ú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

  Ha valaki megírna nekem egy kis progit VB6 ban azt megköszönném, 7-be megírtam, megy is nálam, csak .NET kell hozzá, és akinek írtam nála nem lehetséges a telepítés. 367 soros a program ebből 122 a objektumok. Egy akasztófa programról van szó.

• [HUN]Zolee őstag

  #505

  #504 Polyák

  2006-06-05 11:41:16

  Ú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

  #504 Polyák

  #504 Polyák

  Egy txt fájl második sorát hogy lehet beolvasni?
  Azt tudom hogy az első sort a Lineinput parancsal lehet, de a másodikat ill harmadikat?
  
  Amugy VB1-et használok! (ez van meg! ebben is kérnék egy kis segítséget h frissítsek valami újabbra)
  
  Help me! THNX!!!

  VB1 ?
  Ajánlom a VB.NET -et ez van most elterjedve sztem. VB.NET=VB7

• [HUN]Zolee őstag

  #492

  #491 Gh0sT

  2006-05-24 21:28:39

  Ú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

  #491 Gh0sT

  #491 Gh0sT

  Probléma:
  
  Adott egy combobox, aminek az alábbi elemei vannak:
  elmúlt egy hét
  elmúlt egy hónap
  elmúlt negyedév
  elmúlt félév
  elmúlt év
  
  Ezen kívül manuálisan is lehet beírni dátum értéket. Megoldható valahogyan az, hogy mondjuk dupla klikkre megjelenjen a naptár, amin ki lehetne választani az időpontot? Sokkal elegánsabb lenne, mint ez a manuális bevitel.

  egy megoldás : teszel fel egy MonthCalendar-t , elrejted, majd ha cbox-ba az pl.''egyéb''-re kattintanak, akkor megjelenteted, majd ott ki tudja válsztani a szükséges dárumot, majd a SelectionEnd tulajdonságot hozzáadod a cbox-hoz.

• [HUN]Zolee őstag

  #488

  #487 sekli

  2006-05-22 20:28:45

  Ú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

  #487 sekli

  #487 sekli

  nem érdekes, akkor hanyagolom azt a programot, viszont most az kéne, hogy hogy lehet elmenteni mondjuk .txt-be adatokat, és onnan kiolvasni? pl: konkrétan button1.text legyen a txt első sorában lévő button1.text= utáni rész.

  6 ba vagy 7 be? mert nagyon megkavarták. gondolod te is jöhetsz msn-re

• [HUN]Zolee őstag

  #486

  #485 sekli

  2006-05-22 20:15:01

  Ú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

  #485 sekli

  #485 sekli

  tudom, hogy azért van, de azt hittem, hogy van valami egyszerű módja a ''csinosításnak'', mert én többek között ezért is favorizálom a 2005-öt... (bár az ez a .NET FX es dolog elég gáz...)

  én a 2003 at használom. másnéven a 7.0 ás. talán össze lehet hozni az objektumokat, de annyira nemismerem a programot

• [HUN]Zolee őstag

  #484

  #483 sekli

  2006-05-22 19:19:08

  Ú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

  #483 sekli

  #483 sekli

  hát nekem 98 style csak az ablak felső része és az X gomb XP-s...

  ez azért van , mert a 6.0 megírásakor még nemvotl XP (szerintem) , és ezért minden objektuma az akkori win-nek felel meg, ha átrajzolod, az objektumokat akkor lesz csak XP-s.

• [HUN]Zolee őstag

  #482

  #481 sekli

  2006-05-22 17:24: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

  #481 sekli

  #481 sekli

  és a 6-ra hogy lehet XP-skint ''varázsolni''?

  na ezt nemértem pontosan mitszeretnél
  miben tér el a megírta alkalmazás skinje a win skinjétől?

• [HUN]Zolee őstag

  #480

  #478 Gh0sT

  2006-05-22 17:06:11

  Ú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

  #478 Gh0sT

  #478 Gh0sT

  Hi!
  
  Tegnap még próbálkoztam, de nem mentem sokra az ablak megjelenítéssel. Működik, de valamiért feketéből kezd el megjelenni az ablak és nyeri el az eredeti színét.
  
  A következőt csináltam:
  Dim n As Integer
  For n = 1 to 100
  Me.Opacity = n/100
  System.Threading.Thread.Sleep(5)
  Next
  
  Próbáltam megváltoztatni a lépésközt nagyobbra, de semmi eredmény.
  
  Aztán próbaképp csináltam egy ilyet:
  
  Dim n As Integer
  For n = 1 to 100
  Me.Opacity = n/100
  MsgBox(n)
  Next
  
  Itt ugye mindig feldobta n értékét egy ablakban, de látszólag nem feketéről indult a megjelenés. Minden OK volt, csak az MsgBox-okra nem lett volna szükségem. Hol lehet a hiba?
  
  

  ha gondolod keress meg majd msn-en. ott gyorsabb.

• [HUN]Zolee őstag

  #479

  #478 Gh0sT

  2006-05-22 16:56:44

  Ú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

  #478 Gh0sT

  #478 Gh0sT

  Hi!
  
  Tegnap még próbálkoztam, de nem mentem sokra az ablak megjelenítéssel. Működik, de valamiért feketéből kezd el megjelenni az ablak és nyeri el az eredeti színét.
  
  A következőt csináltam:
  Dim n As Integer
  For n = 1 to 100
  Me.Opacity = n/100
  System.Threading.Thread.Sleep(5)
  Next
  
  Próbáltam megváltoztatni a lépésközt nagyobbra, de semmi eredmény.
  
  Aztán próbaképp csináltam egy ilyet:
  
  Dim n As Integer
  For n = 1 to 100
  Me.Opacity = n/100
  MsgBox(n)
  Next
  
  Itt ugye mindig feldobta n értékét egy ablakban, de látszólag nem feketéről indult a megjelenés. Minden OK volt, csak az MsgBox-okra nem lett volna szükségem. Hol lehet a hiba?
  
  

  Dim n As Integer
  For n = 1 to 100
  Me.Opacity = n/100
  System.Threading.Thread.Sleep(5
  Me.Refresh()
  Next
  
  így jó lesz
  kifelejtetted a form frissítést.
  
  [Szerkesztve]
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #477

  #476 sekli

  2006-05-22 11:06:34

  Ú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

  #476 sekli

  #476 sekli

  nagyon nehezeket kérdezek... ?
  
  [link]

  sose használtam 2005 öt

• [HUN]Zolee őstag

  #475

  #474 Gh0sT

  2006-05-22 00:19:37

  Ú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

  #474 Gh0sT

  #474 Gh0sT

  Igen, közben megtaláltam neten. Azért köszönöm!

  nincsmit.

• [HUN]Zolee őstag

  #473

  #470 Gh0sT

  2006-05-22 00:07:12

  Ú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

  #470 Gh0sT

  #470 Gh0sT

  Ok, működik, köszi! Csak nem tudom arra használni, amire szerettem volna.
  
  A login Formnál szeretném megcsinálni azt, hogy kb 2 mp alatt jelenjen meg. Gondoltam, hogy ha a form.opacity tulajdonságára írok egy for/next ciklust, akkor sima ügy lesz. Persze nem működik, de miért?
  
  Dim n As Integer
  For n = 1 to 100
  Me.Opacity = n
  System.Threading.Thread.Sleep()
  Me.Refresh()
  Next
  
  Futási időben nem tudom az Opacity tulajdunságot változtatni?
  
  

  Opacity az egy 0 és 1 közé eső szám.
  
  Me.Opacity = n/100
  a példád szerint
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #469

  #468 Gh0sT

  2006-05-21 23:41:28

  Ú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

  #468 Gh0sT

  #468 Gh0sT

  Hogyan tudok úgy for next ciklust futtatni, hogy a ciklus futási ideje pontosan 2 mp legyen? Gondolom valami késleltetés kellene bele, de micsoda?

  várakozást a System.Threading.Thread.Sleep() utasítással tudsz beletenni ezredmásodpercben

• [HUN]Zolee őstag

  #466

  #465 Gh0sT

  2006-05-21 16:17:53

  Ú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

  #465 Gh0sT

  #465 Gh0sT

  Valaki meg tudná mondani, hogy az Rnd() függvény miért mindig ugyanazt az értéket adja vissza?
  
  Egy parancsgombhoz rendeltem hozzá az Rnd()*100+1 függvényt, ami mondjuk elsőre 75-öt ad eredményül. Ezután újra klikkelek és mondjuk 18-at kapok, majd a következőre 37-et.
  Kilépés és újraindítás után ismét 78, 18, 37 lesz a sorrend. De miért???
  

  írd be a form_load ba hogy Randomize() . és akkor elvileg már mindíg más számot kell adnia.

• [HUN]Zolee őstag

  #456

  #455 sekli

  2006-05-16 21:53:08

  Ú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

  #455 sekli

  #455 sekli

  ja, framework, de volt fenn...

  hmm, pedíg akkor szokott ilyet dobálni.
  Sajnos nem mindegy neki hogy melyik van fent az 1.1 vagy a 2.0 . mivel olvastam valahol hogy nem teljesen kompatibilis visszafelé

• [HUN]Zolee őstag

  #454

  #453 sekli

  2006-05-16 21:40:47

  Ú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

  #453 sekli

  #453 sekli

  Az miért van, hogy csinálok ey programot, és másoknál, ahhol nincs VB, ott azt írja, hogy: ''Az alkalmazás inicializálása nem megfelelő (0xc0000135) Alkalmazás befelyezéséhez kattintson az OK gombra''??

  .Net firmwork vagy mi a rák kell neki.

• [HUN]Zolee őstag

  #443

  #441 matekmatika

  2006-05-12 17:07:25

  Ú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

  #441 matekmatika

  #441 matekmatika

  Az IsNumber-t ötletét a makrorögzítő adta, nekem fogalmam sem volt, hogy van ilyen (nekem magyar Office lévén SZÁM szerepelt a munkalap függvényében) Ergo: olyan nagyon rosszat nem írhattam. Az IsNumeric-et már a neten találtam, több helyen is, több példát, de nem jók. (Lehet Visual Basic.Net kell hozzá? ) Nem tudom.

  mingyárt megnézem neked ezt a fügvényt
  vagyis amint megjöttem este a melóból
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #442

  #440 -Gábor-

  2006-05-12 17:04:16

  Ú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

  #440 -Gábor-

  #440 -Gábor-

  Jah, hogy itt most Excelről van szó... Azt hittem, hogy az Excel-es makrót szeretné átalakítani úgy, hogy fusson egy VB formon.

  Vagyis remélem hogy Excelről van szó, ha nem akkor télleg kell a deklaráció
  de amúgy a fordítónak nem a változóval van a baja, hanem a függvénnyel.
  Ha viszont VB-be akarja ezt írni, akkor hibás a függvénymeghívás, pontosítani kellene.

• [HUN]Zolee őstag

  #439

  #438 -Gábor-

  2006-05-12 16:56:39

  Ú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

  #438 -Gábor-

  #438 -Gábor-

  Hiányzik a deklaráció:
  
  Dim szam as string
  
  [Szerkesztve]

  Exelbe nem kötelező deklarálni a változókat

• [HUN]Zolee őstag

  #394 2006-04-06 13:45:17

  Ú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

  hány oszlop :
  
  
  Sub mennyi_van_kitoltve_a()
  Worksheets(''Munka1'').Select
  Db = 0
  If [a1].Value = '''' Then
  Db = 0
  Else
  If [a2].Value = '''' Then
  Db = 1
  Else
  For Each cella In Range([a1], [a1].End(xlToRight))
  Db = Db + 1
  Next
  End If
  End If
  
  
  

• [HUN]Zolee őstag

  #393

  #392 MartinIsti

  2006-04-06 13:33:34

  Ú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

  #392 MartinIsti

  #392 MartinIsti

  A múltkori problémámat sikerült megoldanom. Mondjuk sejtettem, hogy egy egyszerű ciklus-utasítás révén menni fog a dolog, csak jól meg kellett ''fogalmazni''.
  
  Most viszont egy olyan átfogó kérdésem lenne, hogy miként lehet az egyes Excel táblák határait megállapítani? Érthetőbben kifejezve: az adott munkalapon szereplő táblázat hány soros és hány oszlopos? Ez ugye ránézésre simán megy, de ha automatizálni akarom a folyamatot, akkor már gondban vagyok, mert makrórögzítés révén nem tudom kisilabizálni a dolgot. Ezenkívül van valamilyen függvény vagy utasítás, amely megállapítja, hogy az adott fájl hány munkalapból áll?
  
  Ha nem teljesen világos a kérdésem, szívesen leírom a segíteni szándékozó kedves emberkének, mi is a pontos feladat, aminek a részeként ezek kellenek.

  az első kérdésre, mingyárt megírom a macrot
  
  a második engem is érdekelne
  
  Hány cella van egy oszlopba :
  
  
  Sub mennyi_van_kitoltve()
  Worksheets(''Munka1'').Select
  Db = 0
  If [A1].Value = '''' Then
  Db = 0
  Else
  If [A2].Value = '''' Then
  Db = 1
  Else
  For Each cella In Range([A1], [A1].End(xlDown))
  Db = Db + 1
  Next
  End If
  End If
  ActiveCell.Value = Db
  End Sub
  
  
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #379

  #378 Jester01

  2006-03-27 22:16:34

  Ú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

  #378 Jester01

  #378 Jester01

  ChrW(CLng(''&h'' & x))
  Ahol x a hexa kód string formában. Stringre karakterenként ciklusban.

  köszi

• [HUN]Zolee őstag

  #377 2006-03-27 20:06: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

  Hogy lehet hexa kódvól szöveget csinálni?

• [HUN]Zolee őstag

  #369 2006-03-23 21:40:09

  Ú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

  Hogy lehet új objektumot adni a VB . NET be kódbol ? ( most egy PictureBox-ot kéne hozzadni). Nem sikerült még rájönnöm

• [HUN]Zolee őstag

  #351

  #350 sonar

  2006-02-26 08:01:03

  Ú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

  #350 sonar

  #350 sonar

  Esetleg tudnál egy közvetlen linket adni, ahol az msdn-en olyat találok ahol a parancsok ki vannak vesézve? Már jó ideje bolyongok rajta, de próbálgatással/könyvek bogarászásával előbb-utóbb rájövök amit akarok hogyan tudom megoldani. De jó lenne tudni, hogy mégis mik a lehetőségek.

  [link]
  Tessék.

• [HUN]Zolee őstag

  #348

  #347 Lortech

  2006-02-25 16:01:12

  Ú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

  #347 Lortech

  #347 Lortech

  A VB 2005 express edition ingyenes, ezzel könnyen készíthető console application, benne van a project templatekben.
  [link]

  minden nap tanul valami újat az ember

• [HUN]Zolee őstag

  #346

  #345 HAYES

  2006-02-25 15:48: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

  #345 HAYES

  #345 HAYES

  Azt nem tudjátok hogy a vb6 enterprise edition az ingyenes-e?
  
  ha ingyenes akkor honnan lehet letölteni?

  Nem hiszem hogy ingyenes. Legalábbis én még nem hallottam volna hogy a microsoft bármelyik VB-t is ingyenessé tette volna, de kérdezd meg X-Com-ot ő bizts tudja a pontos választ (WinXP topicba megtalálod)

• [HUN]Zolee őstag

  #344

  #343 RAM

  2006-02-25 14:17: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

  #343 RAM

  #343 RAM

  Létezik jó doksi (magyar elsősorban -angol) ehhez a nyelvhez?

  angol-nak ott van a saját help-je ami sztem jól megszerkesztett, vagy a msdn.microsoft.com

• [HUN]Zolee őstag

  #338

  #337 tkazmer

  2006-01-07 17:02:10

  Ú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

  #337 tkazmer

  #337 tkazmer

  Pontosan hogy kell birtokolt formokat létrehozni? A könyvem leírja, de a fordító nem fogadja el

  tedd fel netre, vagy küld el mail-be megnézem

• [HUN]Zolee őstag

  #325

  #324 Jester01

  2005-11-30 23:23:38

  Ú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

  #324 Jester01

  #324 Jester01

  Mi még dolgozunk, éppen most rendeltünk kaját nehogy elhalálozzunk közben

  Uhh. részvét.
  Én most megyek fexek. majd holnap d.u jövök.

• [HUN]Zolee őstag

  #323

  #322 Jester01

  2005-11-30 23:17:15

  Ú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

  #322 Jester01

  #322 Jester01

  Ne már! A középpontot bármilyen, sugár hosszúságú vektorral eltolva a körívre eső pontot kapsz. A (sugár, 0) vektor pedig triviálisan ilyen.
  A #315-ben pont azt mondtad, hogy az alappont a 0 fokos pozíció és a rajzodon is ez van.

  bocsi, igazad van , ezt nagyon benézem, látszik hogy hiányzik belőlem a sör , ilyenkor már kell a gondolkodáshoz
  
  

• [HUN]Zolee őstag

  #321

  #320 Jester01

  2005-11-30 23:05:06

  Ú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

  #320 Jester01

  #320 Jester01

  #316 (op(i).X + sugar, op(i).Y)
  
  Skalárokat adtam össze
  Vagy ha úgy tetszik akkor a (sugar, 0) vektorral eltoltam az op(i) pontot.
  VBben:
  alappont.X = op(i).X
  alappont.Y = op(i).Y + sugar

  ha csak az egyik koordinátá változtatod meg akkor a kektekező vektor nem a körívre esik majd.
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #319

  #318 Jester01

  2005-11-30 22:38:04

  Ú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

  #318 Jester01

  #318 Jester01

  a sugar nem szakasz, hanem a hossza. Te írtad
  sugar = Int(Math.Sqrt((fixp.X - op(i).X) ^ 2 + (fixp.Y - op(i).Y) ^ 2))
  Szóval össze lehet adni
  
  ezt meg nemértem hogy jött ki neked
  
  Szétbontottam két törtre:
  (2 * sugar^2 - atlo^2) / (2*sugar^2) =
  = (2 * sugar^2) / (2 * sugar^2) - (atlo^2) / (2 * sugar^2)
  = 1 - (atlo^2) / (2 * sugar^2)
  
  Szerinted nem jó
  

  én egy szóval sem mondtam hogy nem jó, csak annyit, hogy nemértettem hogy jött ki
  
  mingyárt megnézem
  
  Na énis a szakasz hosszára gondoltam.
  
  egy vektor és egy hossz nem összeadható, vagyis a sugarat nem elhet hozzáadni a az op(i) -hez
  de azért megnézem
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #317

  #316 Jester01

  2005-11-30 22:22:25

  Ú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

  #316 Jester01

  #316 Jester01

  Akkor az alappont koordinátái helyesen (op(i).X + sugar, op(i).Y), nemde?
  x pedig a^2+b^2-c^2/2ab = (2 * sugar^2 - atlo^2) / (2*sugar^2) =
  = 1 - (atlo ^ 2) / (2 * sugar ^ 2)
  
  MOD: a középpont az op(i) ...
  
  [Szerkesztve]

  az op(i) egy pont a sugár pedig egy szkasz, és ezt a kettőt szerintem nem lehet összaedni.
  
  (2 * sugar^2 - atlo^2) / (2*sugar^2) = 1 - (atlo ^ 2) / (2 * sugar ^ 2) ezt meg nemértem hogy jött ki neked

• [HUN]Zolee őstag

  #315

  #314 Jester01

  2005-11-30 21:53:39

  Ú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

  #314 Jester01

  #314 Jester01

  Köszi az ábrát
  Szóval akkor a = b = sugár és c = átló.
  Gondolom op(i) a középpont, fixP pedig az egyik pont a köríven.
  Alappont lenne akkor a másik pont a köríven, csak nem értem a számítási módját. Felvilágosítanál?
  
  Ez egyébként direkt van?
  i = kpont(fixp.X, fixp.X)

  op(i) az a szakasz végpontjai, vagyis e közül kerül ki a kör középpontja.
  alappont az a 0°os körívnél lévő pont
  
  
  
  fixp az a kezeti pont ahonnan indítjuk a köríavet
  vp az a változó pont, ami mindíg az aktiális egérelmozdulási értéket kapja meg (ez még nincs kész)
  
  
  
  és a i=kpont(fixp.X,fixp.Y) kell. töbszem többet lát
  
  
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #313

  #312 Jester01

  2005-11-30 21:32:43

  Ú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

  #312 Jester01

  #312 Jester01

  Eddig jó. Na most akkor mi micsoda?
  Ebben a képletben ugye szerepel a háromszög 3 oldala.
  Neked meg van átló és sugár, amit eleve nem értek, de ráadásul kevés is (2 vs 3 darab).
  Szóval első körben szerintem nevezd el érthetőbben a változóidat, az arccos függvényből pedig csinálj tényleg külön függvényt, így jobban átlátható lesz.

  ya télleg .
  
  
  
  
  [Szerkesztve]

• [HUN]Zolee őstag

  #311

  #310 Jester01

  2005-11-30 20:31:16

  Ú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

  #310 Jester01

  #310 Jester01

  Hát ha ez arccos, akkor a bemenetnek illene a [-1,1] intervallumba esni.
  Szóval a hiba az x kiszámításában lesz.
  Mellékes jótanács: ha mindenütt csak egy mennyiség négyzetére hivatkozol, akkor fölösleges gyököt vonni (lásd pl. atlo)

  a koszinus tétet kell leprogramoznom, és én ezt hoztam ki belőle :
  
  alfa = arccos ((a^2+b^2-c^2)/2*a*b)

• [HUN]Zolee őstag

  #309

  #308 Jester01

  2005-11-30 19:55:04

  Ú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

  #308 Jester01

  #308 Jester01

  Ha ide-ből futtatod, akkor megáll a hibánál: Form1.vb 91. sor.
  

  alf = ((Math.Atan(-x / (Math.Sqrt(-x * x + 1))) + 2 * Math.Atan(1)) * 180 / Math.PI)

  
  Sajnos nem tudtam kibogozni mit is akarsz csinálni, de nekem az x most éppen kb 165, vagyis a gyök alatt negatív szám van.

  
  
  [Szerkesztve]

  az az invers Cos MDSN szerint.
  
  lehet valami el van írva, mert ahogy nézem az mindíg negatív lesz :S pedig amitko beírtam neki hogy x=0,5 , akkor kidobta hogy alf= 60 .

• [HUN]Zolee őstag

  #307 2005-11-30 19:33:15

  Ú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

  Segítséget kérnék a hiba mivoltáról.
  Valami túlcsordul, csak nemtom mi :S
  
  [link]

• [HUN]Zolee őstag

  #303 2005-11-12 18:37:31

  Ú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

  Hogy tom felvinni a cosinusztételt beírni VB.be, hogyha a szög az ismeretlen?
  
  alfa = cos^ -1 (a^2+b^2-c^2)
  

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