Prikazi cijelu temu 23.06.2013 18:23
Miki2013 Van mreze
Clan
Registrovan od:03.05.2013
Lokacija:Sarajevo


Predmet:Re: Korisnik blokira drugog na mrezi
Odradjen i ovaj dio... "od oka"... izvini nisam imao strpljenja da cekam odgovor.

Dobio sam jednu formu manje (formu administrator) i "olaksao" program za skoro 1 MB.

Poigrao sam se malo sa sirinom i visinom forme, taman koliko mi je bilo dovoljno da smjestim sve one kontrole koje je imao admin, zatim sam na osnovnu formu dodao jedan check box i na njega stavio sljedeci kod
PreuzmiIzvorni kôd (Text):
  1. Private Sub Check209_Click()
  2. If Check209 = True Then
  3.     Forms!frmOsnovna.InsideWidth = 15450
  4.     Forms!frmOsnovna.InsideHeight = 10800
  5.    
  6.     Else
  7.    
  8.     Forms!frmOsnovna.InsideWidth = 15450
  9.     Forms!frmOsnovna.InsideHeight = 9300
  10.     End If
  11. End Sub

Sve sam to "zacinio" sljedecim kodom
PreuzmiIzvorni kôd (Text):
  1.   If strUser = "Administrator ili bilo ko drugi" Then
  2.      [Check209].Enabled = True
  3.      Else
  4.      [Check209].Enabled = False
  5.      End If

Sada kad se logujem kao onaj kome je ovaj check box ukljucen klikom na njega "pojavljuje" se i "nestaje" onaj dio koji sam prosirio... u mom slucaju je bilo samo po visini... pa se sad igram s tim "control panelom" jer izgleda kao zmigavac... sad ga vidis sad ga nevidis Grinning

Opisao sam malo postupak s namjerom da jos neki pocetnik kao sto sam i ja moze eksperimentisati i eventualno prilagoditi svojim potrebama.

Pozdrav!