Hacer un mismo codigo para varios controles

Por Saiyine  el 0000-00-00 00:00:00 - Secciones:  DELPHI  - Enlace permanente: 479

procedure TForm1.ClickGeneral(Sender : TObject);
var
numbot : integer;
begin
        with Sender as TButton do
        begin
                numbot:=SuperVal(Name);
                Self.Caption := 'Has pulsado el boton nº' + inttostr(numbot);
        end;
end;

Crea un form, crea cuatro o cinco botones y asocia el onclick de cada uno a ClickGeneral.

104 

juan luis (2005-11-25 19:50:00) y como hacerlo si el objeto esta en otro formulario quiero decir que si estoy en el formulario 1 pero quiero modificar el objeto del formulario3 desde el formulario 1 gracias de antemano por la ayuda

108 

Saiyine (2005-11-25 20:23:00) Para acceder a un objeto de otro formulario basta con añadir al uses del formulario actual el nombre de la unidad que contiene el otro formulario, y luego, especificarlo al nombrar al objeto. Es decir, si estamos en el form1 y queremos usar el boton1 del form2, añadimos al uses de form1 el nombre de la unidad que contiene al form2, y luego ya podremos usar el botón llamandolo form2.boton1.

144 

piri xula (2006-01-03 17:37:00) ola m llamo laura y lo k kiero sq alguien si puede m diga alguna pagina para acr 1 graffiti cn mi nombre

145 

Saiyine (2006-01-03 20:35:00) Mira el google me devuelve esta dirección: zewall. ¡A ver esas obras de arte!

1610 

Anonimo (2007-12-03 06:18:29) alkien me puede decir un programa pa aaaser GraFFiTisS en mi Pc?¿?