[marcoszorrilla]

Básicamente a parte de lo que te ha explicado Caral, lo que tienes que hacer es capturar el evento OnChange del Ttable como en este ejemplo:

Código Delphi [-]
procedure TDmMch.LinTickCodigoChange(Sender: TField);
begin
  if DmMch.Pla.FindKey([DmMCh.LinTickCodigo.Value])= true then
  begin
  DmMch.LinTickDescripcion.Value:=DmMch.PlaDescripcion.Value;
  DmMch.LinTickPrecio.Value:=DmMch.PlaPrecio.Value;
  DmMch.LinTickTotal.Value:= DmMch.LinTickPrecio.Value* DmMch.LinTickCantidad.Value;
  end
  else
  Application.MessageBox('Plato o producto no encontrado','Atención',mb_Ok+mb_IconQuestion);
end;

Un Saludo.