Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 09-03-2014
jularaXD jularaXD is offline
Miembro
NULL
 
Registrado: may 2013
Posts: 18
Poder: 0
jularaXD Va por buen camino
Estructuras de parametros en delphi

Buenas gente

Mi idea es la siguiente; quiero hacer una estructura de parametros, que incluya variables, procedimientos, funciones etc... Pero por mucho que busco y pruebo cosas no consigo dar con la solucion.

He intentado hacerlo un record, pero no se muy bien donde declararlo y no consigo que me funcione.
Esta es mi idea por si no me he explicado con claridad:
Código Delphi [-]
Type
  TOptions = record
    ComAuto         : Boolean;
    ComPort         : Integer;
    Language        : String[10];
    procedure SaveOptions();
      begin
        (codigo)
      end;
End;


procedure TForm1.Button1Click(Sender: TObject);
begin
  TOptions.Language := 'Español';
  TOptions.SaveOptions();
end;

Alguna ayuda??

Saludos y gracias de antemano.
Responder Con Cita
  #2  
Antiguo 09-03-2014
Avatar de ElKurgan
[ElKurgan] ElKurgan is offline
Miembro Premium
 
Registrado: nov 2005
Posts: 1.235
Poder: 20
ElKurgan Va camino a la fama
¿Y porque no lo haces con clases?
Una opinión, vamos:

Código Delphi [-]
Type
  TOptions = class
  public
    ComAuto : Boolean;
    ComPort : Integer;
    Language : String[10];
    procedure SaveOptions();
End;

procedure TOptions.SaveOptions();
begin
  (codigo)
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  Opciones: TOptions;
begin
  Opciones := TOptions.Create;
  try
    Opciones.Language := 'Español';
    Opciones.SaveOptions();
  finally
    Opciones.Free;
  end;
end;
Responder Con Cita
  #3  
Antiguo 10-03-2014
jularaXD jularaXD is offline
Miembro
NULL
 
Registrado: may 2013
Posts: 18
Poder: 0
jularaXD Va por buen camino
Cita:
Empezado por ElKurgan Ver Mensaje
¿Y porque no lo haces con clases?
Una opinión, vamos:

Código Delphi [-]
Type
  TOptions = class
  public
    ComAuto : Boolean;
    ComPort : Integer;
    Language : String[10];
    procedure SaveOptions();
End;

procedure TOptions.SaveOptions();
begin
  (codigo)
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  Opciones: TOptions;
begin
  Opciones := TOptions.Create;
  try
    Opciones.Language := 'Español';
    Opciones.SaveOptions();
  finally
    Opciones.Free;
  end;
end;

Porque no sabia que eran xD. Lo de record lo puse porque era lo unico que encontre por internet.

He probado el codigo y va de lujo, pero habría alguna manera para poder acceder directamente sin tener que declarar en cada procedimiento la variable opciones, asignarle la clase y crearla?
Responder Con Cita
  #4  
Antiguo 10-03-2014
jularaXD jularaXD is offline
Miembro
NULL
 
Registrado: may 2013
Posts: 18
Poder: 0
jularaXD Va por buen camino
Vale, ya lo he conseguido
Muchas gracias por la ayuda!
Responder Con Cita
  #5  
Antiguo 10-03-2014
Avatar de ElKurgan
[ElKurgan] ElKurgan is offline
Miembro Premium
 
Registrado: nov 2005
Posts: 1.235
Poder: 20
ElKurgan Va camino a la fama
Sólo una cosa más.

No dejes de leer "La cara oculta de Delphi 4", del Maestro Marteens. Aunque es antiguo, los primeros capítulos son un compendio de lo que son las clases, propiedades, métodos, clases abstractas, métodos de clase...

Altamente recomendable

Saludos
Responder Con Cita
  #6  
Antiguo 10-03-2014
jularaXD jularaXD is offline
Miembro
NULL
 
Registrado: may 2013
Posts: 18
Poder: 0
jularaXD Va por buen camino
Descargado!
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Problemas con estructuras godel Varios 3 23-02-2008 13:08:34
Problemas con dll y estructuras mar646 OOP 2 17-11-2007 02:15:00
Estructuras?¿ CHiCoLiTa PHP 7 03-01-2005 10:09:53
estructuras de bd ejemplos osvrom Tablas planas 3 02-12-2003 16:32:26
Enviar estructuras como parametros a funciones Oracle SLAKE Conexión con bases de datos 0 02-10-2003 17:14:05


La franja horaria es GMT +2. Ahora son las 18:07:48.


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