Avko 10.04.2015 13:12
Predmet:form2 uvijek u centru form1

pod form1 - properties - startupposition stavio sam na 0-manuel

private sub form_load()
With Form1
.Top = (Screen.Height - .Height) / 2
.Left = (Screen.Width - .Width) / 2
End With

kada otvaramo form2 ona bi trebala biti uvijek u centru form1
pod form2-properties-startupposition stavio sam na 0-manuel
onda sam napisao ovo:
*od visine form1 oduzme polovicu visine form2
Form2.Left = Form1.Width - (Form2.Width / 2)

*od sirine form1 oduzme polovicu sirine form2
Form2.Top = Form1.Height - (Form2.Height / 2)

*prikaze form2
Form2.Show

pitanje:
kada pomaknem form1 rucno na neku drugu lokaciju ekrana, form2 mi se ucita u sredinu ekrana a ne u sredinu form1. kako to sada?

Gjoreski 10.04.2015 14:34
Predmet:Re: form2 uvijek u centru form1

Prvo otvori ja formata potoa pozicioniraj ja . Ti vo slujajov prvo ja pozicioniras pa ja otvoras.
vaka bi trebalo da bide:

Form2.Show
Form2.Left = Form1.Width - (Form2.Width / 2)
Form2.Top = Form1.Height - (Form2.Height / 2)

Avko 10.04.2015 16:26
Predmet:Re: form2 uvijek u centru form1

hvala probacu tako

zxz 10.04.2015 19:16
Predmet:Re: form2 uvijek u centru form1

Losa ti je i matematika.
Evo pogledaj.
Ovom ti je za form1
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub Form_Load()
  2. With Form1
  3.  .Top = (Screen.Height - .Height) / 2
  4.  .Left = (Screen.Width - .Width) / 2
  5.  End With
  6. End Sub
  7.  
  8. Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  9. Dim RazlikaDuzina As Integer
  10. Dim RazlikaSirina As Integer
  11.  
  12. RazlikaDuzina = (Form1.Width - Form2.Width) / 2
  13. RazlikaSirina = (Form1.Height - Form2.Height) / 2
  14. Form2.Move Form1.Left + RazlikaDuzina, Form1.Top + RazlikaSirina
  15.  
  16. Form2.Refresh
  17. End Sub

A ovo za form2.
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub Form_Load()
  2. Dim RazlikaDuzina As Integer
  3. Dim RazlikaSirina As Integer
  4.  
  5. RazlikaDuzina = (Form1.Width - Form2.Width) / 2
  6. RazlikaSirina = (Form1.Height - Form2.Height) / 2
  7. Form2.Top = Form1.Top + RazlikaSirina
  8. Form2.Left = Form1.Left + RazlikaDuzina
  9. End Sub

Ovo mozes staviti i na form1 na taster na kome otvaras form2.

Avko 11.04.2015 15:57
Predmet:Re: form2 uvijek u centru form1

hvala na pomoci
koristim ovaj drugi primjer za form2
radi vise nego perfektno.
form2 koristim samo da prikazem progres bar kod downloada

sto se tice matematike , spaljene mi mozdane vijuge pa slabo mislim, mastam i zakljucujem.
bice da sam previse snifo ljepilo u mladim danima

zxz 11.04.2015 19:20
Predmet:Re: form2 uvijek u centru form1

Hehe ja sam se samo salio a ti izgleda shvatio ozbiljno.
Lakse mi bilo to napisati nego objasnjavati a znao sam da ces sam zakljuciti gdje je greska u racunu.

Avko 12.04.2015 12:32
Predmet:Re: form2 uvijek u centru form1

nisi nista lose rekao. budimo realni, rekao si istinu. istina ponekad boli ali moramo se pomiriti sa time. dobro je da me s vremena na vrijeme malo bocnes da mi das motivacije da se malo potrudim. ja evo iskreno trudim se koliko mogu. prvo google, onda kodove skinem pa ih isprobavam. stavljam stop tocke na odredena mjesta. gledam varijable sto se mijenjaju, zasto? kako? i onda kad stvarno zapnem pitam.
dobro su mi dosle one API stvari uzeo sam od tamo SLEEP.
gledam onu VB6 skolu, ima i tamo stvari za nauciti, osnove koje mi nedostaju.
uglavnom eto to je to.
hvala tebi i Gjoreskm na pomoci
lp
citati od zizija (zxz)
"Da napomenem da red koda on error pustamo u rad tek kada smo sigurni da smo proceduru dobro napravili odnosno istestirali.
Ako ovo prije postavimo necemo moci presresti greske odnosno necemo ih moci otkriti pa napisati u proceduri nase upozorenje sta korisnik treba dalje ciniti."

"To sto kazes da mislis da radis na tezi nacin ce ti se desavati stalno.
Jer kako ucis stalno se pojavljuju nove ideje i to je zbog toga.
To se svima desava. Pa to je i u svakom poslu.
Kada nesto napravisi uvijek poslije vidis da je moglo i bolje."

"Tako sam i ućio to Å¡to dobijeÅ¡ ti neodgovara pa onda zasućeÅ¡ rukave i uzmeÅ¡ knjigu pa tražiÅ¡ i napiÅ¡eć pa onda pustiÅ¡ a ono greÅ¡ka i satima ali napravim.
a danas kad pogledam ono Å¡to sam radio prije pitam se o ćemu sam mislio kad sam tako uradio, danas bih to puno jednostavnije uradio, ali nema veze ipak radi."

Gjoreski 12.04.2015 13:42
Predmet:Re: form2 uvijek u centru form1

Moe mislejne e deka nitu eden programer nema zavrseno nitu eden proekt do kraj odnosno sekogas ima nesto da izmeni.Taka da ona ucime dodeka sme zivi seuste vazi.
Jas koga rabotam praktikuvam najmnogu da koristam funkcii i kodovi koi sam sum gi pravel ili sum gi modificiral za moi potrebi.
Sve sto citam ili zemam od internet retko ili skoro nikogas ne go koristam bas takvo kakvo sto e (ova go pravam za da mozam polesno da se snajdam niz programot.
Praktika mi e , a gledam deka i ZXZ ima arhiva od funkcii i kontroli koi gi koristi ( toa modernive programeri go narekuvaat sopstven Framework) ova sekako ja olesnuva rabotata i brzinata vo programirajneto.