Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 29-11-2015
wilcg wilcg is offline
Miembro
 
Registrado: abr 2014
Posts: 107
Poder: 13
wilcg Va por buen camino
Hola scigliano,
Para lo que quieres hacer, yo lo hago de esta manera espero te sirva.

OPCION 1
- Habilitar y desabilitar los controles deseados del FORM

Código Delphi [-]
procedure TFode.OnOfCtrl(const Enabled: Boolean; Ctrls: array of TControl);
var
  i: Integer;
begin
  for i:= Low(Ctrls) to High(Ctrls) do
    Ctrls[i].Enabled:= Enabled;
end;

USO:
Habilitar
Código Delphi [-]
Fode.OnOfCtrl(True,[Edit1,Edit2,Edit3,.....]);
Desabilitar
Código Delphi [-]
Fode.OnOfCtrl(False,[Edit1,Edit2,Edit3,.....]);

OPCION 2
Habilitar & desabilitar todos los controles que hay en un FORM

Código Delphi [-]
procedure TFode.OnOfForms( Enabled: Boolean; F :TForm );
var
  Lista: TList;
  i :integer;
begin
  Lista := TList.Create;
  try

    F.GetTabOrderList(Lista);
    for i := 0 to Lista.Count - 1 do
      if TWinControl(Lista[i]) is TEdit then
        TEdit(Lista[i]).Enabled := Enabled
      else
      if TWinControl(Lista[i]) is TcxTextEdit then
        TcxTextEdit(Lista[i]).Enabled := Enabled
      else
      // mas..... Aqui indica con que controles quieres que funcione

  finally
    Lista.Free;
  end;
end;

USO:
Habilitar
Código Delphi [-]
Fode.OnOfForms( True, Form1 );
Desabilitar
Código Delphi [-]
Fode.OnOfForms( False, Form1 );

Puedes adaptarle a lo que necesitas, espero sea útil.
Responder Con Cita
 



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
Manipular objetos desde otro objeto en otro form Nicolas_2011 Delphi para la web 8 17-11-2012 18:12:51
Problemas al manipular form reivaj_bo Varios 1 16-11-2009 16:28:35
Leer mensajes, solo desde la unit del Form? paubar Varios 2 22-08-2007 23:52:39
Saber el nombre de la form desde una unit nueva richi Varios 3 07-11-2006 10:14:28
Escribir algo en un Tedit desde otro form taru Varios 9 20-07-2006 15:43:52


La franja horaria es GMT +2. Ahora son las 10:25:10.


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