🚀 go-pugleaf

W dniu piątek, 5 października 2018 19:32:11 UTC+2 użytkownik Krzysztof Szyszka napisał:
> > 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/

1. Wiesz jak to jest jak się kod przenosi, szukasz pierwszej pozycji w wynikach wyszukiwania spełniającej kryteria i masz https://www.board4all.biz/threads/delphi-10-2-tokyo-casting-to-tbookmark.659254/ 
2. Czyli jednak trzeba te źródła DBGrids.pas  modyfikować i mam rozumieć ponownie bpl'a skompilować (kto to mówił w https://groups.google.com/forum/#!topic/pl.comp.lang.delphi/RmOjnautaWQ że błędów nie znajduje :-), immo ?).
3. No masz np. tutaj  https://groups.google.com/forum/#!msg/borland.public.delphi.students/lfKaVKc194c/zlgXaNOJE3oJ 

Dzięki za odpowiedź :-)