[ stranac2 @ 30.01.2004. 09:25 ] @
| Opet trebam pomo�.
Imam formu u kojoj prikazujem slogove iz tabele (continous form) i na njoj gumb DODAJ koji mi otvara novu formu u kojoj dodajem novi slog. Kad zatvorim formu za dodavanje sloga aktivan je (ima focus) prvi slog, jer pri zatvaranju forme za unos napravim requery (da vidim novi slog u pregledu). Ja bih �elio da fokus ima slog koji je upravo dodan (zna�i kad zatvorim formu za dodavanje, fokus bi trebao biti na tom dodanom slogu).
Zahvaljujem na svakoj ideji.
Pozdrav |
[ Zidar @ 30.01.2004. 14:04 ] @
Prepravi tvoj kod tako da imas event procedure na dugmetu (OnClick) i na formi (OnActivate). Gumb_OnClick() ne treba da radi requery, dovoljno je da otvori formu za unos. Form_OnActivate() na tvojoj continuous form treba da odradi requery i da se pozicionira na poslednji slog (zapis, record)
Kod za dugme (gumb) koje se nalazi na headeru kontinualne forme:
Private Sub cmdNew_Click()
On Error GoTo Err_cmdNew_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmailingList_FRM" 'ovde ide ime tvoje forme za unos novog sloga
DoCmd.OpenForm stDocName, acNormal, , , acFormAdd
Exit_cmdNew_Click:
Exit Sub
Err_cmdNew_Click:
MsgBox Err.Description
Resume Exit_cmdNew_Click
End Sub
Kod za kointinualnu formu:
Private Sub Form_Activate()
Me.Requery
DoCmd.GoToRecord acDataForm, Me.Name, acLast
End Sub
[ stranac2 @ 30.01.2004. 16:35 ] @
Zidar, to je OK, ali:
kod za kontinualnu formu se ne izvrši jer se pri zatvaranju forme za unos, na kontinualnoj formi ne dogodi događaj Form_Activate.
Još mi dodatno komplicira stvar i gumb PROMJENA (promjena postojećeg sloga).
Znači, dva su uvjeta:
1. Nakon dodavanja sloga i zatvaranja forme za unos, fokus na već prije otvorenoj kontinuiranoj formi vraća se na dodani slog (koji ne mora biti zadnji jer su slogovi sortirani npr. po prezimenu).
2. Nakon promjene sloga i zatvaranja forme za promjenu, fokus na već prije otvorenoj kontinuiranoj formi ostaje na istom slogu (za taj slog je i otvarana forma za promjenu), s tim da su promjene na slogu vidljive. U ovom slučaju ne treba Requery, samo se setira focus na polje na kontinuiranoj formi i stvar je OK.
Forma za dodavanje i promjenu je Pop Up i Modal.
Pozdrav
[ vbraca @ 31.01.2004. 03:02 ] @
Probaj da pri zatvaranju PopUp forme iskoristis ovaj kod:
Dim rs As Object
Forms!Fproject.Refresh
Forms!Fproject.Requery
Set rs = Forms!contForma.Recordset.Clone
rs.FindFirst "[primarni_kljuc] = " & Str(Me.primarni_kljuc)
Forms!contForma.Bookmark = rs.Bookmark
Docmd.Close acForm, "contForm"
bla, bla
Mozes jos da dodas proveru da li je zapis sacuvan ili ne (DODAJ ili PROMENI komande) etc.
[ stranac2 @ 31.01.2004. 14:40 ] @
Zahvaljujem na kodu. Prilagodio sam i stvar je OK. Konačna verzija:
On Close popup forme:
Dim rs As Object
Forms!contForma.Requery
Set rs = Forms!contForma.Recordset.Clone
rs.FindFirst "[ID] = " & Me.ID
Forms!contForma.Bookmark = rs.Bookmark
Pozdrav
[ vmatoic @ 06.02.2006. 12:03 ] @
Evo izvlacim ovu temu malo iz naftalina, jer sa zadnjim postom ne mogu rijesit svoj problem.
Na on close svoje popup forme sam stavio
Forms!frmRadnjeStavke.Requery
Set rs = Forms!frmRadnjeStavke.Recordset.Clone
rs.FindFirst "[TekstID] = " & Me.TekstID
Forms!frmRadnjeStavke.Bookmark = rs.Bookmark
Kad zatvorim svoju popup formu frmTekst javlja da ne moze naci formu frmRadnjeStavke. To je problem mozda jer je ta forma subforma? Kako bi glasio kod za subformu?
Imam otvorenu formu frmRadnjeStavke koje je subforma forme frmRadnje i kad stisnem na polje TekstID znak + otvara mi se forma frmTekst.
I to je OK, a sad bih ja htio da tu pronadem neki tekst i da po zatvaranju taj tekst stavi u frmStavkeRadnje.
Help, ako netko zna!
Copyright (C) 2001-2025 by www.elitesecurity.org. All rights reserved.