Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi TDBText (https://www.delphipraxis.net/117390-tdbtext.html)

jangbu 17. Jul 2008 10:06


TDBText
 
Hallo,

weiß jemand warum es für TDBText kein OnChange Ereignis gibt wie für TDBEdit? Ich muss in Abhängigkeit vom Wert die Farbe ändern, also

OnChange
if DBText1 > 0 then DBText1.Font.Colour := clRed;

jangbu

mkinzler 17. Jul 2008 10:13

Re: TDBText
 
Mach das doch in der Datenmenge

RavenIV 17. Jul 2008 10:38

Re: TDBText
 
Zitat:

Zitat von jangbu
weiß jemand warum es für TDBText kein OnChange Ereignis gibt wie für TDBEdit? Ich muss in Abhängigkeit vom Wert die Farbe ändern, also

OnChange
if DBText1 > 0 then DBText1.Font.Colour := clRed;

Weil sich der Inhalt vom TDBText abhängig vom angehängten Dataset ändert.
Das Dataset (Query oder sonst was) hat bestimmt ein OnChange.

Und mit diesem Codeausschnitt wird es eh nicht gehen...

mkinzler 17. Jul 2008 11:10

Re: TDBText
 
Ich würde das im .AfterScroll des DataSets machen

alzaimar 17. Jul 2008 13:43

Re: TDBText
 
Und ich im OnDataChange (Field=Nil) der Datasource. Das TDataSource gehört auf das Formular, wohingehend das Dataset i.A. nicht auf das Formular gehört, sondern in ein Datenmodul und das Datenmodul nix vom Formulat wissen soll.


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:33 Uhr.

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