Article View: pl.comp.lang.delphi
Article #346770Re: Delphi 10.2 - DBGrid brak reakcji na prawy klawisz myszy jeśli są rekordy
From: Krzysztof Szyszka
Date: Fri, 05 Oct 2018 17:31
Date: Fri, 05 Oct 2018 17:31
31 lines
2705 bytes
2705 bytes
> Skończyłem właśnie migrować te parę milionów linii kodu z Delphi 2010 do > 10.2. Generalnie przez tydzień to się dało zrobić, (trochę komponentów innych firm, swoich i > niespodzianek typu GotoBookmark(TArray<Byte>(pointer(DBGridView.SelectedRows.Items[i]) > i zabawy z Unitami, ale kod jest już przeniesiony i działa). Z tym GotoBookmark to pojechałeś na maksa :-) Wystarczy proste: DataSet.GotoBookmark(DBGridView.SelectedRows[i]) albo nawet DataSet.Bookmark := DBGridView.SelectedRows[i]) > Być może jestem już zmęczony, ale pozostała jeszcze jedna zagwozdka (pamiętam ten problem chyba w > D7 był, ale w D2010 to działało dobrze). Potrzebuje zdarzenie OnMouseDown i detekcję prawego > klawisza myszy w DBGrid, działa tylko jeśli mysz zostanie użyta na obszarze DBGrid bez rekordów. > Ktoś to już przerabiał ? Z tego, co widzę w kodzie DBGrida dla Delphi 10.2 Tokyo, to nic się nie zmieniło od czasów Delphi 6 w kwestii detekcji prawego klawisza myszy w zdarzeniu OnMouseDown. Nadal nie jest wywoływane. > Znalazłem coś takiego (wykopalisko z 2002), ale chyba nie muszę ruszać źródeł w 10.2 ? Z tego, co widzę w kodzie, to nadal musisz, ale nie na zasadzie kopiuj i wklej, tylko przez wprowadzenie identycznej poprawki do metody TCustomDBGrid.MouseDown dla Delphi 10.2, która nieco się zmieniła, ale jej końcowy fragment jest identyczny z tym dla Delphi 6. Z ciekawości napisz mi, gdzie to wygrzebałeś :-) -- pozdrowienia Krzysztof Szyszka, X-Files Software Developer of X-DBGrid Component Embarcadero Technology Partner http://www.x-files.pl/
Technical Details
Message-ID:
<pp876r$6sb$1@node1.news.atman.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!.POSTED!not-for-mailReferences:
<6e524648-29f0-4af2-bdbe-9fd914a30fa3@googlegroups.com>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!.POSTED!not-for-mail From: "Krzysztof Szyszka" <nomail@gazeta.pl> Newsgroups: pl.comp.lang.delphi Subject: Re: Delphi 10.2 - DBGrid brak reakcji na prawy klawisz myszy jeśli są rekordy Date: Fri, 5 Oct 2018 19:31:55 +0200 Organization: ATMAN - ATM S.A. Lines: 32 Message-ID: <pp876r$6sb$1@node1.news.atman.pl> References: <6e524648-29f0-4af2-bdbe-9fd914a30fa3@googlegroups.com> NNTP-Posting-Host: 89-77-104-79.dynamic.chello.pl Mime-Version: 1.0 X-Trace: node1.news.atman.pl 1538760731 7051 89.77.104.79 (5 Oct 2018 17:32:11 GMT) X-Complaints-To: usenet@atman.pl NNTP-Posting-Date: Fri, 5 Oct 2018 17:32:11 +0000 (UTC) In-Reply-To: <6e524648-29f0-4af2-bdbe-9fd914a30fa3@googlegroups.com> X-Priority: 3 X-MSMail-Priority: Normal Importance: Normal X-Newsreader: Microsoft Windows Live Mail 16.4.3528.331 X-MimeOLE: Produced By Microsoft MimeOLE V16.4.3528.331 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit