Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #11  
Antiguo 16-07-2003
andres1569 andres1569 is offline
Miembro
 
Registrado: may 2003
Posts: 908
Poder: 24
andres1569 Va por buen camino
Hola:

Todo lo que se ha dicho está muy bien, pero entiendo, aunque SuperHopi no lo diga así en su pregunta, que el Edit debe cambiar cuando se cambia el registro activo, sea mediante un Click con el Mouse, o desde el teclado, o desde otro proceso.

Si no se trata de esto sino que debe ser sólo en el evento OnClick, entonces todo lo dicho me parece correcto, y no hace falta que sigáis leyendo este mensaje,

y si no, creo que se debe tomar en serio lo de usar un TDBEdit (al que pasemos el DataSource del Grid, o como dice jachguate mantener el mismo DataSource y cambiar sólo su DataSet cuando proceda). O bien, si se opta por un TEdit a secas, tratar de interceptar el evento del DataSet (OnScroll) o del DataSource (OnDataChange). El problema de usar el OnScroll es que éste suele estar en el DataModule y no es recomendable hacer nada desde allí que afecte a la visualización. Para estos casos, suelo colocar un TDataSource adrede en el Form, enlazado a aquel DataSet, y desde este DataSource controlo el cambio de registro:

Código:
procedure TForm1.DataSource1DataChange (Sender: TObject; Field: TField);
begin
  if Field = nil then // cambio de registro
    Edit1.Text := TDataSource(Sender).DataSet.FieldByName('Codigo').AsString;
end;
__________________
Guía de Estilo
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 03:14:17.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi