Hola te aconsejo que cuando tengas dudas diferentes no dudes en abrir otro hilo ya que se mantiene el orden.
Bueno con respecto a tu duda, una forma simple de hacerlo es pasarle la referencia del objeto TImage por parametro a la funcion Rueda
Código Delphi
[-]unit Forma2;
interface
uses
ExtCtrls,Graphics;
procedure Rueda(var Imagen:TImage);
implementation
procedure Rueda(var Imagen:TImage);
begin
Imagen.Canvas.Pen.Color:=clNavy;
Imagen.Canvas.Pen.Width:=5;
Imagen.Canvas.Brush.Color:=clYellow;
Imagen.Canvas.Brush.Style:=bsDiagCross;
Imagen.Canvas.Ellipse(160,10,260,110);
end;
end.
Ya habiendole especificado el parametro hay que llamar a la funcion desdel el formulario principal
La palabra Self hace referencia al formulario Forma1 pero si te confunde este concepto puede hacer esto
Edito: Tambien simplemente basta con poner
En mi caso mi formulario se llama Form1, por ultimo evitar usar
WITH.
ScreenShot
Saludos....