OK!!!
Muchas gracias asi mi codigo que da mas claro:
Código:
if DBText8.Caption=UpperCase(Edit1.Text) then
begin
DBText5.DataField:='ip_A';
DBText8.Font.Color:=(clLime);
DBText8.Font.Style:=DBText8.Font.Style+[fsBold];
end
un saludo !!!
Corrijo mejor asi:
Cita:
if DBText8.Caption=UpperCase(Edit1.Text) then
begin
DBText5.DataField:='ip_A';
DBText8.Font.Color:=(clLime);
DBText8.Font.Style:= [fsBold];
end
|