DBEdit
Publicado por Micky (5 intervenciones) el 05/06/2007 15:15:54
Mi problema es q intento q si el contenido es 0 se me ponga en rojo pero me da error el clred y clwindows algien sabe porq? q ago mal?
procedure TFormPrincipal.DBEdit2Change(Sender: TObject);
begin
if(DBEdit2.Text = '0')then
DbEdit2.Color := clRed
else
DbEdit2.Color := clWindow;
end;
procedure TFormPrincipal.DBEdit2Change(Sender: TObject);
begin
if(DBEdit2.Text = '0')then
DbEdit2.Color := clRed
else
DbEdit2.Color := clWindow;
end;
Valora esta pregunta


0