Article View: pl.comp.lang.pascal
Article #92995Re: [Lazarus] Klasa dziedzicząca po TCustomStringGrid
From: Terrmit
Date: Tue, 20 Apr 2010 19:38
Date: Tue, 20 Apr 2010 19:38
40 lines
2657 bytes
2657 bytes
W dniu 20.04.2010 08:47, Łukasz 'Maly' Ostrowski pisze: > On Tue, 20 Apr 2010 00:41:35 +0200, Terrmit wrote: >> Czy ktoś mógłby mi poradzić jak to zrobić (i czy w ogóle da >> się to zrobić)? >> >> Sławek >> >> być może pomocne linki: >> http://svn.freepascal.org/svn/lazarus/trunk/lcl/grids.pas >> http://lazarus-ccr.sourceforge.net/docs/lcl/grids/tcustomstringgrid.html >> http://wiki.lazarus.freepascal.org/Grids_Reference_Page > > Można pokombinować w okolicach samego eventa > OnEditButtonClicked - ustawić mu z góry w ctorze > własny event handler który w zależności od zawartości > wywoła OnIntEditButtonClicked/OnStringEditButtonClicked > które dopiszesz, czy też w zależności od tego czy > *zawsze* potrzebujesz takie same edit dialogi, po prostu > pokaże odpowiednie modal formy. > > Odcinasz sobie w ten sposób z oczywistych względów > możliwość użycia OnEditButtonClicked w innych celach. > Chyba w OOP nie ma multicast delegates. > Prawdę mówiąc już myślałem o czymś takim. Spróbuję to zaimplementować. Raczej nie będę potrzebował tego eventa poza klasą i oby nie okazało się, że się mylę :) Na razie jednak jego obsługa jest poza klasą, bo muszę mieć działający program do końca kwietnia. Później będę sobie poprawiał co się da jak sprawy nie będą już takie pilne. Gdyby komuś miał jeszcze jakiś pomysł, do bardzo bym prosił o podzielenie się nim :) Zaznaczę jeszcze, że modyfikowanie oryginalnego grids.pas raczej w grę nie wchodzi chyba, że taką modyfikację można by było zaproponować do wdrożenia programistom Lazarusa. Dzięki, Sławek
Technical Details
Message-ID:
<hql001$1oem$1@news.mm.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.task.gda.pl!news.mm.pl!not-for-mailReferences:
<hqimar$2mct$1@news.mm.pl> <gzbqyg47z8mz.1cw1eop9xnav5.dlg@40tude.net>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.task.gda.pl!news.mm.pl!not-for-mail From: Terrmit <terrmitv@poczta.onet.pl> Newsgroups: pl.comp.lang.pascal Subject: Re: [Lazarus] Klasa dziedzicząca po TCustomStringGrid Date: Tue, 20 Apr 2010 21:38:45 +0200 Organization: Multimedia Polska SA Lines: 40 Message-ID: <hql001$1oem$1@news.mm.pl> References: <hqimar$2mct$1@news.mm.pl> <gzbqyg47z8mz.1cw1eop9xnav5.dlg@40tude.net> NNTP-Posting-Host: host-89-231-112-128.warszawa.mm.pl Mime-Version: 1.0 X-Trace: news.mm.pl 1271792449 57814 89.231.112.128 (20 Apr 2010 19:40:49 GMT) X-Complaints-To: abuse@multimedia.pl NNTP-Posting-Date: Tue, 20 Apr 2010 19:40:49 +0000 (UTC) User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.1.9) Gecko/20100330 Fedora/3.0.4-1.fc12 Lightning/1.0b2pre Thunderbird/3.0.4 In-Reply-To: <gzbqyg47z8mz.1cw1eop9xnav5.dlg@40tude.net> Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit