dbgrid.selectedindex und ähnliche funktionieren nicht

[ManniSt]

Ich habe ein DBGrid mit 4 Spalten. Es funktiuoniert leider nicht, den Fokus auf eine bestimmte Spalte zu setzen. D.h. ich möchte nach dem Editieren der 1. Spalte auf die 4. Spalte springen. Der Fokus springt aber, nach OnEditingDone und/oder OnEnter immer auf das nächste Feld.

MyDB.Edit;
MXYZ := MyDB.Fields.FieldByName('Feld1').Value;
MyDB.Post; // Bis hierher alles ok und dann weder entweder/oder funktionieren nicht

entweder:
MyDBGrid.SelectedIndex := 4; // Zu Spalte 4 springen
MyDBGrid.SetFocus;

oder:
MyDBGrid.SelectedField :=MyDB.FieldByName('Feld4');
MyDBGrid.SetFocus;

?????????

Gruß

Manfred

p.s.
Nach ca. 1-stündigem Suchen in den Foren und Tutorials gab es keine Antwort

[himitsu]

Nja, wenn in den verfügbaren Events das Umsetzen nicht möglich ist, weil die Komponente anschießend das nochmal überschreibt, dann bleibt nur verzögern übrig.

Delphi-Quellcode:

procedure TForm1MyDBGrid.MyDBGridIrgendwasEvent(Sender: TObject);
begin
  ...
  TThread.ForceQueue(nil, procedure
    begin
      if MyDBGrid.Focused then  // nichts machen, falls der Fokus inzwischen sonstwo ist
        MyDBGrid.SelectedField := ...;
    end);
end;

Hoffe es hilft hierbei.

[ManniSt]

Jetzt finde ich nicht die Unit, die ForceQue enthält: identifier idents no member ForceQueue

TThread.ForceQueue(nil, procedure
begin
if MyDBGrid.Focused then // nichts machen, falls der Fokus inzwischen sonstwo ist
MyDBGrid.SelectedField := MyDBF.FieldByName('Feld4');
end);

Gruß

Manfred

p.s.
Danke für die Info

[p80286]

könnte es sein, daß der index 3 ist und nicht 4 ?

Gruß
K-H

[ManniSt]

Es ist egal, welchen Index ich angebe. Alles von 2-4 geht nicht.

Jetzt suche ich noch die Unit für ForceQueue, die er icht findet.

Manfred

[hoika]

Hallo,
TThread.ForceQueue hieß es

-> http://docwiki.embarcadero.com/Libra...lasses.TThread

[himitsu]

Das TThread.Queue kann man im Hauptthread vergessen, denn dort wird nichts in den Queue geschoben, sondern sofort ausgeführt.
Anstatt das Verhalten zu reparieren, wurde die neue Funktion TThread.ForceQueue erfunden.
http://docwiki.embarcadero.com/Libra...ead.ForceQueue , weil der HilfeIndex in der DP veraltet ist.

Ansonten PostMessage, TTimer oder was es sonst noch gibt, um etwas später auszuführen.