Ver Mensaje Individual
  #2  
Antiguo 14-05-2006
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Reputación: 25
Delphius Va camino a la fama
Espero que te sirva

Bienvenido a clubdelphi.
Los moderadores siempre recomiendan que los miembros lean la guia de estilo. Yo no soy moderador... pero igual te la recomiendo...

Bueno, como dices que recien te estas iniciando en Delphi, te recomiendo también que leas "La Cara Oculta de Delphi 4". Buscala en google... que la vas a hallar muy rápido. Es un buen documento (en pdf) que te va a servir para introducirte en la mayoría de los temas.

A ver... dejame ver si entiendo: ¿tu quieres que desde la interfaz se envien unos datos hacia una clase?
Si es así, yo declararía en un módulo (unidad) aparte una clase:
Código Delphi [-]
Unit NombreUnidad;
 
type
  TMiclase = TClass;
    public
    function suma(a,b:integer): integer;
  end;

y su declaración:
Código Delphi [-]
function MiClase.suma(a,b:integer): integer;
  begin
   result := a + b;
  end;

Después, en la aplicación que corresponde haces uso de dicha unidad:
Código Delphi [-]
uses NombreUnidad;

Y en el cuerpo del clik del boton pones algo como:
Código Delphi [-]
var InstanciaClase: TMiClase;
     nro1,nro2:integer;
begin
  nro1 := IntToStr(Edit1.text);
  nro2 := IntToStr(Edit2.text);
  InstanciaClase := TMiClase.Create;
  showMessage(IntToStr(InstanciaClase.suma(nro1;nro2)));

El código se puede refinar... pero como para que se entienda más o menos bien... lo declaré así.

Saludos,
__________________
Delphius
[Guia de estilo][Buscar]
Responder Con Cita