Fehler bei DBGrid OnTitleClick ?

[Elkos]

Hallo !

Ich habe eine Frage zum OnTitleClick Event einer DBGrid-Komponente.

Hier mein Code:

Delphi-Quellcode:

procedure TFrmMain.DBGrid1TitleClick(Column: TColumn);
begin

  showmessage(Column.FieldName);

end;

Mir ist aufgefallen, daß der FieldName nicht korrekt ausgegeben wird, sobald ich über die horizontale Scrolleiste weiter
nach rechts scrolle und dort dann auf einen Title klicke.
In diesem Fall wird die Scrollleiste erst wieder nach links gesetzt und dann dort die Spalte genommen, auf der der Cursor
stehen würde.

Ich habe dieses Problem jetzt zwar über

Delphi-Quellcode:

DBGrid1.MouseCoord(x,y)

und

Delphi-Quellcode:

DBGrid1.Fields[pt.x - 1].FieldName

gelöst, aber ich würde mal gerne wissen, ob das so richtig ist.

Hab ich dort vielleicht etwas falsch gemacht und OnTitleClick arbeitet richtig ?

Gruß
Elkos

[Elkos]

Moin !

Kann mir niemand sagen, was ich vielleicht falsch gemacht habe ?
Ich kann mir eigentlich nicht vorstellen, daß das OnTitleClick-Ereignis nicht korrekt funktioniert.

Gruß
Elkos

[rider]

Ich hab's mal mit BDS 2006 getestet:

Solange der Klick kein Scrolling auslöst, funktioniert alles richtig.
Für den Fall, dass der Klick zusätzlich ein horizontales Scrolling auslöst, ist das Ergebnis die Spalte, auf der der Mauspfeil nach dem Scrolling steht. Das ist nicht unbedingt die Spalte, auf die man geklickt hat.

Wenn deine Methode besser funktioniert, dann würde ich die einfach einsetzen.