Fórum Como faço para aparecer um texto na StatusBar #196432
21/11/2003
0
Tenho uma StatusBar com três panels e uma dbgrid com três colunas (Código, Cidade, Cep).
Como é que eu faço para que no panel[1] apareça escrito o código selecionado, no panel[2] o nome da cidade, e no panel[3] o cep?
Como é que eu faço para que no panel[1] apareça escrito o código selecionado, no panel[2] o nome da cidade, e no panel[3] o cep?
Adriano Dantas
Curtir tópico
+ 0
Responder
Posts
21/11/2003
Vanius
Boa tarde, Fera.
vc pode fazer o seguinte:
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
StatusBar1.Panels[1].Text := IntToStr(Query1.FieldByName(´Codigo´).Value);
StatusBar1.Panels[2].Text := Query1.FieldByName(´Cidade´).Value;
StatusBar1.Panels[3].Text := Query1.FieldByName(´Cep´).Value;
end;
Se houver duvidas, manda e-mail.
Abraços,
Vanius Girodo
vaniusg@terra.com.br
ICQ 2794012
vc pode fazer o seguinte:
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
StatusBar1.Panels[1].Text := IntToStr(Query1.FieldByName(´Codigo´).Value);
StatusBar1.Panels[2].Text := Query1.FieldByName(´Cidade´).Value;
StatusBar1.Panels[3].Text := Query1.FieldByName(´Cep´).Value;
end;
Se houver duvidas, manda e-mail.
Abraços,
Vanius Girodo
vaniusg@terra.com.br
ICQ 2794012
Responder
Gostei + 0
21/11/2003
Adriano Dantas
Valeu mano, como estava usando um data module tive de fazer algumas alterações, mas deu certo!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)