<![CDATA[Fox4um - Page içerisinde SetAll]]> 2009-07-09T10:30:52Z PunBB http://www.fox4um.com/topic/1276/page-icerisinde-setall/ <![CDATA[Re: Page içerisinde SetAll]]> Benimki biraz genel amacli bir yazim. Herhangi bir "container" tarzi object icin. Mesela PageFrame, onun Controls ve ControlCount'u yok. Pages, PageCount var. CommandGroup dersen Buttons ve ButtonCount. Ama hepsinin uyeleri amembers() ile aliniyor. Vakti zamaninda bir objenin "container" gibi birsey oldugunu nasil buluruz diye sormustum, cevap cikmadi. Benim buldugum yol amembers() sonucu 0'dan buyukse container ve VFP5'den beri calisiyor:)

]]> http://www.fox4um.com/user/11/ 2009-07-09T10:30:52Z http://www.fox4um.com/post/7764/#p7764 <![CDATA[Re: Page içerisinde SetAll]]> Çetin,
döngüyü neden aşağıdaki gibi yapmıyorsun ?

Visual Fox Pro
1

2

3

4

5

6

7

WITH Myform.MyPageFrame.MyPage

FOR m.Xi=1 TO .Controlcount

  IF LOWER(.Controls[m.Xi].BaseClass) == 'commandbutton' And Lower(Left(Controls[m.Xi].Name,6)) == 'btncan'

      .Controls[m.Xi].Enabled = .F.

  ENDIF

ENDF

ENDW
]]> http://www.fox4um.com/user/146/ 2009-07-09T07:57:09Z http://www.fox4um.com/post/7763/#p7763 <![CDATA[Re: Page içerisinde SetAll]]> Üstad harikasın smile

Senin kodun CUK diye oldu smile

Çok teşekkür ediyorum.

]]> http://www.fox4um.com/user/30/ 2009-07-08T12:43:01Z http://www.fox4um.com/post/7757/#p7757 <![CDATA[Re: Page içerisinde SetAll]]> Hayir:(

Foxyclasses var miydi sende? Varsa onunla yapabilirsin.

Eger hepsi dogrudan page'in uyesi ise:

Visual Fox Pro
1

2

3

4

5

6

7

For ix=1 To Amembers(aControls, Thisform.pgf.page1,2)

  With Evaluate('thisform.pgf.page1.'+aControls[m.ix])

    If Lower(.BaseClass) == 'commandbutton' And Lower(Left(.Name,6)) == 'btncan'

      .Enabled = .F.

    Endif

  Endwith

Endfor
]]> http://www.fox4um.com/user/11/ 2009-07-08T12:34:33Z http://www.fox4um.com/post/7755/#p7755 <![CDATA[Page içerisinde SetAll]]> Kullandığım Form\PageFrame\Page içerinde; btnCan ile başlayan tüm CommandButton nesnelerini bir seferde Visible = .F. durumuna getirebilirmiyim.

Yardımlar için şimdiden teşekkür ediyorum.

]]> http://www.fox4um.com/user/30/ 2009-07-08T10:36:39Z http://www.fox4um.com/post/7752/#p7752