[mjjj]

Me falto algo en la llamada...

Código Delphi [-]
begin
if aviso('Cargando...', true) then
try
// procedimiento expuesto por servidor DataSnap, el cual consulta a la BD.
finally
aviso('', false)
end;
end;

La idea es mostrar el panel, mientras se está hace la consulta sql