Foros Club Delphi - Ver Mensaje Individual

[eduarcol] · #2 28-07-2007

Amigo Elite ya llevas varios mensajes posteando codigo sin utilizar los tag's por favor ayudanos a entenderlo

con respecto a tu duda

Código Delphi [-]begin
   try
      Depto.Insert;
      Depto.FieldValues['clave']:=Edit1.Text;
      Depto.FieldValues['nombre']:=Edit2.Text;
      Depto.FieldValues['descripcion']:=Edit3.Text;
      Depto.FieldValues['jefe']:=Edit4.Text;
      Depto.Post;
      Edit1.Clear;
      Edit2.Clear;
      Edit3.Clear;
      Edit4.Clear;
      ShowMessage('Exito');
   except
      ShowMessage('Error');
   end;
end;