Forum: Lazarus (IDE)
by Oniessen,
9. Mär 2018
Hallo Delphi.Narium!
Ja, das ist offensichtlich das Verhalten.
Ich hatte es auch dem Namen nach anders Verstanden, nämlich, das es genau vor dem Abschicken aufgerufen wird.
Sozusagen als letzter Punkt für eine Prüfung..
Danke für Die Antwort und angenehmes Wochenende!
Forum: Lazarus (IDE)
by Oniessen,
7. Mär 2018
Hallo!
Hab den Fehler gefunden!
Vielen Dank für eure Hilfe!
Das Problem war, mit:
CellText:= (Sender as TDBGrid).SelectedColumn.Field.AsString;
Bekam ich immer nur den "alten", im Grid gespeicherten Wert/String zurück.
Damit funktioniert das natürlich nicht.
Forum: Lazarus (IDE)
by Oniessen,
6. Mär 2018
Hallo Delphi.Narium
zu deinen Fragen:
mit
if TStringCellEditor(MyGrid.Editor).SelLength > 0 then
TStringCellEditor(MyGrid.Editor).SelText:= '';
Unterbinde ich das einfügen meine ich mich zu erinnern-
Forum: Lazarus (IDE)
by Oniessen,
6. Mär 2018
Hallo!
Ich habe jetzt eine "halbe Lösung"
Folgendes funktioniert schon mal für das minus und alle anderen Zeichen:
procedure TMyForm.MyDBGridKeyPress(Sender: TObject; var Key: char);
var
CellText:Widestring;
Forum: Lazarus (IDE)
by Oniessen,
2. Mär 2018
Hallo Delphi.Narium
Vielen Dank für deine Antworten und Anregungen!
Die Möglichkeit den Datentyp abzufragen ist auch ein sehr guter Tipp, denn ich habe neben Flots auch Strings und Boolean in der Tabelle. Dann kann ich alles an einer Stelle machen.
Leider hat mein TDBGrid unter Lazarus nur eine ColumnS Eigenschaft und da gibts leider kein .Field.DataType :-(
Als Stelle hatte ich...
Forum: Lazarus (IDE)
by Oniessen,
1. Mär 2018
Hallo zusammen!
Ich habe nun ein Problem, welches möglicherweise einige haben, nämlich , das es möglich ist in eine numerische Zelle eines TDBGrid folgenden Unsinn zu schreiben:
'-56-5,33,6'
Also das minus und Komma(und punkt) mehrfach einzutippen.
(Buchstaben und sonstige Zeichen werden schon gefiltert, aber die Mehrfacheingabe halt nicht )
Dann kracht es logischerweise bei der...