Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 29-08-2003
Salomon Salomon is offline
Miembro
 
Registrado: ago 2003
Ubicación: Galapagar, Madrid (España)
Posts: 25
Poder: 0
Salomon Va por buen camino
Llamar al Formulario padre

Buenaaaaaaaaaaaasssss!!!

Que tal?, tengo una duda, que creo que si se puede hacer pero no se ni como ni donde, a ver si me explico.

Tengo un formulario con un DBGrid, que tira de una tabla, en la tabla tengo varios campos que hacen un monton de cuentas, de ahí que lo haya puesto en el propio formulario, para no llenar de codigo el modulo de datos, bueno continuo, lo dicho, tengo un formulario con un DBGrid, y una TADOQuery de donde tira el Grid, para insertar datos uso otro formulario, y claro hasta que no cierro este ultimo, no puedo actualizar el grid, y mi pregunta es la siguiente;

Puedo actualizar el grid de un formulario desde otro que ha sido llamado por este, es decir, puedo actualizar el Grid del formulario A, desde el formulario B, B es un formulario creado desde A y llamado con un ShowModal.

Muchas gracias anticipadas, y espero haberme explicado con claridad.

SALO
__________________
De donde sacara las pelas la luna para salir todas las noches!!!

P.D. La mala gente gobierna por que la buena gente no vota.

En españa eso ya no pasa....
Responder Con Cita
  #2  
Antiguo 29-08-2003
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 27
delphi.com.ar Va por buen camino
Si tu pregunta es si puedes crear comunicación entre diferentes objetos, la respuesta es si!... La forma de implementar esta comunicación puede ser de muchas formas, si tu cuando creas un formulario lo asignas a la variable que Delphi te crea por defecto en la interface de las units que contienen los formulario, solo tienes que acceder a esta para llamar a algún método y/o cambiar alguna propiedad. Otra posibilidad es cuando creas el formulario Modal, el owner sea el formulario "padre", solo tendrías que hacer un cast del owner para acceder al padre... De todos modos, como lo que creas es un formulario Modal, puedes depender del resultado del ShowModal para desde el mismo código del formulario padre hacer o no los cambios que tu desees.
Espero no haber sido demasiado explícito, no dudes en consultar..

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
  #3  
Antiguo 29-08-2003
Avatar de Paoti
Paoti Paoti is offline
Miembro
 
Registrado: may 2003
Ubicación: Monterrey. N.L., México
Posts: 612
Poder: 21
Paoti Va por buen camino
Hola Delphi.com.ar


y que pasa cuando los formulario se crean en timpo de ejecucion, es decir, el formulario a, lo creo de la siguiente forma:

with Ta.create(self) do show;


y dentro del formulario a creo el formulario b de la siguiente forma:

with ta(.create(self) do show;


como hacer para poder acceder a los valores del formulario a, desde b, si no conozco la variable como se llama a, y para hacer más loco el asunto (para este pobre entendor), estos dormulario se crean las veces que sean necesarios. como solucionar este problema, no entendi lo del cast del owner.




Muchas gracias.



Paoti Rios.
Responder Con Cita
  #4  
Antiguo 29-08-2003
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 27
delphi.com.ar Va por buen camino
Si mal no te entiendo, puedes utilizar lo que he comentado anteriormente de utilizar el Owner del form:

Código:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Edit1: TEdit;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
  public
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
  with TForm1.Create(Self) do
  try
    ShowModal;
  finally
    Free;
  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  if Owner is TForm Then
    TForm(Owner).Caption := Edit1.Text;
end;

end.
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
Respuesta



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 11:53:59.


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