Un ejemplo de como lo haces tu en vb ... pero en delphi:
Código Delphi
[-]nombredatamodule.nombretabla.Active := true;
nombredatamodule.nombretabla.Append;
nombredatamodule.nombretabla.fieldbyname('idreceptor').AsString := nombre_usuario;
nombredatamodule.nombretabla.fieldbyname('idremitente').AsString := copy(texto_rec,0,posicion-1);
nombredatamodule.nombretabla.fieldbyname('texto').AsString := copy(texto_rec,posicion+2,length(texto_rec));
nombredatamodule.nombretabla.fieldbyname('fechahora').AsString := DateTimeToStr(now);
nombredatamodule.nombretabla.Post;
nombredatamodule.nombretabla.Active := false;
Un saludo.