[BDWONG]

Necistar importar la Unit Dialogs para mas informacion revisa el enlace
http://www.delphibasics.co.uk/RTL.as...dCode1=Yes#Ex1

Código Delphi [-]
unit Forma2;

interface
uses
  Dialogs;

procedure rueda;

implementation


procedure rueda;
begin
showmessage('funciona');
end;

end.