Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   FreePascal (https://www.delphipraxis.net/74-freepascal/)
-   -   dbgrid.selectedindex und ähnliche funktionieren nicht (https://www.delphipraxis.net/203262-dbgrid-selectedindex-und-aehnliche-funktionieren-nicht.html)

ManniSt 29. Jan 2020 14:46

dbgrid.selectedindex und ähnliche funktionieren nicht
 
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 29. Jan 2020 16:26

AW: dbgrid.selectedindex und ähnliche funktionieren nicht
 
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 29. Jan 2020 17:16

AW: dbgrid.selectedindex und ähnliche funktionieren nicht
 
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 29. Jan 2020 17:27

AW: dbgrid.selectedindex und ähnliche funktionieren nicht
 
könnte es sein, daß der index 3 ist und nicht 4 ?

Gruß
K-H

ManniSt 29. Jan 2020 18:13

AW: dbgrid.selectedindex und ähnliche funktionieren nicht
 
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 29. Jan 2020 19:52

AW: dbgrid.selectedindex und ähnliche funktionieren nicht
 
Hallo,
TThread.ForceQueue hieß es

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

himitsu 29. Jan 2020 22:33

AW: dbgrid.selectedindex und ähnliche funktionieren nicht
 
Das Delphi-Referenz durchsuchenTThread.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 Delphi-Referenz durchsuchenTThread.ForceQueue erfunden. :stupid:
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.


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:47 Uhr.

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