Ver Mensaje Individual
  #4  
Antiguo 25-11-2005
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.070
Reputación: 32
jhonny Va camino a la famajhonny Va camino a la fama
Cita:
porque no se como se crea el codigo de onmousedown dinamicamente.
Para crear el codigo dinamicamente debes hacerlo como lo a descrito Neftali

Cita:
no hay alguna forma para declarar rapidamente cada evento sin tener que hacer doble click y que delphi busque el codigo???
Cita:
Empezado por Neftali
obj.OnMouseDown := myOnMouseDown;
Mira, al objeto que tu estes creando debes asignarle el evento que tu mismo hayas inventado y asignarlo como he citado el texto de Neftali y para seguir con el ejemplo tambien le llamare myOnMouseDown.

myOnMouseDown debe ser un procedimiento aparte que reciba los mismo parametros del OnMouseDown Original, asi por ejemplo:

Código Delphi [-]
procedure TForm1.myOnMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  // Aqui pones lo que debe hacer dicho evento...
end;

Espero te sirva
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita