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;
var frase:string begin frase:='el numero total de registros es ' +inttostr(table1.recordcount)+' registros'; Application.MessageBox(pchar(frase),'AVISO',MB_OK); end;