Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Lazarus (IDE) (https://www.delphipraxis.net/81-lazarus-ide/)
-   -   TStringGrid auf WinCE reagiert nicht auf Clicks (https://www.delphipraxis.net/180737-tstringgrid-auf-wince-reagiert-nicht-auf-clicks.html)

Codehunter 13. Jun 2014 10:51


TStringGrid auf WinCE reagiert nicht auf Clicks
 
Hallo,

aus einem mir unerklärlichen Grund reagieren StringGrids nicht auf Klicks wenn man für WinCE kompiliert. Testszenario ist ganz simpel: Leere Form, StringGrid drauf, für CE kompilieren und dort starten. Die Selection verändert sich nicht wenn man drauf klickt, nur das FocusRect wird bei der linken oberen Zelle neu gezeichnet. Wenn man mit den Hardware-Cursortasten (sofern vorhanden) navigiert, dann funktioniert das Grid aber.

Kennt jemand das Problem?

Grüße
Cody

EDIT: Ich habe zwar die Ursache nicht wirklich gefunden (das Grid scheint unter CE aus irgendwelchen Gründen kein OnMouseClick zu verarbeiten), aber ich habe mich mit folgendem Trick drumherum gemogelt:
Delphi-Quellcode:
procedure TForm1.StringGrid1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  Col, Row: Integer;
begin
  TStringGrid(Sender).MouseToCell(X, Y, Col, Row);
  TStringGrid(Sender).Col:= Col;
  TStringGrid(Sender).Row:= Row;
end;

JamesTKirk 14. Jun 2014 09:38

AW: TStringGrid auf WinCE reagiert nicht auf Clicks
 
Ich hatte das Problem vor einigen Jahren bei einem TDrawGrid (beide leiten von TCustomGrid ab). Es ist jedoch nur der allererste Klick der nicht funktioniert (kannst du das mal bitte verifizieren?), da durch die relativ sporadischen OnMouseMove Ereignisse das interne Statusmanagement des Grids nicht richtig initialisiert wird. Ich hab das ganze hier als Bug gemeldet und hatte auch zwei Patches im Angebot. Der erste war definitiv Quick & Dirty, aber der zweite ist meiner Meinung nach brauchbar, bisher wurde er jedoch nicht übernommen...

Gruß,
Sven


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:59 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz