Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 14-09-2010
Avatar de JoseAntonio
JoseAntonio JoseAntonio is offline
Miembro
 
Registrado: abr 2006
Ubicación: Lima - Ciudad de los Reyes.
Posts: 87
Poder: 21
JoseAntonio Va por buen camino
Cool

Yo lo hago utilizando una funcion de clase, mas o menos el codigo es asi...

Código Delphi [-]
Unit FormSelLote
...
class function TfrmSelLote.GetLote(AClient, ADoc: Integer): integer;
var
  ...
  AFrmSelLote: TfrmSelLote;
begin
   ....
  try
    AfrmSelLote := TFrmSelLote.Create(Application);    
    if AfrmSelLote.ShowModal = mrOk then
      result := AfrmSelLote.fLote
    else
      result := -1;
  finally
    AfrmSelLote.Free;
  end;
end;

// la llamada desde otro modulo seria asi

unit OtraUnidad
.....
AselLote := TfrmSelLote.getLote(ACliente, ADoc);

espero que sirva sl2
__________________
nuestro carácter está reflejado en cada línea de código que escribimos.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Intraweb Retornar Pagina Anterior ggram2 Internet 0 24-03-2009 01:50:31
Cómo hacer para retornar valores de una Unit a otra karo Varios 6 14-03-2009 20:57:28
Retornar o no retornar desde un script principal dec PHP 6 24-03-2008 23:41:12
retornar un valor Proc.Almacenado cacu OOP 1 05-03-2008 22:39:16
Como retornar un valor en Delphi Stanley Varios 8 29-10-2007 04:04:03


La franja horaria es GMT +2. Ahora son las 15:20:50.


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