[es] - promena izgleda forme

boki026
ing
Smederevo

Član broj: 175089
Poruke: 36
*.internet.krstarica.net.

Profil

promena izgleda forme

^{09.03.2008. u 17:18 - pre 196 meseci}

Moze li se na komandno dugme postaviti procedura da svojstvo FormView podforme koje je Single Form promeni u Datasheet?

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: promena izgleda forme

^{09.03.2008. u 18:02 - pre 196 meseci}

Može. Možeš čak da napraviš Option group i da čekiranjem određuješ kako da se otvori forma.

Private Sub IZBOR_AfterUpdate()
Select Case Me![IZBOR]
Case 1: DoCmd.OpenForm "NazivForme", acFormDS
Case 2: DoCmd.OpenForm "NazivForme", acNormal
End Select
End Sub

https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski

Odgovor na temu

boki026
ing
Smederevo

Član broj: 175089
Poruke: 36
*.internet.krstarica.net.

Profil

Re: promena izgleda forme

^{09.03.2008. u 19:00 - pre 196 meseci}

To je OK kada zelim da otvorim "samo" formu. Problem je sto ja zelim da promenim izgled subforme, ali da ne zatvaram glavnu formu. Moze li to?

Odgovor na temu

domaci_a_nas
PHP developer

Član broj: 42333
Poruke: 524
*.dynamic.sbb.co.yu.

+8 Profil

Re: promena izgleda forme

^{09.03.2008. u 23:00 - pre 196 meseci}

Recimo da se subform zove SF1 a forma frmSubform. Možeš uraditi sledeće:

Code:
SF1.SourceObject = ""
DoCmd.OpenForm "frmSubform", acDesign, , , , acHidden
Form_frmSubform.DefaultView = acDefViewDatasheet ' ili acDefViewContinuous ili acDefViewSingle
DoCmd.Close acForm, "frmSubform", acSaveYes
SF1.SourceObject = "frmSubform"

Kada budeš načinio izmene u kodu glavne forme u design view treba da je zatvoriš i sačuvaš izmene, ako samo pređeš iz design view u normal view delovaće da kod ne radi.

Ozbiljan i odgovoran mladić

Odgovor na temu

Trtko
Koprivnica

Član broj: 69494
Poruke: 695
*.bilokalnik.hr.

+8 Profil

Re: promena izgleda forme

^{10.03.2008. u 08:46 - pre 196 meseci}

Naravno da se može, ali trebaš dosta i programirati.
Napraviš si formu koja ti to radi..
Nešto ovako

Zakacit cu i tu formu, ali je treba prepraviti, nije univerzalna nego je vezana bas za tu aplikaciju

Inace ti to ovako izgleda u kodu

' mjenjanje izgleda sheeta vidi
[Forms]![pregled]![vidi].Form.DatasheetBackColor = bojapod
[Forms]![pregled]![vidi].Form.DatasheetGridlinesColor = bojagrid
[Forms]![pregled]![vidi].Form.DatasheetForeColor = bojaslova
[Forms]![pregled]![vidi].Form.DatasheetFontName = slovaime
[Forms]![pregled]![vidi].Form.DatasheetFontHeight = velslova
If tanka = True Then
[Forms]![pregled]![vidi].Form.DatasheetFontItalic = True
Else
[Forms]![pregled]![vidi].Form.DatasheetFontItalic = False
End If

If debela = True Then
[Forms]![pregled]![vidi].Form.DatasheetFontWeight = 700
Else
[Forms]![pregled]![vidi].Form.DatasheetFontWeight = normal
End If

Pozdrav

Odgovor na temu

domaci_a_nas
PHP developer

Član broj: 42333
Poruke: 524
*.dynamic.sbb.co.yu.

+8 Profil

Re: promena izgleda forme

^{10.03.2008. u 09:03 - pre 196 meseci}

Imajući u vidu originalno pitanje, uz poštovanje truda koji je Trtko uložio, dodajem i najjednostavniji način da se prvobitni cilj ostvari. Recimo da imaš subform koji se zove SF1 i option group koji se zove SelectView

Private Sub SelectView_Click()
SF1.SetFocus
RunCommand acCmdSubformFormView ' ili acCmdSubformDatasheetView
End Sub

Ozbiljan i odgovoran mladić

Odgovor na temu

boki026
ing
Smederevo

Član broj: 175089
Poruke: 36
91.150.84.*

Profil

Re: promena izgleda forme

^{10.03.2008. u 20:02 - pre 196 meseci}

Hvala svima, radi.

Odgovor na temu