Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi StringGrid - Zelle speichern bei Selektierung durch die Maus (https://www.delphipraxis.net/108357-stringgrid-zelle-speichern-bei-selektierung-durch-die-maus.html)

Andi1985 12. Feb 2008 09:51


StringGrid - Zelle speichern bei Selektierung durch die Maus
 
Hallo,

wenn ich eine Zelle im StringGrid selektiere, diese mit Zahlen fülle und mit ENTER bestätige verläst er den EditorMode und führt meinen Code aus.
Führe ich allerdings folgende Schritte aus, funktioniert das speichern der Zelle nicht.
Zelle im StringGrid selektieren, deise mit Zahlen füllen und einfach mit der Maus auf eine andere Zelle klicken. (das soll möglich sein)

Folgendermaßen sieht mein Code aus:
Delphi-Quellcode:
procedure TBSE_Form.StringGrid1SetEditText(Sender: TObject; ACol, ARow: Integer;
 const Value: string);

with Sender as TStringGrid do
begin
    if (EditorMode = false) then
    begin
    //Speicher Zelle
    end;
end;
Delphi-Quellcode:
procedure TBSE_Form.StringGrid1KeyPress(Sender: TObject; var Key: Char);
begin
  If Not (Key in ['0'..'9', '-', ',', #8, #13]) Then Begin
    Key:=#0;
  End;
end;
Das speichern der Zelle muss leider nur passieren wenn die Eingabe fertig ist (EditorMode = false) da ansonsten bei jeder Zahl komplexe berechnen passieren.
Wieso löst das selektieren einer neuen Zelle kein EditorMode = false aus ?

mfg,
Moggy

Andi1985 14. Feb 2008 10:43

Re: StringGrid - Zelle speichern bei Selektierung durch die
 
Ich konnte das Problem lösen indem ich bei sämmtlichen Events (StringGrid1Exit, StringGrid1KeyPress & StringGrid1SelectCell)
das speichern des Datensatzes aufrufen habe und nicht wie vorher bei dem Event: StringGrid1SetEditText.

mfg,
Moggy


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:11 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