Hola
Lo que dice el Maestro Roman, pero a lo tuyo.
Código Delphi
[-]
if DBText8.Caption = UpperCase(Edit1.Text) then
begin
DBText8.Font.Color:= (clLime);
DBText8.Font.Style:= [fsBold];
end;
Otro:
Código Delphi
[-]
if DBText8.Caption = UpperCase(Edit1.Text) then
begin
With DBText8 do
begin
Font.Color:= (clLime);
Font.Style:= [fsBold];
end;
end;
Saludos
PD: Me alegra mucho verte mas activo Maestro y amigo Roman.