TStringgrid und ONSelection

[Lorca]

Hallo zusammen,

mit den Ereignissen "OnSelection, ONAfterSelection und ONBeforeSelection" habe ich einige Herausforderungen.
Greife ich diese Ereignisse ab (bzw. ich benötige NUR OnSelection ) wird bzw. werden diese Events bei jedem OnMouseMove ausgeführt.


PROCEDURE Tfrm_Test.Sgrd_memberselection(Sender : Tobject; Acol,Arow : Integer);
BEGIN

ShowMessage( 'Selektion' );

END;

Jedesmal wenn ich den TEST-Popup weg Klicke, springt das Programm sofort wieder in dieses Ereignis.
Wenn man nun in diesem Ereignis einen DB Zugriff startet kann dies u. U. sehr zeitaufwendig werden.

Was mache ich hier falsch bzw. was muss ich beachten?
Ich suche mir einen "Heißen" zu diesem Thema und finde nichts.

Kann jemand weiterhelfen?

Vielen Dank
Lorca

[fliegermichl]

Das kann ich nicht nachvollziehen.
OnSelection wird bei mir nur einmal gefeuert wenn ich in eine Zelle klicke.

[Winni]

Hi!

ShowMessage ist denkbar ungeeignet um Mouse-Events zu tracen.

Man kann sich behelfen mit einer globalen Variablen und einem Label:

Code: Alles auswählen

implementation
var Global_I : Integer = 0;

und dann bei Onselection ausgeben:

Code: Alles auswählen

Inc (Global_I);
label1.Caption := 'Onselection '+IntToStr(Global_I);

Winni

[aro]

Hallo,

jedes mal, wenn Du TEST-Popup weg Klickst, erhält dein Stringgrid wieder den Focus. Damit werden jede Menge Funktionen in Deinem Formular und vor allem den Vorgängerobjekten gestartet und damit Ereignisse verschickt.

[Lorca]

Hallo alle, Hallo Winni,

erst einmal herzlichen Dank für eure Mühen und Antworten.
Eine echt Coole Idee, Winni danke dafür.
Da hätte ich selber drauf kommen müssen.
Ich versuche es einmal.

Ganz lieben Dank an alle

Lorca

Hi!

ShowMessage ist denkbar ungeeignet um Mouse-Events zu tracen.

Man kann sich behelfen mit einer globalen Variablen und einem Label:

Code: Alles auswählen

implementation
var Global_I : Integer = 0;

und dann bei Onselection ausgeben:

Code: Alles auswählen

Inc (Global_I);
label1.Caption := 'Onselection '+IntToStr(Global_I);

Winni