Desativar BtiBtn Pesquisar

Delphi

CRUD - Delphi

15/11/2021

Olá
Quero desativar botão pesquisar se edit pesquisar estiver vazio
Não deu certo esse
tenho que colocar no evento change do edit?
If (Edit_Pesquisar.text) <> '' then
begin
BitBtn1.Enabled := false;
end;
Upmilk

Upmilk

Curtidas 0

Respostas

Emerson Nascimento

Emerson Nascimento

15/11/2021

Coloque, no OnChange do edit:

BitBtn1.Enabled := (Edit_Pesquisar.Text > '');

GOSTEI 0
Ayrton Moraes

Ayrton Moraes

15/11/2021

Só dando uma implementada que nosso amigo Emerson respondeu... Pra não se preocupar com os vazios,
 BitBtn1.Enabled:= Trim(Edit_pesquisar.Text)>'; 
GOSTEI 0
Gxf

Gxf

15/11/2021

tente no evento onmouseenter do botao
GOSTEI 0
POSTAR