[Spynosa]

prueba así

Código Delphi [-]
var
   frase:string
begin
   frase:='el numero total de registros es ' +inttostr(table1.recordcount)+' registros';
Application.MessageBox(pchar(frase),'AVISO',MB_OK);
end;