Ver Mensaje Individual
  #5  
Antiguo 13-02-2007
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.557
Reputación: 25
egostar Va camino a la fama
O tambien puedes mostrar cualquier estado en un StatusBar.

Código Delphi [-]
procedure TDataModule2.DSCustomersStateChange(Sender: TObject);
begin
  FCustomers.StatusBar1.Panels[1].Text :=
  'State = ' + GetEnumName(TypeInfo(TDataSetState),
  Ord(IBCustomers.State));
end;

Saludos.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney
Responder Con Cita