Como exibir uma foto a partir do que esta na edit?
02/05/2022
0
procedure TForm1.Edit1Change(Sender: TObject); begin if edit1.Text = '*palavra*' then image1.Visible:= true else image1.Visible:= false;
mas nao deu certo :(
Paulo Oliveira
Post mais votado
02/05/2022
if Pos('palavra', edtFornecedor.Text) > 0 then
Image1.Visible := true
else
Image1.Visible := False;No exemplo acima, vai pesquisar o termo 'palavra' (substring) na string que está no Edit1 (se for o contrário que precisa, basta inverter a ordem dos parâmetros).
Natanael Ferreira
Mais Posts
02/05/2022
Natanael Ferreira
if Pos('palavra', edtFornecedor.Text) > 0 then
Image1.Visible := true
else
Image1.Visible := False;No exemplo acima, vai pesquisar o termo 'palavra' (substring) na string que está no Edit1 (se for o contrário que precisa, basta inverter a ordem dos parâmetros).
Corrigindo:
if Pos('palavra', Edit1.Text) > 0 then
Image1.Visible := true
else
Image1.Visible := False;03/05/2022
Paulo Oliveira
if Pos('palavra', edtFornecedor.Text) > 0 then
Image1.Visible := true
else
Image1.Visible := False;No exemplo acima, vai pesquisar o termo 'palavra' (substring) na string que está no Edit1 (se for o contrário que precisa, basta inverter a ordem dos parâmetros).
Corrigindo:
if Pos('palavra', Edit1.Text) > 0 then
Image1.Visible := true
else
Image1.Visible := False;amigo, funcionou para mim ate certo ponto, caso eu digite a palavra a foto realmente aparece, mas o que acontece e que eu tenho um outro form que envia um text para essa edit, e ele passa a palavra + algumas outras informacoes, tentei usar botando no comeco e no final da palavra "*", para que mesmo que tenha outras palavras junto ele reconhecesse, e nao funcionou, sera que estou alocando o codigo na procedure errada ? botei no onchange do edit.
03/05/2022
Emerson Nascimento
dê um exemplo real de como esse edit é preenchido. daí você terá a resposta de acordo com a tua necessidade.
Clique aqui para fazer login e interagir na Comunidade :)