Path: news.cs.au.dk!not-for-mail
From: Karsten S. =?iso-8859-1?Q?J=F8rgensen?= <karsten@cs.au.dk>
Newsgroups: daimi.beta
Subject: Brug af onSelect i 'tab'
Date: Thu, 17 Aug 2000 13:56:39 +0200
Organization: DoublePfennig Inc.
Lines: 66
Message-ID: <399BD2F7.B44E19DA@cs.au.dk>
NNTP-Posting-Host: firebrand.cs.au.dk
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: gjallar.cs.au.dk 966513399 2020786 130.225.19.221 (17 Aug 2000 11:56:39 GMT)
X-Complaints-To: news@cs.au.dk
NNTP-Posting-Date: 17 Aug 2000 11:56:39 GMT
X-Mailer: Mozilla 4.7C-SGI [en] (X11; I; IRIX 6.5 IP32)
X-Accept-Language: Danish, da, en
Xref: news.cs.au.dk daimi.beta:10492

Hej

Hvordan 'fanger' man, at en bruger trykker på et faneblad? 
Vi kan se to metoder:

onBeforeSelectionChange i tabControl og onSelect i tab.

onBeforeSelectionChange kan vi ikke bruge, da vi gerne vil
vide hvilken tab der bliver trykket på.

onSelect, tja, den virker bare ikke. Følgende program
skriver aldrig noget:

ORIGIN '~beta/guienv/guienv';
INCLUDE '~beta/guienv/utils/tabControl'
-- program: Descriptor --
guienv 
(# 
   mitWin: @window
     (# open:: (#  do (400,400)->size; TabCtrl.open; #);
        
        TabCtrl: @TabControl
          (# open::
               (# do (400,400)->size;
                  (0,0)->position;
                  Tab1.open; 
                  Tab2.open; 
               #);
             
             Tab1: @tab
               (# 
                  open:: 
                    (# do 'Tab 1'->label; 
                       TabCanvas1.open;
                       TabCanvas1[]->page;
                    #);
                  onSelect:: (# do 'Tab 1 valgt'->putline;
#);
                  TabCanvas1: @canvas
               #);
             
             Tab2: @tab
               (# open:: 
                    (# do 'Tab 2'->label;
                       TabCanvas2.open;
                       TabCanvas2[]->page;
                    #);
                  onSelect:: (# do 'Tab 2 valgt'->putline;
#);
                  TabCanvas2: @canvas
               #);
          #);        
     #);
   do mitWin.open;
#)






--

Yesterday I went for a walk in the park and
I felt a breeze while eating a piece of cake. 
It was the easiest day of my life.