Fórmula para dividir un ancho

[[Delphius]]

¡Hey que bueno!¡Ya pescamos a uno felipe!
Uno más para el cacao cerebral, a ver que fórmula sale de todo esto

Buena idea Lepe, quien no quita que surja una clase que nos diga como organizar todo. Propongo que la llamemos Feng Shui

Yo me imagino métodos como:

Código Delphi [-]
 RegisterCategory(AControlClass: TControlClass)
AddControl(Size: integer); overload;
AddControl(Category, Size: integer); overload;

Reorganize;

Saludos,

[[maeyanes]]

Hola...

Aquí metiendo mi cuchara:

Código Delphi [-]
TFormControlsOrganizer = class
private
  FMargins: TMargins; // Una clase conteniendo propiedades tales como Botton, Top, Left, Right
  FForm: TForm;
public
  constructor Create(AForm: TForm);
  procedure ArrangeControls(AControls: Array of TComponent);
property
  Margin: TMargins read FMargins write SetMargins;
end;

implementation

constructor TFormControlsOrganizer.Create(AForm: TForm);
begin
  inherited Create;
  // Para tener más adelante el alto y ancho de la forma al momento de hacer los cálculos
  FForm := AForm
end;

procedure TFormControlsOrganizer.ArrangeControls(AControls: Array of TComponent);
var
  I: Integer;
  AControl: TComponent;

begin
  for I := 0 to High(AControls) do
  begin
    AControl := AControls[i];
    // Se hacen los calculos para acomodar el control.
  end
end;

// Para organizar tres edits a lo ancho de la forma se haría algo como:
Organizer.ArrangeControls([Edit1, Edit2, Edit3]);

Y bueno, es solo una idea de como quedaría una clase que hiciera algo así...



Saludos...

[[felipe88]]

Empezado por Delphius

¡Hey que bueno!¡Ya pescamos a uno felipe!
Uno más para el cacao cerebral, a ver que fórmula sale de todo esto

Buena idea Lepe, quien no quita que surja una clase que nos diga como organizar todo. Propongo que la llamemos Feng Shui

Yo me imagino métodos como:

Código Delphi [-]
RegisterCategory(AControlClass: TControlClass) AddControl(Size: integer); overload; 
AddControl(Category, Size: integer); overload;

Reorganize;

Saludos,

Feng Shiu...

Código Delphi [-]
FengShui.Organizar(Button1);

... aún no se descarta la idea de la clase... pero no quiero pensar en como seria ... prefiero conservar mis neuronas