Topic: Currency editbox text color
Hi All,
I'm trying to get currency editbox text displayed in a specific color when contains minus and plus values
i.e if minus textbox would display the value within as color red, if plus value as color blue.
I couldn't make the following work. Any help please?
procedure Form1_edRunTotalStg1_OnChange (Sender: TObject);
begin
if Form1.edRunTotalStg1.Value < 0 then Form1.edRunTotalStg1.textcolor := clred else Form1.edRunTotalStg1.textcolor := clblue;
end;
God... please help me become the person my dog thinks I am.